Merge llvm, clang, lld, lldb, compiler-rt and libc++ r302418, and update
[freebsd.git] / sys / net80211 / ieee80211_mesh.c
1 /*- 
2  * Copyright (c) 2009 The FreeBSD Foundation 
3  * All rights reserved. 
4  * 
5  * This software was developed by Rui Paulo under sponsorship from the
6  * FreeBSD Foundation. 
7  *  
8  * Redistribution and use in source and binary forms, with or without 
9  * modification, are permitted provided that the following conditions 
10  * are met: 
11  * 1. Redistributions of source code must retain the above copyright 
12  *    notice, this list of conditions and the following disclaimer. 
13  * 2. Redistributions in binary form must reproduce the above copyright 
14  *    notice, this list of conditions and the following disclaimer in the 
15  *    documentation and/or other materials provided with the distribution. 
16  * 
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 
27  * SUCH DAMAGE. 
28  */ 
29 #include <sys/cdefs.h>
30 #ifdef __FreeBSD__
31 __FBSDID("$FreeBSD$");
32 #endif
33
34 /*
35  * IEEE 802.11s Mesh Point (MBSS) support.
36  *
37  * Based on March 2009, D3.0 802.11s draft spec.
38  */
39 #include "opt_inet.h"
40 #include "opt_wlan.h"
41
42 #include <sys/param.h>
43 #include <sys/systm.h> 
44 #include <sys/mbuf.h>   
45 #include <sys/malloc.h>
46 #include <sys/kernel.h>
47
48 #include <sys/socket.h>
49 #include <sys/sockio.h>
50 #include <sys/endian.h>
51 #include <sys/errno.h>
52 #include <sys/proc.h>
53 #include <sys/sysctl.h>
54
55 #include <net/bpf.h>
56 #include <net/if.h>
57 #include <net/if_var.h>
58 #include <net/if_media.h>
59 #include <net/if_llc.h>
60 #include <net/ethernet.h>
61
62 #include <net80211/ieee80211_var.h>
63 #include <net80211/ieee80211_action.h>
64 #ifdef IEEE80211_SUPPORT_SUPERG
65 #include <net80211/ieee80211_superg.h>
66 #endif
67 #include <net80211/ieee80211_input.h>
68 #include <net80211/ieee80211_mesh.h>
69
70 static void     mesh_rt_flush_invalid(struct ieee80211vap *);
71 static int      mesh_select_proto_path(struct ieee80211vap *, const char *);
72 static int      mesh_select_proto_metric(struct ieee80211vap *, const char *);
73 static void     mesh_vattach(struct ieee80211vap *);
74 static int      mesh_newstate(struct ieee80211vap *, enum ieee80211_state, int);
75 static void     mesh_rt_cleanup_cb(void *);
76 static void     mesh_gatemode_setup(struct ieee80211vap *);
77 static void     mesh_gatemode_cb(void *);
78 static void     mesh_linkchange(struct ieee80211_node *,
79                     enum ieee80211_mesh_mlstate);
80 static void     mesh_checkid(void *, struct ieee80211_node *);
81 static uint32_t mesh_generateid(struct ieee80211vap *);
82 static int      mesh_checkpseq(struct ieee80211vap *,
83                     const uint8_t [IEEE80211_ADDR_LEN], uint32_t);
84 static void     mesh_transmit_to_gate(struct ieee80211vap *, struct mbuf *,
85                     struct ieee80211_mesh_route *);
86 static void     mesh_forward(struct ieee80211vap *, struct mbuf *,
87                     const struct ieee80211_meshcntl *);
88 static int      mesh_input(struct ieee80211_node *, struct mbuf *,
89                     const struct ieee80211_rx_stats *rxs, int, int);
90 static void     mesh_recv_mgmt(struct ieee80211_node *, struct mbuf *, int,
91                     const struct ieee80211_rx_stats *rxs, int, int);
92 static void     mesh_recv_ctl(struct ieee80211_node *, struct mbuf *, int);
93 static void     mesh_peer_timeout_setup(struct ieee80211_node *);
94 static void     mesh_peer_timeout_backoff(struct ieee80211_node *);
95 static void     mesh_peer_timeout_cb(void *);
96 static __inline void
97                 mesh_peer_timeout_stop(struct ieee80211_node *);
98 static int      mesh_verify_meshid(struct ieee80211vap *, const uint8_t *);
99 static int      mesh_verify_meshconf(struct ieee80211vap *, const uint8_t *);
100 static int      mesh_verify_meshpeer(struct ieee80211vap *, uint8_t,
101                     const uint8_t *);
102 uint32_t        mesh_airtime_calc(struct ieee80211_node *);
103
104 /*
105  * Timeout values come from the specification and are in milliseconds.
106  */
107 static SYSCTL_NODE(_net_wlan, OID_AUTO, mesh, CTLFLAG_RD, 0,
108     "IEEE 802.11s parameters");
109 static int      ieee80211_mesh_gateint = -1;
110 SYSCTL_PROC(_net_wlan_mesh, OID_AUTO, gateint, CTLTYPE_INT | CTLFLAG_RW,
111     &ieee80211_mesh_gateint, 0, ieee80211_sysctl_msecs_ticks, "I",
112     "mesh gate interval (ms)");
113 static int ieee80211_mesh_retrytimeout = -1;
114 SYSCTL_PROC(_net_wlan_mesh, OID_AUTO, retrytimeout, CTLTYPE_INT | CTLFLAG_RW,
115     &ieee80211_mesh_retrytimeout, 0, ieee80211_sysctl_msecs_ticks, "I",
116     "Retry timeout (msec)");
117 static int ieee80211_mesh_holdingtimeout = -1;
118
119 SYSCTL_PROC(_net_wlan_mesh, OID_AUTO, holdingtimeout, CTLTYPE_INT | CTLFLAG_RW,
120     &ieee80211_mesh_holdingtimeout, 0, ieee80211_sysctl_msecs_ticks, "I",
121     "Holding state timeout (msec)");
122 static int ieee80211_mesh_confirmtimeout = -1;
123 SYSCTL_PROC(_net_wlan_mesh, OID_AUTO, confirmtimeout, CTLTYPE_INT | CTLFLAG_RW,
124     &ieee80211_mesh_confirmtimeout, 0, ieee80211_sysctl_msecs_ticks, "I",
125     "Confirm state timeout (msec)");
126 static int ieee80211_mesh_backofftimeout = -1;
127 SYSCTL_PROC(_net_wlan_mesh, OID_AUTO, backofftimeout, CTLTYPE_INT | CTLFLAG_RW,
128     &ieee80211_mesh_backofftimeout, 0, ieee80211_sysctl_msecs_ticks, "I",
129     "Backoff timeout (msec). This is to throutles peering forever when "
130     "not receiving answer or is rejected by a neighbor");
131 static int ieee80211_mesh_maxretries = 2;
132 SYSCTL_INT(_net_wlan_mesh, OID_AUTO, maxretries, CTLFLAG_RW,
133     &ieee80211_mesh_maxretries, 0,
134     "Maximum retries during peer link establishment");
135 static int ieee80211_mesh_maxholding = 2;
136 SYSCTL_INT(_net_wlan_mesh, OID_AUTO, maxholding, CTLFLAG_RW,
137     &ieee80211_mesh_maxholding, 0,
138     "Maximum times we are allowed to transition to HOLDING state before "
139     "backinoff during peer link establishment");
140
141 static const uint8_t broadcastaddr[IEEE80211_ADDR_LEN] =
142         { 0xff, 0xff, 0xff, 0xff, 0xff, 0xff };
143
144 static  ieee80211_recv_action_func mesh_recv_action_meshpeering_open;
145 static  ieee80211_recv_action_func mesh_recv_action_meshpeering_confirm;
146 static  ieee80211_recv_action_func mesh_recv_action_meshpeering_close;
147 static  ieee80211_recv_action_func mesh_recv_action_meshlmetric;
148 static  ieee80211_recv_action_func mesh_recv_action_meshgate;
149
150 static  ieee80211_send_action_func mesh_send_action_meshpeering_open;
151 static  ieee80211_send_action_func mesh_send_action_meshpeering_confirm;
152 static  ieee80211_send_action_func mesh_send_action_meshpeering_close;
153 static  ieee80211_send_action_func mesh_send_action_meshlmetric;
154 static  ieee80211_send_action_func mesh_send_action_meshgate;
155
156 static const struct ieee80211_mesh_proto_metric mesh_metric_airtime = {
157         .mpm_descr      = "AIRTIME",
158         .mpm_ie         = IEEE80211_MESHCONF_METRIC_AIRTIME,
159         .mpm_metric     = mesh_airtime_calc,
160 };
161
162 static struct ieee80211_mesh_proto_path         mesh_proto_paths[4];
163 static struct ieee80211_mesh_proto_metric       mesh_proto_metrics[4];
164
165 MALLOC_DEFINE(M_80211_MESH_PREQ, "80211preq", "802.11 MESH Path Request frame");
166 MALLOC_DEFINE(M_80211_MESH_PREP, "80211prep", "802.11 MESH Path Reply frame");
167 MALLOC_DEFINE(M_80211_MESH_PERR, "80211perr", "802.11 MESH Path Error frame");
168
169 /* The longer one of the lifetime should be stored as new lifetime */
170 #define MESH_ROUTE_LIFETIME_MAX(a, b)   (a > b ? a : b)
171
172 MALLOC_DEFINE(M_80211_MESH_RT, "80211mesh_rt", "802.11s routing table");
173 MALLOC_DEFINE(M_80211_MESH_GT_RT, "80211mesh_gt", "802.11s known gates table");
174
175 /*
176  * Helper functions to manipulate the Mesh routing table.
177  */
178
179 static struct ieee80211_mesh_route *
180 mesh_rt_find_locked(struct ieee80211_mesh_state *ms,
181     const uint8_t dest[IEEE80211_ADDR_LEN])
182 {
183         struct ieee80211_mesh_route *rt;
184
185         MESH_RT_LOCK_ASSERT(ms);
186
187         TAILQ_FOREACH(rt, &ms->ms_routes, rt_next) {
188                 if (IEEE80211_ADDR_EQ(dest, rt->rt_dest))
189                         return rt;
190         }
191         return NULL;
192 }
193
194 static struct ieee80211_mesh_route *
195 mesh_rt_add_locked(struct ieee80211vap *vap,
196     const uint8_t dest[IEEE80211_ADDR_LEN])
197 {
198         struct ieee80211_mesh_state *ms = vap->iv_mesh;
199         struct ieee80211_mesh_route *rt;
200
201         KASSERT(!IEEE80211_ADDR_EQ(broadcastaddr, dest),
202             ("%s: adding broadcast to the routing table", __func__));
203
204         MESH_RT_LOCK_ASSERT(ms);
205
206         rt = IEEE80211_MALLOC(ALIGN(sizeof(struct ieee80211_mesh_route)) +
207             ms->ms_ppath->mpp_privlen, M_80211_MESH_RT,
208             IEEE80211_M_NOWAIT | IEEE80211_M_ZERO);
209         if (rt != NULL) {
210                 rt->rt_vap = vap;
211                 IEEE80211_ADDR_COPY(rt->rt_dest, dest);
212                 rt->rt_priv = (void *)ALIGN(&rt[1]);
213                 MESH_RT_ENTRY_LOCK_INIT(rt, "MBSS_RT");
214                 callout_init(&rt->rt_discovery, 1);
215                 rt->rt_updtime = ticks; /* create time */
216                 TAILQ_INSERT_TAIL(&ms->ms_routes, rt, rt_next);
217         }
218         return rt;
219 }
220
221 struct ieee80211_mesh_route *
222 ieee80211_mesh_rt_find(struct ieee80211vap *vap,
223     const uint8_t dest[IEEE80211_ADDR_LEN])
224 {
225         struct ieee80211_mesh_state *ms = vap->iv_mesh;
226         struct ieee80211_mesh_route *rt;
227
228         MESH_RT_LOCK(ms);
229         rt = mesh_rt_find_locked(ms, dest);
230         MESH_RT_UNLOCK(ms);
231         return rt;
232 }
233
234 struct ieee80211_mesh_route *
235 ieee80211_mesh_rt_add(struct ieee80211vap *vap,
236     const uint8_t dest[IEEE80211_ADDR_LEN])
237 {
238         struct ieee80211_mesh_state *ms = vap->iv_mesh;
239         struct ieee80211_mesh_route *rt;
240
241         KASSERT(ieee80211_mesh_rt_find(vap, dest) == NULL,
242             ("%s: duplicate entry in the routing table", __func__));
243         KASSERT(!IEEE80211_ADDR_EQ(vap->iv_myaddr, dest),
244             ("%s: adding self to the routing table", __func__));
245
246         MESH_RT_LOCK(ms);
247         rt = mesh_rt_add_locked(vap, dest);
248         MESH_RT_UNLOCK(ms);
249         return rt;
250 }
251
252 /*
253  * Update the route lifetime and returns the updated lifetime.
254  * If new_lifetime is zero and route is timedout it will be invalidated.
255  * new_lifetime is in msec
256  */
257 int
258 ieee80211_mesh_rt_update(struct ieee80211_mesh_route *rt, int new_lifetime)
259 {
260         int timesince, now;
261         uint32_t lifetime = 0;
262
263         KASSERT(rt != NULL, ("route is NULL"));
264
265         now = ticks;
266         MESH_RT_ENTRY_LOCK(rt);
267
268         /* dont clobber a proxy entry gated by us */
269         if (rt->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY && rt->rt_nhops == 0) {
270                 MESH_RT_ENTRY_UNLOCK(rt);
271                 return rt->rt_lifetime;
272         }
273
274         timesince = ticks_to_msecs(now - rt->rt_updtime);
275         rt->rt_updtime = now;
276         if (timesince >= rt->rt_lifetime) {
277                 if (new_lifetime != 0) {
278                         rt->rt_lifetime = new_lifetime;
279                 }
280                 else {
281                         rt->rt_flags &= ~IEEE80211_MESHRT_FLAGS_VALID;
282                         rt->rt_lifetime = 0;
283                 }
284         } else {
285                 /* update what is left of lifetime */
286                 rt->rt_lifetime = rt->rt_lifetime - timesince;
287                 rt->rt_lifetime  = MESH_ROUTE_LIFETIME_MAX(
288                         new_lifetime, rt->rt_lifetime);
289         }
290         lifetime = rt->rt_lifetime;
291         MESH_RT_ENTRY_UNLOCK(rt);
292
293         return lifetime;
294 }
295
296 /*
297  * Add a proxy route (as needed) for the specified destination.
298  */
299 void
300 ieee80211_mesh_proxy_check(struct ieee80211vap *vap,
301     const uint8_t dest[IEEE80211_ADDR_LEN])
302 {
303         struct ieee80211_mesh_state *ms = vap->iv_mesh;
304         struct ieee80211_mesh_route *rt;
305
306         MESH_RT_LOCK(ms);
307         rt = mesh_rt_find_locked(ms, dest);
308         if (rt == NULL) {
309                 rt = mesh_rt_add_locked(vap, dest);
310                 if (rt == NULL) {
311                         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, dest,
312                             "%s", "unable to add proxy entry");
313                         vap->iv_stats.is_mesh_rtaddfailed++;
314                 } else {
315                         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, dest,
316                             "%s", "add proxy entry");
317                         IEEE80211_ADDR_COPY(rt->rt_mesh_gate, vap->iv_myaddr);
318                         IEEE80211_ADDR_COPY(rt->rt_nexthop, vap->iv_myaddr);
319                         rt->rt_flags |= IEEE80211_MESHRT_FLAGS_VALID
320                                      |  IEEE80211_MESHRT_FLAGS_PROXY;
321                 }
322         } else if ((rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) == 0) {
323                 KASSERT(rt->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY,
324                     ("no proxy flag for poxy entry"));
325                 struct ieee80211com *ic = vap->iv_ic;
326                 /*
327                  * Fix existing entry created by received frames from
328                  * stations that have some memory of dest.  We also
329                  * flush any frames held on the staging queue; delivering
330                  * them is too much trouble right now.
331                  */
332                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, dest,
333                     "%s", "fix proxy entry");
334                 IEEE80211_ADDR_COPY(rt->rt_nexthop, vap->iv_myaddr);
335                 rt->rt_flags |= IEEE80211_MESHRT_FLAGS_VALID
336                              |  IEEE80211_MESHRT_FLAGS_PROXY;
337                 /* XXX belongs in hwmp */
338                 ieee80211_ageq_drain_node(&ic->ic_stageq,
339                    (void *)(uintptr_t) ieee80211_mac_hash(ic, dest));
340                 /* XXX stat? */
341         }
342         MESH_RT_UNLOCK(ms);
343 }
344
345 static __inline void
346 mesh_rt_del(struct ieee80211_mesh_state *ms, struct ieee80211_mesh_route *rt)
347 {
348         TAILQ_REMOVE(&ms->ms_routes, rt, rt_next);
349         /*
350          * Grab the lock before destroying it, to be sure no one else
351          * is holding the route.
352          */
353         MESH_RT_ENTRY_LOCK(rt);
354         callout_drain(&rt->rt_discovery);
355         MESH_RT_ENTRY_LOCK_DESTROY(rt);
356         IEEE80211_FREE(rt, M_80211_MESH_RT);
357 }
358
359 void
360 ieee80211_mesh_rt_del(struct ieee80211vap *vap,
361     const uint8_t dest[IEEE80211_ADDR_LEN])
362 {
363         struct ieee80211_mesh_state *ms = vap->iv_mesh;
364         struct ieee80211_mesh_route *rt, *next;
365
366         MESH_RT_LOCK(ms);
367         TAILQ_FOREACH_SAFE(rt, &ms->ms_routes, rt_next, next) {
368                 if (IEEE80211_ADDR_EQ(rt->rt_dest, dest)) {
369                         if (rt->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY) {
370                                 ms->ms_ppath->mpp_senderror(vap, dest, rt,
371                                     IEEE80211_REASON_MESH_PERR_NO_PROXY);
372                         } else {
373                                 ms->ms_ppath->mpp_senderror(vap, dest, rt,
374                                     IEEE80211_REASON_MESH_PERR_DEST_UNREACH);
375                         }
376                         mesh_rt_del(ms, rt);
377                         MESH_RT_UNLOCK(ms);
378                         return;
379                 }
380         }
381         MESH_RT_UNLOCK(ms);
382 }
383
384 void
385 ieee80211_mesh_rt_flush(struct ieee80211vap *vap)
386 {
387         struct ieee80211_mesh_state *ms = vap->iv_mesh;
388         struct ieee80211_mesh_route *rt, *next;
389
390         if (ms == NULL)
391                 return;
392         MESH_RT_LOCK(ms);
393         TAILQ_FOREACH_SAFE(rt, &ms->ms_routes, rt_next, next)
394                 mesh_rt_del(ms, rt);
395         MESH_RT_UNLOCK(ms);
396 }
397
398 void
399 ieee80211_mesh_rt_flush_peer(struct ieee80211vap *vap,
400     const uint8_t peer[IEEE80211_ADDR_LEN])
401 {
402         struct ieee80211_mesh_state *ms = vap->iv_mesh;
403         struct ieee80211_mesh_route *rt, *next;
404
405         MESH_RT_LOCK(ms);
406         TAILQ_FOREACH_SAFE(rt, &ms->ms_routes, rt_next, next) {
407                 if (IEEE80211_ADDR_EQ(rt->rt_nexthop, peer))
408                         mesh_rt_del(ms, rt);
409         }
410         MESH_RT_UNLOCK(ms);
411 }
412
413 /*
414  * Flush expired routing entries, i.e. those in invalid state for
415  * some time.
416  */
417 static void
418 mesh_rt_flush_invalid(struct ieee80211vap *vap)
419 {
420         struct ieee80211_mesh_state *ms = vap->iv_mesh;
421         struct ieee80211_mesh_route *rt, *next;
422
423         if (ms == NULL)
424                 return;
425         MESH_RT_LOCK(ms);
426         TAILQ_FOREACH_SAFE(rt, &ms->ms_routes, rt_next, next) {
427                 /* Discover paths will be deleted by their own callout */
428                 if (rt->rt_flags & IEEE80211_MESHRT_FLAGS_DISCOVER)
429                         continue;
430                 ieee80211_mesh_rt_update(rt, 0);
431                 if ((rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) == 0)
432                         mesh_rt_del(ms, rt);
433         }
434         MESH_RT_UNLOCK(ms);
435 }
436
437 int
438 ieee80211_mesh_register_proto_path(const struct ieee80211_mesh_proto_path *mpp)
439 {
440         int i, firstempty = -1;
441
442         for (i = 0; i < nitems(mesh_proto_paths); i++) {
443                 if (strncmp(mpp->mpp_descr, mesh_proto_paths[i].mpp_descr,
444                     IEEE80211_MESH_PROTO_DSZ) == 0)
445                         return EEXIST;
446                 if (!mesh_proto_paths[i].mpp_active && firstempty == -1)
447                         firstempty = i;
448         }
449         if (firstempty < 0)
450                 return ENOSPC;
451         memcpy(&mesh_proto_paths[firstempty], mpp, sizeof(*mpp));
452         mesh_proto_paths[firstempty].mpp_active = 1;
453         return 0;
454 }
455
456 int
457 ieee80211_mesh_register_proto_metric(const struct
458     ieee80211_mesh_proto_metric *mpm)
459 {
460         int i, firstempty = -1;
461
462         for (i = 0; i < nitems(mesh_proto_metrics); i++) {
463                 if (strncmp(mpm->mpm_descr, mesh_proto_metrics[i].mpm_descr,
464                     IEEE80211_MESH_PROTO_DSZ) == 0)
465                         return EEXIST;
466                 if (!mesh_proto_metrics[i].mpm_active && firstempty == -1)
467                         firstempty = i;
468         }
469         if (firstempty < 0)
470                 return ENOSPC;
471         memcpy(&mesh_proto_metrics[firstempty], mpm, sizeof(*mpm));
472         mesh_proto_metrics[firstempty].mpm_active = 1;
473         return 0;
474 }
475
476 static int
477 mesh_select_proto_path(struct ieee80211vap *vap, const char *name)
478 {
479         struct ieee80211_mesh_state *ms = vap->iv_mesh;
480         int i;
481
482         for (i = 0; i < nitems(mesh_proto_paths); i++) {
483                 if (strcasecmp(mesh_proto_paths[i].mpp_descr, name) == 0) {
484                         ms->ms_ppath = &mesh_proto_paths[i];
485                         return 0;
486                 }
487         }
488         return ENOENT;
489 }
490
491 static int
492 mesh_select_proto_metric(struct ieee80211vap *vap, const char *name)
493 {
494         struct ieee80211_mesh_state *ms = vap->iv_mesh;
495         int i;
496
497         for (i = 0; i < nitems(mesh_proto_metrics); i++) {
498                 if (strcasecmp(mesh_proto_metrics[i].mpm_descr, name) == 0) {
499                         ms->ms_pmetric = &mesh_proto_metrics[i];
500                         return 0;
501                 }
502         }
503         return ENOENT;
504 }
505
506 static void
507 mesh_gatemode_setup(struct ieee80211vap *vap)
508 {
509         struct ieee80211_mesh_state *ms = vap->iv_mesh;
510
511         /*
512          * NB: When a mesh gate is running as a ROOT it shall
513          * not send out periodic GANNs but instead mark the
514          * mesh gate flag for the corresponding proactive PREQ
515          * and RANN frames.
516          */
517         if (ms->ms_flags & IEEE80211_MESHFLAGS_ROOT ||
518             (ms->ms_flags & IEEE80211_MESHFLAGS_GATE) == 0) {
519                 callout_drain(&ms->ms_gatetimer);
520                 return ;
521         }
522         callout_reset(&ms->ms_gatetimer, ieee80211_mesh_gateint,
523             mesh_gatemode_cb, vap);
524 }
525
526 static void
527 mesh_gatemode_cb(void *arg)
528 {
529         struct ieee80211vap *vap = (struct ieee80211vap *)arg;
530         struct ieee80211_mesh_state *ms = vap->iv_mesh;
531         struct ieee80211_meshgann_ie gann;
532
533         gann.gann_flags = 0; /* Reserved */
534         gann.gann_hopcount = 0;
535         gann.gann_ttl = ms->ms_ttl;
536         IEEE80211_ADDR_COPY(gann.gann_addr, vap->iv_myaddr);
537         gann.gann_seq = ms->ms_gateseq++;
538         gann.gann_interval = ieee80211_mesh_gateint;
539
540         IEEE80211_NOTE(vap, IEEE80211_MSG_MESH, vap->iv_bss,
541             "send broadcast GANN (seq %u)", gann.gann_seq);
542
543         ieee80211_send_action(vap->iv_bss, IEEE80211_ACTION_CAT_MESH,
544             IEEE80211_ACTION_MESH_GANN, &gann);
545         mesh_gatemode_setup(vap);
546 }
547
548 static void
549 ieee80211_mesh_init(void)
550 {
551
552         memset(mesh_proto_paths, 0, sizeof(mesh_proto_paths));
553         memset(mesh_proto_metrics, 0, sizeof(mesh_proto_metrics));
554
555         /*
556          * Setup mesh parameters that depends on the clock frequency.
557          */
558         ieee80211_mesh_gateint = msecs_to_ticks(10000);
559         ieee80211_mesh_retrytimeout = msecs_to_ticks(40);
560         ieee80211_mesh_holdingtimeout = msecs_to_ticks(40);
561         ieee80211_mesh_confirmtimeout = msecs_to_ticks(40);
562         ieee80211_mesh_backofftimeout = msecs_to_ticks(5000);
563
564         /*
565          * Register action frame handlers.
566          */
567         ieee80211_recv_action_register(IEEE80211_ACTION_CAT_SELF_PROT,
568             IEEE80211_ACTION_MESHPEERING_OPEN,
569             mesh_recv_action_meshpeering_open);
570         ieee80211_recv_action_register(IEEE80211_ACTION_CAT_SELF_PROT,
571             IEEE80211_ACTION_MESHPEERING_CONFIRM,
572             mesh_recv_action_meshpeering_confirm);
573         ieee80211_recv_action_register(IEEE80211_ACTION_CAT_SELF_PROT,
574             IEEE80211_ACTION_MESHPEERING_CLOSE,
575             mesh_recv_action_meshpeering_close);
576         ieee80211_recv_action_register(IEEE80211_ACTION_CAT_MESH,
577             IEEE80211_ACTION_MESH_LMETRIC, mesh_recv_action_meshlmetric);
578         ieee80211_recv_action_register(IEEE80211_ACTION_CAT_MESH,
579             IEEE80211_ACTION_MESH_GANN, mesh_recv_action_meshgate);
580
581         ieee80211_send_action_register(IEEE80211_ACTION_CAT_SELF_PROT,
582             IEEE80211_ACTION_MESHPEERING_OPEN,
583             mesh_send_action_meshpeering_open);
584         ieee80211_send_action_register(IEEE80211_ACTION_CAT_SELF_PROT,
585             IEEE80211_ACTION_MESHPEERING_CONFIRM,
586             mesh_send_action_meshpeering_confirm);
587         ieee80211_send_action_register(IEEE80211_ACTION_CAT_SELF_PROT,
588             IEEE80211_ACTION_MESHPEERING_CLOSE,
589             mesh_send_action_meshpeering_close);
590         ieee80211_send_action_register(IEEE80211_ACTION_CAT_MESH,
591             IEEE80211_ACTION_MESH_LMETRIC,
592             mesh_send_action_meshlmetric);
593         ieee80211_send_action_register(IEEE80211_ACTION_CAT_MESH,
594             IEEE80211_ACTION_MESH_GANN,
595             mesh_send_action_meshgate);
596
597         /*
598          * Register Airtime Link Metric.
599          */
600         ieee80211_mesh_register_proto_metric(&mesh_metric_airtime);
601
602 }
603 SYSINIT(wlan_mesh, SI_SUB_DRIVERS, SI_ORDER_FIRST, ieee80211_mesh_init, NULL);
604
605 void
606 ieee80211_mesh_attach(struct ieee80211com *ic)
607 {
608         ic->ic_vattach[IEEE80211_M_MBSS] = mesh_vattach;
609 }
610
611 void
612 ieee80211_mesh_detach(struct ieee80211com *ic)
613 {
614 }
615
616 static void
617 mesh_vdetach_peers(void *arg, struct ieee80211_node *ni)
618 {
619         struct ieee80211com *ic = ni->ni_ic;
620         uint16_t args[3];
621
622         if (ni->ni_mlstate == IEEE80211_NODE_MESH_ESTABLISHED) {
623                 args[0] = ni->ni_mlpid;
624                 args[1] = ni->ni_mllid;
625                 args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
626                 ieee80211_send_action(ni,
627                     IEEE80211_ACTION_CAT_SELF_PROT,
628                     IEEE80211_ACTION_MESHPEERING_CLOSE,
629                     args);
630         }
631         callout_drain(&ni->ni_mltimer);
632         /* XXX belongs in hwmp */
633         ieee80211_ageq_drain_node(&ic->ic_stageq,
634            (void *)(uintptr_t) ieee80211_mac_hash(ic, ni->ni_macaddr));
635 }
636
637 static void
638 mesh_vdetach(struct ieee80211vap *vap)
639 {
640         struct ieee80211_mesh_state *ms = vap->iv_mesh;
641
642         callout_drain(&ms->ms_cleantimer);
643         ieee80211_iterate_nodes(&vap->iv_ic->ic_sta, mesh_vdetach_peers,
644             NULL);
645         ieee80211_mesh_rt_flush(vap);
646         MESH_RT_LOCK_DESTROY(ms);
647         ms->ms_ppath->mpp_vdetach(vap);
648         IEEE80211_FREE(vap->iv_mesh, M_80211_VAP);
649         vap->iv_mesh = NULL;
650 }
651
652 static void
653 mesh_vattach(struct ieee80211vap *vap)
654 {
655         struct ieee80211_mesh_state *ms;
656         vap->iv_newstate = mesh_newstate;
657         vap->iv_input = mesh_input;
658         vap->iv_opdetach = mesh_vdetach;
659         vap->iv_recv_mgmt = mesh_recv_mgmt;
660         vap->iv_recv_ctl = mesh_recv_ctl;
661         ms = IEEE80211_MALLOC(sizeof(struct ieee80211_mesh_state), M_80211_VAP,
662             IEEE80211_M_NOWAIT | IEEE80211_M_ZERO);
663         if (ms == NULL) {
664                 printf("%s: couldn't alloc MBSS state\n", __func__);
665                 return;
666         }
667         vap->iv_mesh = ms;
668         ms->ms_seq = 0;
669         ms->ms_flags = (IEEE80211_MESHFLAGS_AP | IEEE80211_MESHFLAGS_FWD);
670         ms->ms_ttl = IEEE80211_MESH_DEFAULT_TTL;
671         TAILQ_INIT(&ms->ms_known_gates);
672         TAILQ_INIT(&ms->ms_routes);
673         MESH_RT_LOCK_INIT(ms, "MBSS");
674         callout_init(&ms->ms_cleantimer, 1);
675         callout_init(&ms->ms_gatetimer, 1);
676         ms->ms_gateseq = 0;
677         mesh_select_proto_metric(vap, "AIRTIME");
678         KASSERT(ms->ms_pmetric, ("ms_pmetric == NULL"));
679         mesh_select_proto_path(vap, "HWMP");
680         KASSERT(ms->ms_ppath, ("ms_ppath == NULL"));
681         ms->ms_ppath->mpp_vattach(vap);
682 }
683
684 /*
685  * IEEE80211_M_MBSS vap state machine handler.
686  */
687 static int
688 mesh_newstate(struct ieee80211vap *vap, enum ieee80211_state nstate, int arg)
689 {
690         struct ieee80211_mesh_state *ms = vap->iv_mesh;
691         struct ieee80211com *ic = vap->iv_ic;
692         struct ieee80211_node *ni;
693         enum ieee80211_state ostate;
694
695         IEEE80211_LOCK_ASSERT(ic);
696
697         ostate = vap->iv_state;
698         IEEE80211_DPRINTF(vap, IEEE80211_MSG_STATE, "%s: %s -> %s (%d)\n",
699             __func__, ieee80211_state_name[ostate],
700             ieee80211_state_name[nstate], arg);
701         vap->iv_state = nstate;         /* state transition */
702         if (ostate != IEEE80211_S_SCAN)
703                 ieee80211_cancel_scan(vap);     /* background scan */
704         ni = vap->iv_bss;                       /* NB: no reference held */
705         if (nstate != IEEE80211_S_RUN && ostate == IEEE80211_S_RUN) {
706                 callout_drain(&ms->ms_cleantimer);
707                 callout_drain(&ms->ms_gatetimer);
708         }
709         switch (nstate) {
710         case IEEE80211_S_INIT:
711                 switch (ostate) {
712                 case IEEE80211_S_SCAN:
713                         ieee80211_cancel_scan(vap);
714                         break;
715                 case IEEE80211_S_CAC:
716                         ieee80211_dfs_cac_stop(vap);
717                         break;
718                 case IEEE80211_S_RUN:
719                         ieee80211_iterate_nodes(&ic->ic_sta,
720                             mesh_vdetach_peers, NULL);
721                         break;
722                 default:
723                         break;
724                 }
725                 if (ostate != IEEE80211_S_INIT) {
726                         /* NB: optimize INIT -> INIT case */
727                         ieee80211_reset_bss(vap);
728                         ieee80211_mesh_rt_flush(vap);
729                 }
730                 break;
731         case IEEE80211_S_SCAN:
732                 switch (ostate) {
733                 case IEEE80211_S_INIT:
734                         if (vap->iv_des_chan != IEEE80211_CHAN_ANYC &&
735                             !IEEE80211_IS_CHAN_RADAR(vap->iv_des_chan) &&
736                             ms->ms_idlen != 0) {
737                                 /*
738                                  * Already have a channel and a mesh ID; bypass
739                                  * the scan and startup immediately.
740                                  */
741                                 ieee80211_create_ibss(vap, vap->iv_des_chan);
742                                 break;
743                         }
744                         /*
745                          * Initiate a scan.  We can come here as a result
746                          * of an IEEE80211_IOC_SCAN_REQ too in which case
747                          * the vap will be marked with IEEE80211_FEXT_SCANREQ
748                          * and the scan request parameters will be present
749                          * in iv_scanreq.  Otherwise we do the default.
750                         */
751                         if (vap->iv_flags_ext & IEEE80211_FEXT_SCANREQ) {
752                                 ieee80211_check_scan(vap,
753                                     vap->iv_scanreq_flags,
754                                     vap->iv_scanreq_duration,
755                                     vap->iv_scanreq_mindwell,
756                                     vap->iv_scanreq_maxdwell,
757                                     vap->iv_scanreq_nssid, vap->iv_scanreq_ssid);
758                                 vap->iv_flags_ext &= ~IEEE80211_FEXT_SCANREQ;
759                         } else
760                                 ieee80211_check_scan_current(vap);
761                         break;
762                 default:
763                         break;
764                 }
765                 break;
766         case IEEE80211_S_CAC:
767                 /*
768                  * Start CAC on a DFS channel.  We come here when starting
769                  * a bss on a DFS channel (see ieee80211_create_ibss).
770                  */
771                 ieee80211_dfs_cac_start(vap);
772                 break;
773         case IEEE80211_S_RUN:
774                 switch (ostate) {
775                 case IEEE80211_S_INIT:
776                         /*
777                          * Already have a channel; bypass the
778                          * scan and startup immediately.
779                          * Note that ieee80211_create_ibss will call
780                          * back to do a RUN->RUN state change.
781                          */
782                         ieee80211_create_ibss(vap,
783                             ieee80211_ht_adjust_channel(ic,
784                                 ic->ic_curchan, vap->iv_flags_ht));
785                         /* NB: iv_bss is changed on return */
786                         break;
787                 case IEEE80211_S_CAC:
788                         /*
789                          * NB: This is the normal state change when CAC
790                          * expires and no radar was detected; no need to
791                          * clear the CAC timer as it's already expired.
792                          */
793                         /* fall thru... */
794                 case IEEE80211_S_CSA:
795 #if 0
796                         /*
797                          * Shorten inactivity timer of associated stations
798                          * to weed out sta's that don't follow a CSA.
799                          */
800                         ieee80211_iterate_nodes(&ic->ic_sta, sta_csa, vap);
801 #endif
802                         /*
803                          * Update bss node channel to reflect where
804                          * we landed after CSA.
805                          */
806                         ieee80211_node_set_chan(ni,
807                             ieee80211_ht_adjust_channel(ic, ic->ic_curchan,
808                                 ieee80211_htchanflags(ni->ni_chan)));
809                         /* XXX bypass debug msgs */
810                         break;
811                 case IEEE80211_S_SCAN:
812                 case IEEE80211_S_RUN:
813 #ifdef IEEE80211_DEBUG
814                         if (ieee80211_msg_debug(vap)) {
815                                 ieee80211_note(vap,
816                                     "synchronized with %s meshid ",
817                                     ether_sprintf(ni->ni_meshid));
818                                 ieee80211_print_essid(ni->ni_meshid,
819                                     ni->ni_meshidlen);
820                                 /* XXX MCS/HT */
821                                 printf(" channel %d\n",
822                                     ieee80211_chan2ieee(ic, ic->ic_curchan));
823                         }
824 #endif
825                         break;
826                 default:
827                         break;
828                 }
829                 ieee80211_node_authorize(ni);
830                 callout_reset(&ms->ms_cleantimer, ms->ms_ppath->mpp_inact,
831                     mesh_rt_cleanup_cb, vap);
832                 mesh_gatemode_setup(vap);
833                 break;
834         default:
835                 break;
836         }
837         /* NB: ostate not nstate */
838         ms->ms_ppath->mpp_newstate(vap, ostate, arg);
839         return 0;
840 }
841
842 static void
843 mesh_rt_cleanup_cb(void *arg)
844 {
845         struct ieee80211vap *vap = arg;
846         struct ieee80211_mesh_state *ms = vap->iv_mesh;
847
848         mesh_rt_flush_invalid(vap);
849         callout_reset(&ms->ms_cleantimer, ms->ms_ppath->mpp_inact,
850             mesh_rt_cleanup_cb, vap);
851 }
852
853 /*
854  * Mark a mesh STA as gate and return a pointer to it.
855  * If this is first time, we create a new gate route.
856  * Always update the path route to this mesh gate.
857  */
858 struct ieee80211_mesh_gate_route *
859 ieee80211_mesh_mark_gate(struct ieee80211vap *vap, const uint8_t *addr,
860     struct ieee80211_mesh_route *rt)
861 {
862         struct ieee80211_mesh_state *ms = vap->iv_mesh;
863         struct ieee80211_mesh_gate_route *gr = NULL, *next;
864         int found = 0;
865
866         MESH_RT_LOCK(ms);
867         TAILQ_FOREACH_SAFE(gr, &ms->ms_known_gates, gr_next, next) {
868                 if (IEEE80211_ADDR_EQ(gr->gr_addr, addr)) {
869                         found = 1;
870                         break;
871                 }
872         }
873
874         if (!found) {
875                 /* New mesh gate add it to known table. */
876                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, addr,
877                     "%s", "stored new gate information from pro-PREQ.");
878                 gr = IEEE80211_MALLOC(ALIGN(sizeof(struct ieee80211_mesh_gate_route)),
879                     M_80211_MESH_GT_RT,
880                     IEEE80211_M_NOWAIT | IEEE80211_M_ZERO);
881                 IEEE80211_ADDR_COPY(gr->gr_addr, addr);
882                 TAILQ_INSERT_TAIL(&ms->ms_known_gates, gr, gr_next);
883         }
884         gr->gr_route = rt;
885         /* TODO: link from path route to gate route */
886         MESH_RT_UNLOCK(ms);
887
888         return gr;
889 }
890
891
892 /*
893  * Helper function to note the Mesh Peer Link FSM change.
894  */
895 static void
896 mesh_linkchange(struct ieee80211_node *ni, enum ieee80211_mesh_mlstate state)
897 {
898         struct ieee80211vap *vap = ni->ni_vap;
899         struct ieee80211_mesh_state *ms = vap->iv_mesh;
900 #ifdef IEEE80211_DEBUG
901         static const char *meshlinkstates[] = {
902                 [IEEE80211_NODE_MESH_IDLE]              = "IDLE",
903                 [IEEE80211_NODE_MESH_OPENSNT]           = "OPEN SENT",
904                 [IEEE80211_NODE_MESH_OPENRCV]           = "OPEN RECEIVED",
905                 [IEEE80211_NODE_MESH_CONFIRMRCV]        = "CONFIRM RECEIVED",
906                 [IEEE80211_NODE_MESH_ESTABLISHED]       = "ESTABLISHED",
907                 [IEEE80211_NODE_MESH_HOLDING]           = "HOLDING"
908         };
909 #endif
910         IEEE80211_NOTE(vap, IEEE80211_MSG_MESH,
911             ni, "peer link: %s -> %s",
912             meshlinkstates[ni->ni_mlstate], meshlinkstates[state]);
913
914         /* track neighbor count */
915         if (state == IEEE80211_NODE_MESH_ESTABLISHED &&
916             ni->ni_mlstate != IEEE80211_NODE_MESH_ESTABLISHED) {
917                 KASSERT(ms->ms_neighbors < 65535, ("neighbor count overflow"));
918                 ms->ms_neighbors++;
919                 ieee80211_beacon_notify(vap, IEEE80211_BEACON_MESHCONF);
920         } else if (ni->ni_mlstate == IEEE80211_NODE_MESH_ESTABLISHED &&
921             state != IEEE80211_NODE_MESH_ESTABLISHED) {
922                 KASSERT(ms->ms_neighbors > 0, ("neighbor count 0"));
923                 ms->ms_neighbors--;
924                 ieee80211_beacon_notify(vap, IEEE80211_BEACON_MESHCONF);
925         }
926         ni->ni_mlstate = state;
927         switch (state) {
928         case IEEE80211_NODE_MESH_HOLDING:
929                 ms->ms_ppath->mpp_peerdown(ni);
930                 break;
931         case IEEE80211_NODE_MESH_ESTABLISHED:
932                 ieee80211_mesh_discover(vap, ni->ni_macaddr, NULL);
933                 break;
934         default:
935                 break;
936         }
937 }
938
939 /*
940  * Helper function to generate a unique local ID required for mesh
941  * peer establishment.
942  */
943 static void
944 mesh_checkid(void *arg, struct ieee80211_node *ni)
945 {
946         uint16_t *r = arg;
947         
948         if (*r == ni->ni_mllid)
949                 *(uint16_t *)arg = 0;
950 }
951
952 static uint32_t
953 mesh_generateid(struct ieee80211vap *vap)
954 {
955         int maxiter = 4;
956         uint16_t r;
957
958         do {
959                 get_random_bytes(&r, 2);
960                 ieee80211_iterate_nodes(&vap->iv_ic->ic_sta, mesh_checkid, &r);
961                 maxiter--;
962         } while (r == 0 && maxiter > 0);
963         return r;
964 }
965
966 /*
967  * Verifies if we already received this packet by checking its
968  * sequence number.
969  * Returns 0 if the frame is to be accepted, 1 otherwise.
970  */
971 static int
972 mesh_checkpseq(struct ieee80211vap *vap,
973     const uint8_t source[IEEE80211_ADDR_LEN], uint32_t seq)
974 {
975         struct ieee80211_mesh_route *rt;
976
977         rt = ieee80211_mesh_rt_find(vap, source);
978         if (rt == NULL) {
979                 rt = ieee80211_mesh_rt_add(vap, source);
980                 if (rt == NULL) {
981                         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, source,
982                             "%s", "add mcast route failed");
983                         vap->iv_stats.is_mesh_rtaddfailed++;
984                         return 1;
985                 }
986                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, source,
987                     "add mcast route, mesh seqno %d", seq);
988                 rt->rt_lastmseq = seq;
989                 return 0;
990         }
991         if (IEEE80211_MESH_SEQ_GEQ(rt->rt_lastmseq, seq)) {
992                 return 1;
993         } else {
994                 rt->rt_lastmseq = seq;
995                 return 0;
996         }
997 }
998
999 /*
1000  * Iterate the routing table and locate the next hop.
1001  */
1002 struct ieee80211_node *
1003 ieee80211_mesh_find_txnode(struct ieee80211vap *vap,
1004     const uint8_t dest[IEEE80211_ADDR_LEN])
1005 {
1006         struct ieee80211_mesh_route *rt;
1007
1008         rt = ieee80211_mesh_rt_find(vap, dest);
1009         if (rt == NULL)
1010                 return NULL;
1011         if ((rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) == 0) {
1012                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, dest,
1013                     "%s: !valid, flags 0x%x", __func__, rt->rt_flags);
1014                 /* XXX stat */
1015                 return NULL;
1016         }
1017         if (rt->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY) {
1018                 rt = ieee80211_mesh_rt_find(vap, rt->rt_mesh_gate);
1019                 if (rt == NULL) return NULL;
1020                 if ((rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) == 0) {
1021                         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, dest,
1022                             "%s: meshgate !valid, flags 0x%x", __func__,
1023                             rt->rt_flags);
1024                         /* XXX stat */
1025                         return NULL;
1026                 }
1027         }
1028         return ieee80211_find_txnode(vap, rt->rt_nexthop);
1029 }
1030
1031 static void
1032 mesh_transmit_to_gate(struct ieee80211vap *vap, struct mbuf *m,
1033     struct ieee80211_mesh_route *rt_gate)
1034 {
1035         struct ifnet *ifp = vap->iv_ifp;
1036         struct ieee80211_node *ni;
1037
1038         IEEE80211_TX_UNLOCK_ASSERT(vap->iv_ic);
1039
1040         ni = ieee80211_mesh_find_txnode(vap, rt_gate->rt_dest);
1041         if (ni == NULL) {
1042                 if_inc_counter(ifp, IFCOUNTER_OERRORS, 1);
1043                 m_freem(m);
1044                 return;
1045         }
1046
1047         /*
1048          * Send through the VAP packet transmit path.
1049          * This consumes the node ref grabbed above and
1050          * the mbuf, regardless of whether there's a problem
1051          * or not.
1052          */
1053         (void) ieee80211_vap_pkt_send_dest(vap, m, ni);
1054 }
1055
1056 /*
1057  * Forward the queued frames to known valid mesh gates.
1058  * Assume destination to be outside the MBSS (i.e. proxy entry),
1059  * If no valid mesh gates are known silently discard queued frames.
1060  * After transmitting frames to all known valid mesh gates, this route
1061  * will be marked invalid, and a new path discovery will happen in the hopes
1062  * that (at least) one of the mesh gates have a new proxy entry for us to use.
1063  */
1064 void
1065 ieee80211_mesh_forward_to_gates(struct ieee80211vap *vap,
1066     struct ieee80211_mesh_route *rt_dest)
1067 {
1068         struct ieee80211com *ic = vap->iv_ic;
1069         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1070         struct ieee80211_mesh_route *rt_gate;
1071         struct ieee80211_mesh_gate_route *gr = NULL, *gr_next;
1072         struct mbuf *m, *mcopy, *next;
1073
1074         IEEE80211_TX_UNLOCK_ASSERT(ic);
1075
1076         KASSERT( rt_dest->rt_flags == IEEE80211_MESHRT_FLAGS_DISCOVER,
1077             ("Route is not marked with IEEE80211_MESHRT_FLAGS_DISCOVER"));
1078
1079         /* XXX: send to more than one valid mash gate */
1080         MESH_RT_LOCK(ms);
1081
1082         m = ieee80211_ageq_remove(&ic->ic_stageq,
1083             (struct ieee80211_node *)(uintptr_t)
1084             ieee80211_mac_hash(ic, rt_dest->rt_dest));
1085
1086         TAILQ_FOREACH_SAFE(gr, &ms->ms_known_gates, gr_next, gr_next) {
1087                 rt_gate = gr->gr_route;
1088                 if (rt_gate == NULL) {
1089                         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_HWMP,
1090                                 rt_dest->rt_dest,
1091                                 "mesh gate with no path %6D",
1092                                 gr->gr_addr, ":");
1093                         continue;
1094                 }
1095                 if ((rt_gate->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) == 0)
1096                         continue;
1097                 KASSERT(rt_gate->rt_flags & IEEE80211_MESHRT_FLAGS_GATE,
1098                     ("route not marked as a mesh gate"));
1099                 KASSERT((rt_gate->rt_flags &
1100                         IEEE80211_MESHRT_FLAGS_PROXY) == 0,
1101                         ("found mesh gate that is also marked porxy"));
1102                 /*
1103                  * convert route to a proxy route gated by the current
1104                  * mesh gate, this is needed so encap can built data
1105                  * frame with correct address.
1106                  */
1107                 rt_dest->rt_flags = IEEE80211_MESHRT_FLAGS_PROXY |
1108                         IEEE80211_MESHRT_FLAGS_VALID;
1109                 rt_dest->rt_ext_seq = 1; /* random value */
1110                 IEEE80211_ADDR_COPY(rt_dest->rt_mesh_gate, rt_gate->rt_dest);
1111                 IEEE80211_ADDR_COPY(rt_dest->rt_nexthop, rt_gate->rt_nexthop);
1112                 rt_dest->rt_metric = rt_gate->rt_metric;
1113                 rt_dest->rt_nhops = rt_gate->rt_nhops;
1114                 ieee80211_mesh_rt_update(rt_dest, ms->ms_ppath->mpp_inact);
1115                 MESH_RT_UNLOCK(ms);
1116                 /* XXX: lock?? */
1117                 mcopy = m_dup(m, M_NOWAIT);
1118                 for (; mcopy != NULL; mcopy = next) {
1119                         next = mcopy->m_nextpkt;
1120                         mcopy->m_nextpkt = NULL;
1121                         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_HWMP,
1122                             rt_dest->rt_dest,
1123                             "flush queued frame %p len %d", mcopy,
1124                             mcopy->m_pkthdr.len);
1125                         mesh_transmit_to_gate(vap, mcopy, rt_gate);
1126                 }
1127                 MESH_RT_LOCK(ms);
1128         }
1129         rt_dest->rt_flags = 0; /* Mark invalid */
1130         m_freem(m);
1131         MESH_RT_UNLOCK(ms);
1132 }
1133
1134 /*
1135  * Forward the specified frame.
1136  * Decrement the TTL and set TA to our MAC address.
1137  */
1138 static void
1139 mesh_forward(struct ieee80211vap *vap, struct mbuf *m,
1140     const struct ieee80211_meshcntl *mc)
1141 {
1142         struct ieee80211com *ic = vap->iv_ic;
1143         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1144         struct ifnet *ifp = vap->iv_ifp;
1145         const struct ieee80211_frame *wh =
1146             mtod(m, const struct ieee80211_frame *);
1147         struct mbuf *mcopy;
1148         struct ieee80211_meshcntl *mccopy;
1149         struct ieee80211_frame *whcopy;
1150         struct ieee80211_node *ni;
1151         int err;
1152
1153         /* This is called from the RX path - don't hold this lock */
1154         IEEE80211_TX_UNLOCK_ASSERT(ic);
1155
1156         /*
1157          * mesh ttl of 1 means we are the last one receiving it,
1158          * according to amendment we decrement and then check if
1159          * 0, if so we dont forward.
1160          */
1161         if (mc->mc_ttl < 1) {
1162                 IEEE80211_NOTE_FRAME(vap, IEEE80211_MSG_MESH, wh,
1163                     "%s", "frame not fwd'd, ttl 1");
1164                 vap->iv_stats.is_mesh_fwd_ttl++;
1165                 return;
1166         }
1167         if (!(ms->ms_flags & IEEE80211_MESHFLAGS_FWD)) {
1168                 IEEE80211_NOTE_FRAME(vap, IEEE80211_MSG_MESH, wh,
1169                     "%s", "frame not fwd'd, fwding disabled");
1170                 vap->iv_stats.is_mesh_fwd_disabled++;
1171                 return;
1172         }
1173         mcopy = m_dup(m, M_NOWAIT);
1174         if (mcopy == NULL) {
1175                 IEEE80211_NOTE_FRAME(vap, IEEE80211_MSG_MESH, wh,
1176                     "%s", "frame not fwd'd, cannot dup");
1177                 vap->iv_stats.is_mesh_fwd_nobuf++;
1178                 if_inc_counter(ifp, IFCOUNTER_OERRORS, 1);
1179                 return;
1180         }
1181         mcopy = m_pullup(mcopy, ieee80211_hdrspace(ic, wh) +
1182             sizeof(struct ieee80211_meshcntl));
1183         if (mcopy == NULL) {
1184                 IEEE80211_NOTE_FRAME(vap, IEEE80211_MSG_MESH, wh,
1185                     "%s", "frame not fwd'd, too short");
1186                 vap->iv_stats.is_mesh_fwd_tooshort++;
1187                 if_inc_counter(ifp, IFCOUNTER_OERRORS, 1);
1188                 m_freem(mcopy);
1189                 return;
1190         }
1191         whcopy = mtod(mcopy, struct ieee80211_frame *);
1192         mccopy = (struct ieee80211_meshcntl *)
1193             (mtod(mcopy, uint8_t *) + ieee80211_hdrspace(ic, wh));
1194         /* XXX clear other bits? */
1195         whcopy->i_fc[1] &= ~IEEE80211_FC1_RETRY;
1196         IEEE80211_ADDR_COPY(whcopy->i_addr2, vap->iv_myaddr);
1197         if (IEEE80211_IS_MULTICAST(wh->i_addr1)) {
1198                 ni = ieee80211_ref_node(vap->iv_bss);
1199                 mcopy->m_flags |= M_MCAST;
1200         } else {
1201                 ni = ieee80211_mesh_find_txnode(vap, whcopy->i_addr3);
1202                 if (ni == NULL) {
1203                         /*
1204                          * [Optional] any of the following three actions:
1205                          * o silently discard
1206                          * o trigger a path discovery
1207                          * o inform TA that meshDA is unknown.
1208                          */
1209                         IEEE80211_NOTE_FRAME(vap, IEEE80211_MSG_MESH, wh,
1210                             "%s", "frame not fwd'd, no path");
1211                         ms->ms_ppath->mpp_senderror(vap, whcopy->i_addr3, NULL,
1212                             IEEE80211_REASON_MESH_PERR_NO_FI);
1213                         vap->iv_stats.is_mesh_fwd_nopath++;
1214                         m_freem(mcopy);
1215                         return;
1216                 }
1217                 IEEE80211_ADDR_COPY(whcopy->i_addr1, ni->ni_macaddr);
1218         }
1219         KASSERT(mccopy->mc_ttl > 0, ("%s called with wrong ttl", __func__));
1220         mccopy->mc_ttl--;
1221
1222         /* XXX calculate priority so drivers can find the tx queue */
1223         M_WME_SETAC(mcopy, WME_AC_BE);
1224
1225         /* XXX do we know m_nextpkt is NULL? */
1226         mcopy->m_pkthdr.rcvif = (void *) ni;
1227
1228         /*
1229          * XXX this bypasses all of the VAP TX handling; it passes frames
1230          * directly to the parent interface.
1231          *
1232          * Because of this, there's no TX lock being held as there's no
1233          * encaps state being used.
1234          *
1235          * Doing a direct parent transmit may not be the correct thing
1236          * to do here; we'll have to re-think this soon.
1237          */
1238         IEEE80211_TX_LOCK(ic);
1239         err = ieee80211_parent_xmitpkt(ic, mcopy);
1240         IEEE80211_TX_UNLOCK(ic);
1241         if (!err)
1242                 if_inc_counter(ifp, IFCOUNTER_OPACKETS, 1);
1243 }
1244
1245 static struct mbuf *
1246 mesh_decap(struct ieee80211vap *vap, struct mbuf *m, int hdrlen, int meshdrlen)
1247 {
1248 #define WHDIR(wh)       ((wh)->i_fc[1] & IEEE80211_FC1_DIR_MASK)
1249 #define MC01(mc)        ((const struct ieee80211_meshcntl_ae01 *)mc)
1250         uint8_t b[sizeof(struct ieee80211_qosframe_addr4) +
1251                   sizeof(struct ieee80211_meshcntl_ae10)];
1252         const struct ieee80211_qosframe_addr4 *wh;
1253         const struct ieee80211_meshcntl_ae10 *mc;
1254         struct ether_header *eh;
1255         struct llc *llc;
1256         int ae;
1257
1258         if (m->m_len < hdrlen + sizeof(*llc) &&
1259             (m = m_pullup(m, hdrlen + sizeof(*llc))) == NULL) {
1260                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_ANY,
1261                     "discard data frame: %s", "m_pullup failed");
1262                 vap->iv_stats.is_rx_tooshort++;
1263                 return NULL;
1264         }
1265         memcpy(b, mtod(m, caddr_t), hdrlen);
1266         wh = (const struct ieee80211_qosframe_addr4 *)&b[0];
1267         mc = (const struct ieee80211_meshcntl_ae10 *)&b[hdrlen - meshdrlen];
1268         KASSERT(WHDIR(wh) == IEEE80211_FC1_DIR_FROMDS ||
1269                 WHDIR(wh) == IEEE80211_FC1_DIR_DSTODS,
1270             ("bogus dir, fc 0x%x:0x%x", wh->i_fc[0], wh->i_fc[1]));
1271
1272         llc = (struct llc *)(mtod(m, caddr_t) + hdrlen);
1273         if (llc->llc_dsap == LLC_SNAP_LSAP && llc->llc_ssap == LLC_SNAP_LSAP &&
1274             llc->llc_control == LLC_UI && llc->llc_snap.org_code[0] == 0 &&
1275             llc->llc_snap.org_code[1] == 0 && llc->llc_snap.org_code[2] == 0 &&
1276             /* NB: preserve AppleTalk frames that have a native SNAP hdr */
1277             !(llc->llc_snap.ether_type == htons(ETHERTYPE_AARP) ||
1278               llc->llc_snap.ether_type == htons(ETHERTYPE_IPX))) {
1279                 m_adj(m, hdrlen + sizeof(struct llc) - sizeof(*eh));
1280                 llc = NULL;
1281         } else {
1282                 m_adj(m, hdrlen - sizeof(*eh));
1283         }
1284         eh = mtod(m, struct ether_header *);
1285         ae = mc->mc_flags & IEEE80211_MESH_AE_MASK;
1286         if (WHDIR(wh) == IEEE80211_FC1_DIR_FROMDS) {
1287                 IEEE80211_ADDR_COPY(eh->ether_dhost, wh->i_addr1);
1288                 if (ae == IEEE80211_MESH_AE_00) {
1289                         IEEE80211_ADDR_COPY(eh->ether_shost, wh->i_addr3);
1290                 } else if (ae == IEEE80211_MESH_AE_01) {
1291                         IEEE80211_ADDR_COPY(eh->ether_shost,
1292                             MC01(mc)->mc_addr4);
1293                 } else {
1294                         IEEE80211_DISCARD(vap, IEEE80211_MSG_ANY,
1295                             (const struct ieee80211_frame *)wh, NULL,
1296                             "bad AE %d", ae);
1297                         vap->iv_stats.is_mesh_badae++;
1298                         m_freem(m);
1299                         return NULL;
1300                 }
1301         } else {
1302                 if (ae == IEEE80211_MESH_AE_00) {
1303                         IEEE80211_ADDR_COPY(eh->ether_dhost, wh->i_addr3);
1304                         IEEE80211_ADDR_COPY(eh->ether_shost, wh->i_addr4);
1305                 } else if (ae == IEEE80211_MESH_AE_10) {
1306                         IEEE80211_ADDR_COPY(eh->ether_dhost, mc->mc_addr5);
1307                         IEEE80211_ADDR_COPY(eh->ether_shost, mc->mc_addr6);
1308                 } else {
1309                         IEEE80211_DISCARD(vap, IEEE80211_MSG_ANY,
1310                             (const struct ieee80211_frame *)wh, NULL,
1311                             "bad AE %d", ae);
1312                         vap->iv_stats.is_mesh_badae++;
1313                         m_freem(m);
1314                         return NULL;
1315                 }
1316         }
1317 #ifndef __NO_STRICT_ALIGNMENT
1318         if (!ALIGNED_POINTER(mtod(m, caddr_t) + sizeof(*eh), uint32_t)) {
1319                 m = ieee80211_realign(vap, m, sizeof(*eh));
1320                 if (m == NULL)
1321                         return NULL;
1322         }
1323 #endif /* !__NO_STRICT_ALIGNMENT */
1324         if (llc != NULL) {
1325                 eh = mtod(m, struct ether_header *);
1326                 eh->ether_type = htons(m->m_pkthdr.len - sizeof(*eh));
1327         }
1328         return m;
1329 #undef  WDIR
1330 #undef  MC01
1331 }
1332
1333 /*
1334  * Return non-zero if the unicast mesh data frame should be processed
1335  * locally.  Frames that are not proxy'd have our address, otherwise
1336  * we need to consult the routing table to look for a proxy entry.
1337  */
1338 static __inline int
1339 mesh_isucastforme(struct ieee80211vap *vap, const struct ieee80211_frame *wh,
1340     const struct ieee80211_meshcntl *mc)
1341 {
1342         int ae = mc->mc_flags & 3;
1343
1344         KASSERT((wh->i_fc[1] & IEEE80211_FC1_DIR_MASK) == IEEE80211_FC1_DIR_DSTODS,
1345             ("bad dir 0x%x:0x%x", wh->i_fc[0], wh->i_fc[1]));
1346         KASSERT(ae == IEEE80211_MESH_AE_00 || ae == IEEE80211_MESH_AE_10,
1347             ("bad AE %d", ae));
1348         if (ae == IEEE80211_MESH_AE_10) {       /* ucast w/ proxy */
1349                 const struct ieee80211_meshcntl_ae10 *mc10 =
1350                     (const struct ieee80211_meshcntl_ae10 *) mc;
1351                 struct ieee80211_mesh_route *rt =
1352                     ieee80211_mesh_rt_find(vap, mc10->mc_addr5);
1353                 /* check for proxy route to ourself */
1354                 return (rt != NULL &&
1355                     (rt->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY));
1356         } else                                  /* ucast w/o proxy */
1357                 return IEEE80211_ADDR_EQ(wh->i_addr3, vap->iv_myaddr);
1358 }
1359
1360 /*
1361  * Verifies transmitter, updates lifetime, precursor list and forwards data.
1362  * > 0 means we have forwarded data and no need to process locally
1363  * == 0 means we want to process locally (and we may have forwarded data
1364  * < 0 means there was an error and data should be discarded
1365  */
1366 static int
1367 mesh_recv_indiv_data_to_fwrd(struct ieee80211vap *vap, struct mbuf *m,
1368     struct ieee80211_frame *wh, const struct ieee80211_meshcntl *mc)
1369 {
1370         struct ieee80211_qosframe_addr4 *qwh;
1371         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1372         struct ieee80211_mesh_route *rt_meshda, *rt_meshsa;
1373
1374         /* This is called from the RX path - don't hold this lock */
1375         IEEE80211_TX_UNLOCK_ASSERT(vap->iv_ic);
1376
1377         qwh = (struct ieee80211_qosframe_addr4 *)wh;
1378
1379         /*
1380          * TODO:
1381          * o verify addr2 is  a legitimate transmitter
1382          * o lifetime of precursor of addr3 (addr2) is max(init, curr)
1383          * o lifetime of precursor of addr4 (nexthop) is max(init, curr)
1384          */
1385
1386         /* set lifetime of addr3 (meshDA) to initial value */
1387         rt_meshda = ieee80211_mesh_rt_find(vap, qwh->i_addr3);
1388         if (rt_meshda == NULL) {
1389                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, qwh->i_addr2,
1390                     "no route to meshDA(%6D)", qwh->i_addr3, ":");
1391                 /*
1392                  * [Optional] any of the following three actions:
1393                  * o silently discard                           [X]
1394                  * o trigger a path discovery                   [ ]
1395                  * o inform TA that meshDA is unknown.          [ ]
1396                  */
1397                 /* XXX: stats */
1398                 return (-1);
1399         }
1400
1401         ieee80211_mesh_rt_update(rt_meshda, ticks_to_msecs(
1402             ms->ms_ppath->mpp_inact));
1403
1404         /* set lifetime of addr4 (meshSA) to initial value */
1405         rt_meshsa = ieee80211_mesh_rt_find(vap, qwh->i_addr4);
1406         KASSERT(rt_meshsa != NULL, ("no route"));
1407         ieee80211_mesh_rt_update(rt_meshsa, ticks_to_msecs(
1408             ms->ms_ppath->mpp_inact));
1409
1410         mesh_forward(vap, m, mc);
1411         return (1); /* dont process locally */
1412 }
1413
1414 /*
1415  * Verifies transmitter, updates lifetime, precursor list and process data
1416  * locally, if data is proxy with AE = 10 it could mean data should go
1417  * on another mesh path or data should be forwarded to the DS.
1418  *
1419  * > 0 means we have forwarded data and no need to process locally
1420  * == 0 means we want to process locally (and we may have forwarded data
1421  * < 0 means there was an error and data should be discarded
1422  */
1423 static int
1424 mesh_recv_indiv_data_to_me(struct ieee80211vap *vap, struct mbuf *m,
1425     struct ieee80211_frame *wh, const struct ieee80211_meshcntl *mc)
1426 {
1427         struct ieee80211_qosframe_addr4 *qwh;
1428         const struct ieee80211_meshcntl_ae10 *mc10;
1429         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1430         struct ieee80211_mesh_route *rt;
1431         int ae;
1432
1433         /* This is called from the RX path - don't hold this lock */
1434         IEEE80211_TX_UNLOCK_ASSERT(vap->iv_ic);
1435
1436         qwh = (struct ieee80211_qosframe_addr4 *)wh;
1437         mc10 = (const struct ieee80211_meshcntl_ae10 *)mc;
1438
1439         /*
1440          * TODO:
1441          * o verify addr2 is  a legitimate transmitter
1442          * o lifetime of precursor entry is max(init, curr)
1443          */
1444
1445         /* set lifetime of addr4 (meshSA) to initial value */
1446         rt = ieee80211_mesh_rt_find(vap, qwh->i_addr4);
1447         KASSERT(rt != NULL, ("no route"));
1448         ieee80211_mesh_rt_update(rt, ticks_to_msecs(ms->ms_ppath->mpp_inact));
1449         rt = NULL;
1450
1451         ae = mc10->mc_flags & IEEE80211_MESH_AE_MASK;
1452         KASSERT(ae == IEEE80211_MESH_AE_00 ||
1453             ae == IEEE80211_MESH_AE_10, ("bad AE %d", ae));
1454         if (ae == IEEE80211_MESH_AE_10) {
1455                 if (IEEE80211_ADDR_EQ(mc10->mc_addr5, qwh->i_addr3)) {
1456                         return (0); /* process locally */
1457                 }
1458
1459                 rt =  ieee80211_mesh_rt_find(vap, mc10->mc_addr5);
1460                 if (rt != NULL &&
1461                     (rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) &&
1462                     (rt->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY) == 0) {
1463                         /*
1464                          * Forward on another mesh-path, according to
1465                          * amendment as specified in 9.32.4.1
1466                          */
1467                         IEEE80211_ADDR_COPY(qwh->i_addr3, mc10->mc_addr5);
1468                         mesh_forward(vap, m,
1469                             (const struct ieee80211_meshcntl *)mc10);
1470                         return (1); /* dont process locally */
1471                 }
1472                 /*
1473                  * All other cases: forward of MSDUs from the MBSS to DS indiv.
1474                  * addressed according to 13.11.3.2.
1475                  */
1476                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_OUTPUT, qwh->i_addr2,
1477                     "forward frame to DS, SA(%6D) DA(%6D)",
1478                     mc10->mc_addr6, ":", mc10->mc_addr5, ":");
1479         }
1480         return (0); /* process locally */
1481 }
1482
1483 /*
1484  * Try to forward the group addressed data on to other mesh STAs, and
1485  * also to the DS.
1486  *
1487  * > 0 means we have forwarded data and no need to process locally
1488  * == 0 means we want to process locally (and we may have forwarded data
1489  * < 0 means there was an error and data should be discarded
1490  */
1491 static int
1492 mesh_recv_group_data(struct ieee80211vap *vap, struct mbuf *m,
1493     struct ieee80211_frame *wh, const struct ieee80211_meshcntl *mc)
1494 {
1495 #define MC01(mc)        ((const struct ieee80211_meshcntl_ae01 *)mc)
1496         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1497
1498         /* This is called from the RX path - don't hold this lock */
1499         IEEE80211_TX_UNLOCK_ASSERT(vap->iv_ic);
1500
1501         mesh_forward(vap, m, mc);
1502
1503         if(mc->mc_ttl > 0) {
1504                 if (mc->mc_flags & IEEE80211_MESH_AE_01) {
1505                         /*
1506                          * Forward of MSDUs from the MBSS to DS group addressed
1507                          * (according to 13.11.3.2)
1508                          * This happens by delivering the packet, and a bridge
1509                          * will sent it on another port member.
1510                          */
1511                         if (ms->ms_flags & IEEE80211_MESHFLAGS_GATE &&
1512                             ms->ms_flags & IEEE80211_MESHFLAGS_FWD) {
1513                                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH,
1514                                     MC01(mc)->mc_addr4, "%s",
1515                                     "forward from MBSS to the DS");
1516                         }
1517                 }
1518         }
1519         return (0); /* process locally */
1520 #undef  MC01
1521 }
1522
1523 static int
1524 mesh_input(struct ieee80211_node *ni, struct mbuf *m,
1525     const struct ieee80211_rx_stats *rxs, int rssi, int nf)
1526 {
1527 #define HAS_SEQ(type)   ((type & 0x4) == 0)
1528 #define MC01(mc)        ((const struct ieee80211_meshcntl_ae01 *)mc)
1529         struct ieee80211vap *vap = ni->ni_vap;
1530         struct ieee80211com *ic = ni->ni_ic;
1531         struct ifnet *ifp = vap->iv_ifp;
1532         struct ieee80211_frame *wh;
1533         const struct ieee80211_meshcntl *mc;
1534         int hdrspace, meshdrlen, need_tap, error;
1535         uint8_t dir, type, subtype, ae;
1536         uint32_t seq;
1537         const uint8_t *addr;
1538         uint8_t qos[2];
1539
1540         KASSERT(ni != NULL, ("null node"));
1541         ni->ni_inact = ni->ni_inact_reload;
1542
1543         need_tap = 1;                   /* mbuf need to be tapped. */
1544         type = -1;                      /* undefined */
1545
1546         /* This is called from the RX path - don't hold this lock */
1547         IEEE80211_TX_UNLOCK_ASSERT(ic);
1548
1549         if (m->m_pkthdr.len < sizeof(struct ieee80211_frame_min)) {
1550                 IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
1551                     ni->ni_macaddr, NULL,
1552                     "too short (1): len %u", m->m_pkthdr.len);
1553                 vap->iv_stats.is_rx_tooshort++;
1554                 goto out;
1555         }
1556         /*
1557          * Bit of a cheat here, we use a pointer for a 3-address
1558          * frame format but don't reference fields past outside
1559          * ieee80211_frame_min w/o first validating the data is
1560          * present.
1561         */
1562         wh = mtod(m, struct ieee80211_frame *);
1563
1564         if ((wh->i_fc[0] & IEEE80211_FC0_VERSION_MASK) !=
1565             IEEE80211_FC0_VERSION_0) {
1566                 IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
1567                     ni->ni_macaddr, NULL, "wrong version %x", wh->i_fc[0]);
1568                 vap->iv_stats.is_rx_badversion++;
1569                 goto err;
1570         }
1571         dir = wh->i_fc[1] & IEEE80211_FC1_DIR_MASK;
1572         type = wh->i_fc[0] & IEEE80211_FC0_TYPE_MASK;
1573         subtype = wh->i_fc[0] & IEEE80211_FC0_SUBTYPE_MASK;
1574         if ((ic->ic_flags & IEEE80211_F_SCAN) == 0) {
1575                 IEEE80211_RSSI_LPF(ni->ni_avgrssi, rssi);
1576                 ni->ni_noise = nf;
1577                 if (HAS_SEQ(type)) {
1578                         uint8_t tid = ieee80211_gettid(wh);
1579
1580                         if (IEEE80211_QOS_HAS_SEQ(wh) &&
1581                             TID_TO_WME_AC(tid) >= WME_AC_VI)
1582                                 ic->ic_wme.wme_hipri_traffic++;
1583                         if (! ieee80211_check_rxseq(ni, wh, wh->i_addr1))
1584                                 goto out;
1585                 }
1586         }
1587 #ifdef IEEE80211_DEBUG
1588         /*
1589          * It's easier, but too expensive, to simulate different mesh
1590          * topologies by consulting the ACL policy very early, so do this
1591          * only under DEBUG.
1592          *
1593          * NB: this check is also done upon peering link initiation.
1594          */
1595         if (vap->iv_acl != NULL && !vap->iv_acl->iac_check(vap, wh)) {
1596                 IEEE80211_DISCARD(vap, IEEE80211_MSG_ACL,
1597                     wh, NULL, "%s", "disallowed by ACL");
1598                 vap->iv_stats.is_rx_acl++;
1599                 goto out;
1600         }
1601 #endif
1602         switch (type) {
1603         case IEEE80211_FC0_TYPE_DATA:
1604                 if (ni == vap->iv_bss)
1605                         goto out;
1606                 if (ni->ni_mlstate != IEEE80211_NODE_MESH_ESTABLISHED) {
1607                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_MESH,
1608                             ni->ni_macaddr, NULL,
1609                             "peer link not yet established (%d)",
1610                             ni->ni_mlstate);
1611                         vap->iv_stats.is_mesh_nolink++;
1612                         goto out;
1613                 }
1614                 if (dir != IEEE80211_FC1_DIR_FROMDS &&
1615                     dir != IEEE80211_FC1_DIR_DSTODS) {
1616                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1617                             wh, "data", "incorrect dir 0x%x", dir);
1618                         vap->iv_stats.is_rx_wrongdir++;
1619                         goto err;
1620                 }
1621
1622                 /* All Mesh data frames are QoS subtype */
1623                 if (!HAS_SEQ(type)) {
1624                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1625                             wh, "data", "incorrect subtype 0x%x", subtype);
1626                         vap->iv_stats.is_rx_badsubtype++;
1627                         goto err;
1628                 }
1629
1630                 /*
1631                  * Next up, any fragmentation.
1632                  * XXX: we defrag before we even try to forward,
1633                  * Mesh Control field is not present in sub-sequent
1634                  * fragmented frames. This is in contrast to Draft 4.0.
1635                  */
1636                 hdrspace = ieee80211_hdrspace(ic, wh);
1637                 if (!IEEE80211_IS_MULTICAST(wh->i_addr1)) {
1638                         m = ieee80211_defrag(ni, m, hdrspace);
1639                         if (m == NULL) {
1640                                 /* Fragment dropped or frame not complete yet */
1641                                 goto out;
1642                         }
1643                 }
1644                 wh = mtod(m, struct ieee80211_frame *); /* NB: after defrag */
1645
1646                 /*
1647                  * Now we have a complete Mesh Data frame.
1648                  */
1649
1650                 /*
1651                  * Only fromDStoDS data frames use 4 address qos frames
1652                  * as specified in amendment. Otherwise addr4 is located
1653                  * in the Mesh Control field and a 3 address qos frame
1654                  * is used.
1655                  */
1656                 if (IEEE80211_IS_DSTODS(wh))
1657                         *(uint16_t *)qos = *(uint16_t *)
1658                             ((struct ieee80211_qosframe_addr4 *)wh)->i_qos;
1659                 else
1660                         *(uint16_t *)qos = *(uint16_t *)
1661                             ((struct ieee80211_qosframe *)wh)->i_qos;
1662
1663                 /*
1664                  * NB: The mesh STA sets the Mesh Control Present
1665                  * subfield to 1 in the Mesh Data frame containing
1666                  * an unfragmented MSDU, an A-MSDU, or the first
1667                  * fragment of an MSDU.
1668                  * After defrag it should always be present.
1669                  */
1670                 if (!(qos[1] & IEEE80211_QOS_MC)) {
1671                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_MESH,
1672                             ni->ni_macaddr, NULL,
1673                             "%s", "Mesh control field not present");
1674                         vap->iv_stats.is_rx_elem_missing++; /* XXX: kinda */
1675                         goto err;
1676                 }
1677
1678                 /* pull up enough to get to the mesh control */
1679                 if (m->m_len < hdrspace + sizeof(struct ieee80211_meshcntl) &&
1680                     (m = m_pullup(m, hdrspace +
1681                         sizeof(struct ieee80211_meshcntl))) == NULL) {
1682                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
1683                             ni->ni_macaddr, NULL,
1684                             "data too short: expecting %u", hdrspace);
1685                         vap->iv_stats.is_rx_tooshort++;
1686                         goto out;               /* XXX */
1687                 }
1688                 /*
1689                  * Now calculate the full extent of the headers. Note
1690                  * mesh_decap will pull up anything we didn't get
1691                  * above when it strips the 802.11 headers.
1692                  */
1693                 mc = (const struct ieee80211_meshcntl *)
1694                     (mtod(m, const uint8_t *) + hdrspace);
1695                 ae = mc->mc_flags & IEEE80211_MESH_AE_MASK;
1696                 meshdrlen = sizeof(struct ieee80211_meshcntl) +
1697                     ae * IEEE80211_ADDR_LEN;
1698                 hdrspace += meshdrlen;
1699
1700                 /* pull complete hdrspace = ieee80211_hdrspace + meshcontrol */
1701                 if ((meshdrlen > sizeof(struct ieee80211_meshcntl)) &&
1702                     (m->m_len < hdrspace) &&
1703                     ((m = m_pullup(m, hdrspace)) == NULL)) {
1704                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
1705                             ni->ni_macaddr, NULL,
1706                             "data too short: expecting %u", hdrspace);
1707                         vap->iv_stats.is_rx_tooshort++;
1708                         goto out;               /* XXX */
1709                 }
1710                 /* XXX: are we sure there is no reallocating after m_pullup? */
1711
1712                 seq = le32dec(mc->mc_seq);
1713                 if (IEEE80211_IS_MULTICAST(wh->i_addr1))
1714                         addr = wh->i_addr3;
1715                 else if (ae == IEEE80211_MESH_AE_01)
1716                         addr = MC01(mc)->mc_addr4;
1717                 else
1718                         addr = ((struct ieee80211_qosframe_addr4 *)wh)->i_addr4;
1719                 if (IEEE80211_ADDR_EQ(vap->iv_myaddr, addr)) {
1720                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_INPUT,
1721                             addr, "data", "%s", "not to me");
1722                         vap->iv_stats.is_rx_wrongbss++; /* XXX kinda */
1723                         goto out;
1724                 }
1725                 if (mesh_checkpseq(vap, addr, seq) != 0) {
1726                         vap->iv_stats.is_rx_dup++;
1727                         goto out;
1728                 }
1729
1730                 /* This code "routes" the frame to the right control path */
1731                 if (!IEEE80211_IS_MULTICAST(wh->i_addr1)) {
1732                         if (IEEE80211_ADDR_EQ(vap->iv_myaddr, wh->i_addr3))
1733                                 error =
1734                                     mesh_recv_indiv_data_to_me(vap, m, wh, mc);
1735                         else if (IEEE80211_IS_MULTICAST(wh->i_addr3))
1736                                 error = mesh_recv_group_data(vap, m, wh, mc);
1737                         else
1738                                 error = mesh_recv_indiv_data_to_fwrd(vap, m,
1739                                     wh, mc);
1740                 } else
1741                         error = mesh_recv_group_data(vap, m, wh, mc);
1742                 if (error < 0)
1743                         goto err;
1744                 else if (error > 0)
1745                         goto out;
1746
1747                 if (ieee80211_radiotap_active_vap(vap))
1748                         ieee80211_radiotap_rx(vap, m);
1749                 need_tap = 0;
1750
1751                 /*
1752                  * Finally, strip the 802.11 header.
1753                  */
1754                 m = mesh_decap(vap, m, hdrspace, meshdrlen);
1755                 if (m == NULL) {
1756                         /* XXX mask bit to check for both */
1757                         /* don't count Null data frames as errors */
1758                         if (subtype == IEEE80211_FC0_SUBTYPE_NODATA ||
1759                             subtype == IEEE80211_FC0_SUBTYPE_QOS_NULL)
1760                                 goto out;
1761                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_INPUT,
1762                             ni->ni_macaddr, "data", "%s", "decap error");
1763                         vap->iv_stats.is_rx_decap++;
1764                         IEEE80211_NODE_STAT(ni, rx_decap);
1765                         goto err;
1766                 }
1767                 if (qos[0] & IEEE80211_QOS_AMSDU) {
1768                         m = ieee80211_decap_amsdu(ni, m);
1769                         if (m == NULL)
1770                                 return IEEE80211_FC0_TYPE_DATA;
1771                 }
1772                 ieee80211_deliver_data(vap, ni, m);
1773                 return type;
1774         case IEEE80211_FC0_TYPE_MGT:
1775                 vap->iv_stats.is_rx_mgmt++;
1776                 IEEE80211_NODE_STAT(ni, rx_mgmt);
1777                 if (dir != IEEE80211_FC1_DIR_NODS) {
1778                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1779                             wh, "mgt", "incorrect dir 0x%x", dir);
1780                         vap->iv_stats.is_rx_wrongdir++;
1781                         goto err;
1782                 }
1783                 if (m->m_pkthdr.len < sizeof(struct ieee80211_frame)) {
1784                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
1785                             ni->ni_macaddr, "mgt", "too short: len %u",
1786                             m->m_pkthdr.len);
1787                         vap->iv_stats.is_rx_tooshort++;
1788                         goto out;
1789                 }
1790 #ifdef IEEE80211_DEBUG
1791                 if ((ieee80211_msg_debug(vap) && 
1792                     (vap->iv_ic->ic_flags & IEEE80211_F_SCAN)) ||
1793                     ieee80211_msg_dumppkts(vap)) {
1794                         if_printf(ifp, "received %s from %s rssi %d\n",
1795                             ieee80211_mgt_subtype_name(subtype),
1796                             ether_sprintf(wh->i_addr2), rssi);
1797                 }
1798 #endif
1799                 if (wh->i_fc[1] & IEEE80211_FC1_PROTECTED) {
1800                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1801                             wh, NULL, "%s", "WEP set but not permitted");
1802                         vap->iv_stats.is_rx_mgtdiscard++; /* XXX */
1803                         goto out;
1804                 }
1805                 vap->iv_recv_mgmt(ni, m, subtype, rxs, rssi, nf);
1806                 goto out;
1807         case IEEE80211_FC0_TYPE_CTL:
1808                 vap->iv_stats.is_rx_ctl++;
1809                 IEEE80211_NODE_STAT(ni, rx_ctrl);
1810                 goto out;
1811         default:
1812                 IEEE80211_DISCARD(vap, IEEE80211_MSG_ANY,
1813                     wh, "bad", "frame type 0x%x", type);
1814                 /* should not come here */
1815                 break;
1816         }
1817 err:
1818         if_inc_counter(ifp, IFCOUNTER_IERRORS, 1);
1819 out:
1820         if (m != NULL) {
1821                 if (need_tap && ieee80211_radiotap_active_vap(vap))
1822                         ieee80211_radiotap_rx(vap, m);
1823                 m_freem(m);
1824         }
1825         return type;
1826 #undef  HAS_SEQ
1827 #undef  MC01
1828 }
1829
1830 static void
1831 mesh_recv_mgmt(struct ieee80211_node *ni, struct mbuf *m0, int subtype,
1832     const struct ieee80211_rx_stats *rxs, int rssi, int nf)
1833 {
1834         struct ieee80211vap *vap = ni->ni_vap;
1835         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1836         struct ieee80211com *ic = ni->ni_ic;
1837         struct ieee80211_channel *rxchan = ic->ic_curchan;
1838         struct ieee80211_frame *wh;
1839         struct ieee80211_mesh_route *rt;
1840         uint8_t *frm, *efrm;
1841
1842         wh = mtod(m0, struct ieee80211_frame *);
1843         frm = (uint8_t *)&wh[1];
1844         efrm = mtod(m0, uint8_t *) + m0->m_len;
1845         switch (subtype) {
1846         case IEEE80211_FC0_SUBTYPE_PROBE_RESP:
1847         case IEEE80211_FC0_SUBTYPE_BEACON:
1848         {
1849                 struct ieee80211_scanparams scan;
1850                 struct ieee80211_channel *c;
1851                 /*
1852                  * We process beacon/probe response
1853                  * frames to discover neighbors.
1854                  */
1855                 if (rxs != NULL) {
1856                         c = ieee80211_lookup_channel_rxstatus(vap, rxs);
1857                         if (c != NULL)
1858                                 rxchan = c;
1859                 }
1860                 if (ieee80211_parse_beacon(ni, m0, rxchan, &scan) != 0)
1861                         return;
1862                 /*
1863                  * Count frame now that we know it's to be processed.
1864                  */
1865                 if (subtype == IEEE80211_FC0_SUBTYPE_BEACON) {
1866                         vap->iv_stats.is_rx_beacon++;   /* XXX remove */
1867                         IEEE80211_NODE_STAT(ni, rx_beacons);
1868                 } else
1869                         IEEE80211_NODE_STAT(ni, rx_proberesp);
1870                 /*
1871                  * If scanning, just pass information to the scan module.
1872                  */
1873                 if (ic->ic_flags & IEEE80211_F_SCAN) {
1874                         if (ic->ic_flags_ext & IEEE80211_FEXT_PROBECHAN) {
1875                                 /*
1876                                  * Actively scanning a channel marked passive;
1877                                  * send a probe request now that we know there
1878                                  * is 802.11 traffic present.
1879                                  *
1880                                  * XXX check if the beacon we recv'd gives
1881                                  * us what we need and suppress the probe req
1882                                  */
1883                                 ieee80211_probe_curchan(vap, 1);
1884                                 ic->ic_flags_ext &= ~IEEE80211_FEXT_PROBECHAN;
1885                         }
1886                         ieee80211_add_scan(vap, rxchan, &scan, wh,
1887                             subtype, rssi, nf);
1888                         return;
1889                 }
1890
1891                 /* The rest of this code assumes we are running */
1892                 if (vap->iv_state != IEEE80211_S_RUN)
1893                         return;
1894                 /*
1895                  * Ignore non-mesh STAs.
1896                  */
1897                 if ((scan.capinfo &
1898                      (IEEE80211_CAPINFO_ESS|IEEE80211_CAPINFO_IBSS)) ||
1899                     scan.meshid == NULL || scan.meshconf == NULL) {
1900                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1901                             wh, "beacon", "%s", "not a mesh sta");
1902                         vap->iv_stats.is_mesh_wrongmesh++;
1903                         return;
1904                 }
1905                 /*
1906                  * Ignore STAs for other mesh networks.
1907                  */
1908                 if (memcmp(scan.meshid+2, ms->ms_id, ms->ms_idlen) != 0 ||
1909                     mesh_verify_meshconf(vap, scan.meshconf)) {
1910                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1911                             wh, "beacon", "%s", "not for our mesh");
1912                         vap->iv_stats.is_mesh_wrongmesh++;
1913                         return;
1914                 }
1915                 /*
1916                  * Peer only based on the current ACL policy.
1917                  */
1918                 if (vap->iv_acl != NULL && !vap->iv_acl->iac_check(vap, wh)) {
1919                         IEEE80211_DISCARD(vap, IEEE80211_MSG_ACL,
1920                             wh, NULL, "%s", "disallowed by ACL");
1921                         vap->iv_stats.is_rx_acl++;
1922                         return;
1923                 }
1924                 /*
1925                  * Do neighbor discovery.
1926                  */
1927                 if (!IEEE80211_ADDR_EQ(wh->i_addr2, ni->ni_macaddr)) {
1928                         /*
1929                          * Create a new entry in the neighbor table.
1930                          */
1931                         ni = ieee80211_add_neighbor(vap, wh, &scan);
1932                 }
1933                 /*
1934                  * Automatically peer with discovered nodes if possible.
1935                  */
1936                 if (ni != vap->iv_bss &&
1937                     (ms->ms_flags & IEEE80211_MESHFLAGS_AP)) {
1938                         switch (ni->ni_mlstate) {
1939                         case IEEE80211_NODE_MESH_IDLE:
1940                         {
1941                                 uint16_t args[1];
1942
1943                                 /* Wait for backoff callout to reset counter */
1944                                 if (ni->ni_mlhcnt >= ieee80211_mesh_maxholding)
1945                                         return;
1946
1947                                 ni->ni_mlpid = mesh_generateid(vap);
1948                                 if (ni->ni_mlpid == 0)
1949                                         return;
1950                                 mesh_linkchange(ni, IEEE80211_NODE_MESH_OPENSNT);
1951                                 args[0] = ni->ni_mlpid;
1952                                 ieee80211_send_action(ni,
1953                                 IEEE80211_ACTION_CAT_SELF_PROT,
1954                                 IEEE80211_ACTION_MESHPEERING_OPEN, args);
1955                                 ni->ni_mlrcnt = 0;
1956                                 mesh_peer_timeout_setup(ni);
1957                                 break;
1958                         }
1959                         case IEEE80211_NODE_MESH_ESTABLISHED:
1960                         {
1961                                 /*
1962                                  * Valid beacon from a peer mesh STA
1963                                  * bump TA lifetime
1964                                  */
1965                                 rt = ieee80211_mesh_rt_find(vap, wh->i_addr2);
1966                                 if(rt != NULL) {
1967                                         ieee80211_mesh_rt_update(rt,
1968                                             ticks_to_msecs(
1969                                             ms->ms_ppath->mpp_inact));
1970                                 }
1971                                 break;
1972                         }
1973                         default:
1974                                 break; /* ignore */
1975                         }
1976                 }
1977                 break;
1978         }
1979         case IEEE80211_FC0_SUBTYPE_PROBE_REQ:
1980         {
1981                 uint8_t *ssid, *meshid, *rates, *xrates;
1982
1983                 if (vap->iv_state != IEEE80211_S_RUN) {
1984                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1985                             wh, NULL, "wrong state %s",
1986                             ieee80211_state_name[vap->iv_state]);
1987                         vap->iv_stats.is_rx_mgtdiscard++;
1988                         return;
1989                 }
1990                 if (IEEE80211_IS_MULTICAST(wh->i_addr2)) {
1991                         /* frame must be directed */
1992                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1993                             wh, NULL, "%s", "not unicast");
1994                         vap->iv_stats.is_rx_mgtdiscard++;       /* XXX stat */
1995                         return;
1996                 }
1997                 /*
1998                  * prreq frame format
1999                  *      [tlv] ssid
2000                  *      [tlv] supported rates
2001                  *      [tlv] extended supported rates
2002                  *      [tlv] mesh id
2003                  */
2004                 ssid = meshid = rates = xrates = NULL;
2005                 while (efrm - frm > 1) {
2006                         IEEE80211_VERIFY_LENGTH(efrm - frm, frm[1] + 2, return);
2007                         switch (*frm) {
2008                         case IEEE80211_ELEMID_SSID:
2009                                 ssid = frm;
2010                                 break;
2011                         case IEEE80211_ELEMID_RATES:
2012                                 rates = frm;
2013                                 break;
2014                         case IEEE80211_ELEMID_XRATES:
2015                                 xrates = frm;
2016                                 break;
2017                         case IEEE80211_ELEMID_MESHID:
2018                                 meshid = frm;
2019                                 break;
2020                         }
2021                         frm += frm[1] + 2;
2022                 }
2023                 IEEE80211_VERIFY_ELEMENT(ssid, IEEE80211_NWID_LEN, return);
2024                 IEEE80211_VERIFY_ELEMENT(rates, IEEE80211_RATE_MAXSIZE, return);
2025                 if (xrates != NULL)
2026                         IEEE80211_VERIFY_ELEMENT(xrates,
2027                             IEEE80211_RATE_MAXSIZE - rates[1], return);
2028                 if (meshid != NULL) {
2029                         IEEE80211_VERIFY_ELEMENT(meshid,
2030                             IEEE80211_MESHID_LEN, return);
2031                         /* NB: meshid, not ssid */
2032                         IEEE80211_VERIFY_SSID(vap->iv_bss, meshid, return);
2033                 }
2034
2035                 /* XXX find a better class or define it's own */
2036                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_INPUT, wh->i_addr2,
2037                     "%s", "recv probe req");
2038                 /*
2039                  * Some legacy 11b clients cannot hack a complete
2040                  * probe response frame.  When the request includes
2041                  * only a bare-bones rate set, communicate this to
2042                  * the transmit side.
2043                  */
2044                 ieee80211_send_proberesp(vap, wh->i_addr2, 0);
2045                 break;
2046         }
2047
2048         case IEEE80211_FC0_SUBTYPE_ACTION:
2049         case IEEE80211_FC0_SUBTYPE_ACTION_NOACK:
2050                 if (ni == vap->iv_bss) {
2051                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
2052                             wh, NULL, "%s", "unknown node");
2053                         vap->iv_stats.is_rx_mgtdiscard++;
2054                 } else if (!IEEE80211_ADDR_EQ(vap->iv_myaddr, wh->i_addr1) &&
2055                     !IEEE80211_IS_MULTICAST(wh->i_addr1)) {
2056                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
2057                             wh, NULL, "%s", "not for us");
2058                         vap->iv_stats.is_rx_mgtdiscard++;
2059                 } else if (vap->iv_state != IEEE80211_S_RUN) {
2060                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
2061                             wh, NULL, "wrong state %s",
2062                             ieee80211_state_name[vap->iv_state]);
2063                         vap->iv_stats.is_rx_mgtdiscard++;
2064                 } else {
2065                         if (ieee80211_parse_action(ni, m0) == 0)
2066                                 (void)ic->ic_recv_action(ni, wh, frm, efrm);
2067                 }
2068                 break;
2069
2070         case IEEE80211_FC0_SUBTYPE_ASSOC_REQ:
2071         case IEEE80211_FC0_SUBTYPE_ASSOC_RESP:
2072         case IEEE80211_FC0_SUBTYPE_REASSOC_REQ:
2073         case IEEE80211_FC0_SUBTYPE_REASSOC_RESP:
2074         case IEEE80211_FC0_SUBTYPE_TIMING_ADV:
2075         case IEEE80211_FC0_SUBTYPE_ATIM:
2076         case IEEE80211_FC0_SUBTYPE_DISASSOC:
2077         case IEEE80211_FC0_SUBTYPE_AUTH:
2078         case IEEE80211_FC0_SUBTYPE_DEAUTH:
2079                 IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
2080                     wh, NULL, "%s", "not handled");
2081                 vap->iv_stats.is_rx_mgtdiscard++;
2082                 break;
2083
2084         default:
2085                 IEEE80211_DISCARD(vap, IEEE80211_MSG_ANY,
2086                     wh, "mgt", "subtype 0x%x not handled", subtype);
2087                 vap->iv_stats.is_rx_badsubtype++;
2088                 break;
2089         }
2090 }
2091
2092 static void
2093 mesh_recv_ctl(struct ieee80211_node *ni, struct mbuf *m, int subtype)
2094 {
2095
2096         switch (subtype) {
2097         case IEEE80211_FC0_SUBTYPE_BAR:
2098                 ieee80211_recv_bar(ni, m);
2099                 break;
2100         }
2101 }
2102
2103 /*
2104  * Parse meshpeering action ie's for MPM frames
2105  */
2106 static const struct ieee80211_meshpeer_ie *
2107 mesh_parse_meshpeering_action(struct ieee80211_node *ni,
2108         const struct ieee80211_frame *wh,       /* XXX for VERIFY_LENGTH */
2109         const uint8_t *frm, const uint8_t *efrm,
2110         struct ieee80211_meshpeer_ie *mp, uint8_t subtype)
2111 {
2112         struct ieee80211vap *vap = ni->ni_vap;
2113         const struct ieee80211_meshpeer_ie *mpie;
2114         uint16_t args[3];
2115         const uint8_t *meshid, *meshconf;
2116         uint8_t sendclose = 0; /* 1 = MPM frame rejected, close will be sent */
2117
2118         meshid = meshconf = NULL;
2119         while (efrm - frm > 1) {
2120                 IEEE80211_VERIFY_LENGTH(efrm - frm, frm[1] + 2, return NULL);
2121                 switch (*frm) {
2122                 case IEEE80211_ELEMID_MESHID:
2123                         meshid = frm;
2124                         break;
2125                 case IEEE80211_ELEMID_MESHCONF:
2126                         meshconf = frm;
2127                         break;
2128                 case IEEE80211_ELEMID_MESHPEER:
2129                         mpie = (const struct ieee80211_meshpeer_ie *) frm;
2130                         memset(mp, 0, sizeof(*mp));
2131                         mp->peer_len = mpie->peer_len;
2132                         mp->peer_proto = le16dec(&mpie->peer_proto);
2133                         mp->peer_llinkid = le16dec(&mpie->peer_llinkid);
2134                         switch (subtype) {
2135                         case IEEE80211_ACTION_MESHPEERING_CONFIRM:
2136                                 mp->peer_linkid =
2137                                     le16dec(&mpie->peer_linkid);
2138                                 break;
2139                         case IEEE80211_ACTION_MESHPEERING_CLOSE:
2140                                 /* NB: peer link ID is optional */
2141                                 if (mpie->peer_len ==
2142                                     (IEEE80211_MPM_BASE_SZ + 2)) {
2143                                         mp->peer_linkid = 0;
2144                                         mp->peer_rcode =
2145                                             le16dec(&mpie->peer_linkid);
2146                                 } else {
2147                                         mp->peer_linkid =
2148                                             le16dec(&mpie->peer_linkid);
2149                                         mp->peer_rcode =
2150                                             le16dec(&mpie->peer_rcode);
2151                                 }
2152                                 break;
2153                         }
2154                         break;
2155                 }
2156                 frm += frm[1] + 2;
2157         }
2158
2159         /*
2160          * Verify the contents of the frame.
2161          * If it fails validation, close the peer link.
2162          */
2163         if (mesh_verify_meshpeer(vap, subtype, (const uint8_t *)mp)) {
2164                 sendclose = 1;
2165                 IEEE80211_DISCARD(vap,
2166                     IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH,
2167                     wh, NULL, "%s", "MPM validation failed");
2168         }
2169
2170         /* If meshid is not the same reject any frames type. */
2171         if (sendclose == 0 && mesh_verify_meshid(vap, meshid)) {
2172                 sendclose = 1;
2173                 IEEE80211_DISCARD(vap,
2174                     IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH,
2175                     wh, NULL, "%s", "not for our mesh");
2176                 if (subtype == IEEE80211_ACTION_MESHPEERING_CLOSE) {
2177                         /*
2178                          * Standard not clear about this, if we dont ignore
2179                          * there will be an endless loop between nodes sending
2180                          * CLOSE frames between each other with wrong meshid.
2181                          * Discard and timers will bring FSM to IDLE state.
2182                          */
2183                         return NULL;
2184                 }
2185         }
2186         
2187         /*
2188          * Close frames are accepted if meshid is the same.
2189          * Verify the other two types.
2190          */
2191         if (sendclose == 0 && subtype != IEEE80211_ACTION_MESHPEERING_CLOSE &&
2192             mesh_verify_meshconf(vap, meshconf)) {
2193                 sendclose = 1;
2194                 IEEE80211_DISCARD(vap,
2195                     IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH,
2196                     wh, NULL, "%s", "configuration missmatch");
2197         }
2198
2199         if (sendclose) {
2200                 vap->iv_stats.is_rx_mgtdiscard++;
2201                 switch (ni->ni_mlstate) {
2202                 case IEEE80211_NODE_MESH_IDLE:
2203                 case IEEE80211_NODE_MESH_ESTABLISHED:
2204                 case IEEE80211_NODE_MESH_HOLDING:
2205                         /* ignore */
2206                         break;
2207                 case IEEE80211_NODE_MESH_OPENSNT:
2208                 case IEEE80211_NODE_MESH_OPENRCV:
2209                 case IEEE80211_NODE_MESH_CONFIRMRCV:
2210                         args[0] = ni->ni_mlpid;
2211                         args[1] = ni->ni_mllid;
2212                         /* Reason codes for rejection */
2213                         switch (subtype) {
2214                         case IEEE80211_ACTION_MESHPEERING_OPEN:
2215                                 args[2] = IEEE80211_REASON_MESH_CPVIOLATION;
2216                                 break;
2217                         case IEEE80211_ACTION_MESHPEERING_CONFIRM:
2218                                 args[2] = IEEE80211_REASON_MESH_INCONS_PARAMS;
2219                                 break;
2220                         }
2221                         ieee80211_send_action(ni,
2222                             IEEE80211_ACTION_CAT_SELF_PROT,
2223                             IEEE80211_ACTION_MESHPEERING_CLOSE,
2224                             args);
2225                         mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
2226                         mesh_peer_timeout_setup(ni);
2227                         break;
2228                 }
2229                 return NULL;
2230         }
2231         
2232         return (const struct ieee80211_meshpeer_ie *) mp;
2233 }
2234
2235 static int
2236 mesh_recv_action_meshpeering_open(struct ieee80211_node *ni,
2237         const struct ieee80211_frame *wh,
2238         const uint8_t *frm, const uint8_t *efrm)
2239 {
2240         struct ieee80211vap *vap = ni->ni_vap;
2241         struct ieee80211_mesh_state *ms = vap->iv_mesh;
2242         struct ieee80211_meshpeer_ie ie;
2243         const struct ieee80211_meshpeer_ie *meshpeer;
2244         uint16_t args[3];
2245
2246         /* +2+2 for action + code + capabilites */
2247         meshpeer = mesh_parse_meshpeering_action(ni, wh, frm+2+2, efrm, &ie,
2248             IEEE80211_ACTION_MESHPEERING_OPEN);
2249         if (meshpeer == NULL) {
2250                 return 0;
2251         }
2252
2253         /* XXX move up */
2254         IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH, ni,
2255             "recv PEER OPEN, lid 0x%x", meshpeer->peer_llinkid);
2256
2257         switch (ni->ni_mlstate) {
2258         case IEEE80211_NODE_MESH_IDLE:
2259                 /* Reject open request if reached our maximum neighbor count */
2260                 if (ms->ms_neighbors >= IEEE80211_MESH_MAX_NEIGHBORS) {
2261                         args[0] = meshpeer->peer_llinkid;
2262                         args[1] = 0;
2263                         args[2] = IEEE80211_REASON_MESH_MAX_PEERS;
2264                         ieee80211_send_action(ni,
2265                             IEEE80211_ACTION_CAT_SELF_PROT,
2266                             IEEE80211_ACTION_MESHPEERING_CLOSE,
2267                             args);
2268                         /* stay in IDLE state */
2269                         return (0);
2270                 }
2271                 /* Open frame accepted */
2272                 mesh_linkchange(ni, IEEE80211_NODE_MESH_OPENRCV);
2273                 ni->ni_mllid = meshpeer->peer_llinkid;
2274                 ni->ni_mlpid = mesh_generateid(vap);
2275                 if (ni->ni_mlpid == 0)
2276                         return 0;               /* XXX */
2277                 args[0] = ni->ni_mlpid;
2278                 /* Announce we're open too... */
2279                 ieee80211_send_action(ni,
2280                     IEEE80211_ACTION_CAT_SELF_PROT,
2281                     IEEE80211_ACTION_MESHPEERING_OPEN, args);
2282                 /* ...and confirm the link. */
2283                 args[0] = ni->ni_mlpid;
2284                 args[1] = ni->ni_mllid;
2285                 ieee80211_send_action(ni,
2286                     IEEE80211_ACTION_CAT_SELF_PROT,
2287                     IEEE80211_ACTION_MESHPEERING_CONFIRM,
2288                     args);
2289                 mesh_peer_timeout_setup(ni);
2290                 break;
2291         case IEEE80211_NODE_MESH_OPENRCV:
2292                 /* Wrong Link ID */
2293                 if (ni->ni_mllid != meshpeer->peer_llinkid) {
2294                         args[0] = ni->ni_mllid;
2295                         args[1] = ni->ni_mlpid;
2296                         args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
2297                         ieee80211_send_action(ni,
2298                             IEEE80211_ACTION_CAT_SELF_PROT,
2299                             IEEE80211_ACTION_MESHPEERING_CLOSE,
2300                             args);
2301                         mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
2302                         mesh_peer_timeout_setup(ni);
2303                         break;
2304                 }
2305                 /* Duplicate open, confirm again. */
2306                 args[0] = ni->ni_mlpid;
2307                 args[1] = ni->ni_mllid;
2308                 ieee80211_send_action(ni,
2309                     IEEE80211_ACTION_CAT_SELF_PROT,
2310                     IEEE80211_ACTION_MESHPEERING_CONFIRM,
2311                     args);
2312                 break;
2313         case IEEE80211_NODE_MESH_OPENSNT:
2314                 ni->ni_mllid = meshpeer->peer_llinkid;
2315                 mesh_linkchange(ni, IEEE80211_NODE_MESH_OPENRCV);
2316                 args[0] = ni->ni_mlpid;
2317                 args[1] = ni->ni_mllid;
2318                 ieee80211_send_action(ni,
2319                     IEEE80211_ACTION_CAT_SELF_PROT,
2320                     IEEE80211_ACTION_MESHPEERING_CONFIRM,
2321                     args);
2322                 /* NB: don't setup/clear any timeout */
2323                 break;
2324         case IEEE80211_NODE_MESH_CONFIRMRCV:
2325                 if (ni->ni_mlpid != meshpeer->peer_linkid ||
2326                     ni->ni_mllid != meshpeer->peer_llinkid) {
2327                         args[0] = ni->ni_mlpid;
2328                         args[1] = ni->ni_mllid;
2329                         args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
2330                         ieee80211_send_action(ni,
2331                             IEEE80211_ACTION_CAT_SELF_PROT,
2332                             IEEE80211_ACTION_MESHPEERING_CLOSE,
2333                             args);
2334                         mesh_linkchange(ni,
2335                             IEEE80211_NODE_MESH_HOLDING);
2336                         mesh_peer_timeout_setup(ni);
2337                         break;
2338                 }
2339                 mesh_linkchange(ni, IEEE80211_NODE_MESH_ESTABLISHED);
2340                 ni->ni_mllid = meshpeer->peer_llinkid;
2341                 args[0] = ni->ni_mlpid;
2342                 args[1] = ni->ni_mllid;
2343                 ieee80211_send_action(ni,
2344                     IEEE80211_ACTION_CAT_SELF_PROT,
2345                     IEEE80211_ACTION_MESHPEERING_CONFIRM,
2346                     args);
2347                 mesh_peer_timeout_stop(ni);
2348                 break;
2349         case IEEE80211_NODE_MESH_ESTABLISHED:
2350                 if (ni->ni_mllid != meshpeer->peer_llinkid) {
2351                         args[0] = ni->ni_mllid;
2352                         args[1] = ni->ni_mlpid;
2353                         args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
2354                         ieee80211_send_action(ni,
2355                             IEEE80211_ACTION_CAT_SELF_PROT,
2356                             IEEE80211_ACTION_MESHPEERING_CLOSE,
2357                             args);
2358                         mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
2359                         mesh_peer_timeout_setup(ni);
2360                         break;
2361                 }
2362                 args[0] = ni->ni_mlpid;
2363                 args[1] = ni->ni_mllid;
2364                 ieee80211_send_action(ni,
2365                     IEEE80211_ACTION_CAT_SELF_PROT,
2366                     IEEE80211_ACTION_MESHPEERING_CONFIRM,
2367                     args);
2368                 break;
2369         case IEEE80211_NODE_MESH_HOLDING:
2370                 args[0] = ni->ni_mlpid;
2371                 args[1] = meshpeer->peer_llinkid;
2372                 /* Standard not clear about what the reaason code should be */
2373                 args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
2374                 ieee80211_send_action(ni,
2375                     IEEE80211_ACTION_CAT_SELF_PROT,
2376                     IEEE80211_ACTION_MESHPEERING_CLOSE,
2377                     args);
2378                 break;
2379         }
2380         return 0;
2381 }
2382
2383 static int
2384 mesh_recv_action_meshpeering_confirm(struct ieee80211_node *ni,
2385         const struct ieee80211_frame *wh,
2386         const uint8_t *frm, const uint8_t *efrm)
2387 {
2388         struct ieee80211vap *vap = ni->ni_vap;
2389         struct ieee80211_meshpeer_ie ie;
2390         const struct ieee80211_meshpeer_ie *meshpeer;
2391         uint16_t args[3];
2392
2393         /* +2+2+2+2 for action + code + capabilites + status code + AID */
2394         meshpeer = mesh_parse_meshpeering_action(ni, wh, frm+2+2+2+2, efrm, &ie,
2395             IEEE80211_ACTION_MESHPEERING_CONFIRM);
2396         if (meshpeer == NULL) {
2397                 return 0;
2398         }
2399
2400         IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH, ni,
2401             "recv PEER CONFIRM, local id 0x%x, peer id 0x%x",
2402             meshpeer->peer_llinkid, meshpeer->peer_linkid);
2403
2404         switch (ni->ni_mlstate) {
2405         case IEEE80211_NODE_MESH_OPENRCV:
2406                 mesh_linkchange(ni, IEEE80211_NODE_MESH_ESTABLISHED);
2407                 mesh_peer_timeout_stop(ni);
2408                 break;
2409         case IEEE80211_NODE_MESH_OPENSNT:
2410                 mesh_linkchange(ni, IEEE80211_NODE_MESH_CONFIRMRCV);
2411                 mesh_peer_timeout_setup(ni);
2412                 break;
2413         case IEEE80211_NODE_MESH_HOLDING:
2414                 args[0] = ni->ni_mlpid;
2415                 args[1] = meshpeer->peer_llinkid;
2416                 /* Standard not clear about what the reaason code should be */
2417                 args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
2418                 ieee80211_send_action(ni,
2419                     IEEE80211_ACTION_CAT_SELF_PROT,
2420                     IEEE80211_ACTION_MESHPEERING_CLOSE,
2421                     args);
2422                 break;
2423         case IEEE80211_NODE_MESH_CONFIRMRCV:
2424                 if (ni->ni_mllid != meshpeer->peer_llinkid) {
2425                         args[0] = ni->ni_mlpid;
2426                         args[1] = ni->ni_mllid;
2427                         args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
2428                         ieee80211_send_action(ni,
2429                             IEEE80211_ACTION_CAT_SELF_PROT,
2430                             IEEE80211_ACTION_MESHPEERING_CLOSE,
2431                             args);
2432                         mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
2433                         mesh_peer_timeout_setup(ni);
2434                 }
2435                 break;
2436         default:
2437                 IEEE80211_DISCARD(vap,
2438                     IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH,
2439                     wh, NULL, "received confirm in invalid state %d",
2440                     ni->ni_mlstate);
2441                 vap->iv_stats.is_rx_mgtdiscard++;
2442                 break;
2443         }
2444         return 0;
2445 }
2446
2447 static int
2448 mesh_recv_action_meshpeering_close(struct ieee80211_node *ni,
2449         const struct ieee80211_frame *wh,
2450         const uint8_t *frm, const uint8_t *efrm)
2451 {
2452         struct ieee80211_meshpeer_ie ie;
2453         const struct ieee80211_meshpeer_ie *meshpeer;
2454         uint16_t args[3];
2455
2456         /* +2 for action + code */
2457         meshpeer = mesh_parse_meshpeering_action(ni, wh, frm+2, efrm, &ie,
2458             IEEE80211_ACTION_MESHPEERING_CLOSE);
2459         if (meshpeer == NULL) {
2460                 return 0;
2461         }
2462
2463         /*
2464          * XXX: check reason code, for example we could receive
2465          * IEEE80211_REASON_MESH_MAX_PEERS then we should not attempt
2466          * to peer again.
2467          */
2468
2469         IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH,
2470             ni, "%s", "recv PEER CLOSE");
2471
2472         switch (ni->ni_mlstate) {
2473         case IEEE80211_NODE_MESH_IDLE:
2474                 /* ignore */
2475                 break;
2476         case IEEE80211_NODE_MESH_OPENRCV:
2477         case IEEE80211_NODE_MESH_OPENSNT:
2478         case IEEE80211_NODE_MESH_CONFIRMRCV:
2479         case IEEE80211_NODE_MESH_ESTABLISHED:
2480                 args[0] = ni->ni_mlpid;
2481                 args[1] = ni->ni_mllid;
2482                 args[2] = IEEE80211_REASON_MESH_CLOSE_RCVD;
2483                 ieee80211_send_action(ni,
2484                     IEEE80211_ACTION_CAT_SELF_PROT,
2485                     IEEE80211_ACTION_MESHPEERING_CLOSE,
2486                     args);
2487                 mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
2488                 mesh_peer_timeout_setup(ni);
2489                 break;
2490         case IEEE80211_NODE_MESH_HOLDING:
2491                 mesh_linkchange(ni, IEEE80211_NODE_MESH_IDLE);
2492                 mesh_peer_timeout_stop(ni);
2493                 break;
2494         }
2495         return 0;
2496 }
2497
2498 /*
2499  * Link Metric handling.
2500  */
2501 static int
2502 mesh_recv_action_meshlmetric(struct ieee80211_node *ni,
2503         const struct ieee80211_frame *wh,
2504         const uint8_t *frm, const uint8_t *efrm)
2505 {
2506         const struct ieee80211_meshlmetric_ie *ie =
2507             (const struct ieee80211_meshlmetric_ie *)
2508             (frm+2); /* action + code */
2509         struct ieee80211_meshlmetric_ie lm_rep;
2510         
2511         if (ie->lm_flags & IEEE80211_MESH_LMETRIC_FLAGS_REQ) {
2512                 lm_rep.lm_flags = 0;
2513                 lm_rep.lm_metric = mesh_airtime_calc(ni);
2514                 ieee80211_send_action(ni,
2515                     IEEE80211_ACTION_CAT_MESH,
2516                     IEEE80211_ACTION_MESH_LMETRIC,
2517                     &lm_rep);
2518         }
2519         /* XXX: else do nothing for now */
2520         return 0;
2521 }
2522
2523 /*
2524  * Parse meshgate action ie's for GANN frames.
2525  * Returns -1 if parsing fails, otherwise 0.
2526  */
2527 static int
2528 mesh_parse_meshgate_action(struct ieee80211_node *ni,
2529     const struct ieee80211_frame *wh,   /* XXX for VERIFY_LENGTH */
2530     struct ieee80211_meshgann_ie *ie, const uint8_t *frm, const uint8_t *efrm)
2531 {
2532         struct ieee80211vap *vap = ni->ni_vap;
2533         const struct ieee80211_meshgann_ie *gannie;
2534
2535         while (efrm - frm > 1) {
2536                 IEEE80211_VERIFY_LENGTH(efrm - frm, frm[1] + 2, return -1);
2537                 switch (*frm) {
2538                 case IEEE80211_ELEMID_MESHGANN:
2539                         gannie = (const struct ieee80211_meshgann_ie *) frm;
2540                         memset(ie, 0, sizeof(*ie));
2541                         ie->gann_ie = gannie->gann_ie;
2542                         ie->gann_len = gannie->gann_len;
2543                         ie->gann_flags = gannie->gann_flags;
2544                         ie->gann_hopcount = gannie->gann_hopcount;
2545                         ie->gann_ttl = gannie->gann_ttl;
2546                         IEEE80211_ADDR_COPY(ie->gann_addr, gannie->gann_addr);
2547                         ie->gann_seq = le32dec(&gannie->gann_seq);
2548                         ie->gann_interval = le16dec(&gannie->gann_interval);
2549                         break;
2550                 }
2551                 frm += frm[1] + 2;
2552         }
2553
2554         return 0;
2555 }
2556
2557 /*
2558  * Mesh Gate Announcement handling.
2559  */
2560 static int
2561 mesh_recv_action_meshgate(struct ieee80211_node *ni,
2562         const struct ieee80211_frame *wh,
2563         const uint8_t *frm, const uint8_t *efrm)
2564 {
2565         struct ieee80211vap *vap = ni->ni_vap;
2566         struct ieee80211_mesh_state *ms = vap->iv_mesh;
2567         struct ieee80211_mesh_gate_route *gr, *next;
2568         struct ieee80211_mesh_route *rt_gate;
2569         struct ieee80211_meshgann_ie pgann;
2570         struct ieee80211_meshgann_ie ie;
2571         int found = 0;
2572
2573         /* +2 for action + code */
2574         if (mesh_parse_meshgate_action(ni, wh, &ie, frm+2, efrm) != 0) {
2575                 IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_MESH,
2576                     ni->ni_macaddr, NULL, "%s",
2577                     "GANN parsing failed");
2578                 vap->iv_stats.is_rx_mgtdiscard++;
2579                 return (0);
2580         }
2581
2582         if (IEEE80211_ADDR_EQ(vap->iv_myaddr, ie.gann_addr))
2583                 return 0;
2584
2585         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, ni->ni_macaddr,
2586             "received GANN, meshgate: %6D (seq %u)", ie.gann_addr, ":",
2587             ie.gann_seq);
2588
2589         if (ms == NULL)
2590                 return (0);
2591         MESH_RT_LOCK(ms);
2592         TAILQ_FOREACH_SAFE(gr, &ms->ms_known_gates, gr_next, next) {
2593                 if (!IEEE80211_ADDR_EQ(gr->gr_addr, ie.gann_addr))
2594                         continue;
2595                 if (ie.gann_seq <= gr->gr_lastseq) {
2596                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_MESH,
2597                             ni->ni_macaddr, NULL,
2598                             "GANN old seqno %u <= %u",
2599                             ie.gann_seq, gr->gr_lastseq);
2600                         MESH_RT_UNLOCK(ms);
2601                         return (0);
2602                 }
2603                 /* corresponding mesh gate found & GANN accepted */
2604                 found = 1;
2605                 break;
2606
2607         }
2608         if (found == 0) {
2609                 /* this GANN is from a new mesh Gate add it to known table. */
2610                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, ie.gann_addr,
2611                     "stored new GANN information, seq %u.", ie.gann_seq);
2612                 gr = IEEE80211_MALLOC(ALIGN(sizeof(struct ieee80211_mesh_gate_route)),
2613                     M_80211_MESH_GT_RT,
2614                     IEEE80211_M_NOWAIT | IEEE80211_M_ZERO);
2615                 IEEE80211_ADDR_COPY(gr->gr_addr, ie.gann_addr);
2616                 TAILQ_INSERT_TAIL(&ms->ms_known_gates, gr, gr_next);
2617         }
2618         gr->gr_lastseq = ie.gann_seq;
2619
2620         /* check if we have a path to this gate */
2621         rt_gate = mesh_rt_find_locked(ms, gr->gr_addr);
2622         if (rt_gate != NULL &&
2623             rt_gate->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) {
2624                 gr->gr_route = rt_gate;
2625                 rt_gate->rt_flags |= IEEE80211_MESHRT_FLAGS_GATE;
2626         }
2627
2628         MESH_RT_UNLOCK(ms);
2629
2630         /* popagate only if decremented ttl >= 1 && forwarding is enabled */
2631         if ((ie.gann_ttl - 1) < 1 && !(ms->ms_flags & IEEE80211_MESHFLAGS_FWD))
2632                 return 0;
2633                 pgann.gann_flags = ie.gann_flags; /* Reserved */
2634         pgann.gann_hopcount = ie.gann_hopcount + 1;
2635         pgann.gann_ttl = ie.gann_ttl - 1;
2636         IEEE80211_ADDR_COPY(pgann.gann_addr, ie.gann_addr);
2637         pgann.gann_seq = ie.gann_seq;
2638         pgann.gann_interval = ie.gann_interval;
2639
2640         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, ie.gann_addr,
2641             "%s", "propagate GANN");
2642
2643         ieee80211_send_action(vap->iv_bss, IEEE80211_ACTION_CAT_MESH,
2644             IEEE80211_ACTION_MESH_GANN, &pgann);
2645
2646         return 0;
2647 }
2648
2649 static int
2650 mesh_send_action(struct ieee80211_node *ni,
2651     const uint8_t sa[IEEE80211_ADDR_LEN],
2652     const uint8_t da[IEEE80211_ADDR_LEN],
2653     struct mbuf *m)
2654 {
2655         struct ieee80211vap *vap = ni->ni_vap;
2656         struct ieee80211com *ic = ni->ni_ic;
2657         struct ieee80211_bpf_params params;
2658         int ret;
2659
2660         KASSERT(ni != NULL, ("null node"));
2661
2662         if (vap->iv_state == IEEE80211_S_CAC) {
2663                 IEEE80211_NOTE(vap, IEEE80211_MSG_OUTPUT, ni,
2664                     "block %s frame in CAC state", "Mesh action");
2665                 vap->iv_stats.is_tx_badstate++;
2666                 ieee80211_free_node(ni);
2667                 m_freem(m);
2668                 return EIO;             /* XXX */
2669         }
2670
2671         M_PREPEND(m, sizeof(struct ieee80211_frame), M_NOWAIT);
2672         if (m == NULL) {
2673                 ieee80211_free_node(ni);
2674                 return ENOMEM;
2675         }
2676
2677         IEEE80211_TX_LOCK(ic);
2678         ieee80211_send_setup(ni, m,
2679              IEEE80211_FC0_TYPE_MGT | IEEE80211_FC0_SUBTYPE_ACTION,
2680              IEEE80211_NONQOS_TID, sa, da, sa);
2681         m->m_flags |= M_ENCAP;          /* mark encapsulated */
2682
2683         memset(&params, 0, sizeof(params));
2684         params.ibp_pri = WME_AC_VO;
2685         params.ibp_rate0 = ni->ni_txparms->mgmtrate;
2686         if (IEEE80211_IS_MULTICAST(da))
2687                 params.ibp_try0 = 1;
2688         else
2689                 params.ibp_try0 = ni->ni_txparms->maxretry;
2690         params.ibp_power = ni->ni_txpower;
2691
2692         IEEE80211_NODE_STAT(ni, tx_mgmt);
2693
2694         ret = ieee80211_raw_output(vap, ni, m, &params);
2695         IEEE80211_TX_UNLOCK(ic);
2696         return (ret);
2697 }
2698
2699 #define ADDSHORT(frm, v) do {                   \
2700         frm[0] = (v) & 0xff;                    \
2701         frm[1] = (v) >> 8;                      \
2702         frm += 2;                               \
2703 } while (0)
2704 #define ADDWORD(frm, v) do {                    \
2705         frm[0] = (v) & 0xff;                    \
2706         frm[1] = ((v) >> 8) & 0xff;             \
2707         frm[2] = ((v) >> 16) & 0xff;            \
2708         frm[3] = ((v) >> 24) & 0xff;            \
2709         frm += 4;                               \
2710 } while (0)
2711
2712 static int
2713 mesh_send_action_meshpeering_open(struct ieee80211_node *ni,
2714         int category, int action, void *args0)
2715 {
2716         struct ieee80211vap *vap = ni->ni_vap;
2717         struct ieee80211com *ic = ni->ni_ic;
2718         uint16_t *args = args0;
2719         const struct ieee80211_rateset *rs;
2720         struct mbuf *m;
2721         uint8_t *frm;
2722
2723         IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH, ni,
2724             "send PEER OPEN action: localid 0x%x", args[0]);
2725
2726         IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2727             "ieee80211_ref_node (%s:%u) %p<%s> refcnt %d\n", __func__, __LINE__,
2728             ni, ether_sprintf(ni->ni_macaddr), ieee80211_node_refcnt(ni)+1);
2729         ieee80211_ref_node(ni);
2730
2731         m = ieee80211_getmgtframe(&frm,
2732             ic->ic_headroom + sizeof(struct ieee80211_frame),
2733             sizeof(uint16_t)    /* action+category */
2734             + sizeof(uint16_t)  /* capabilites */
2735             + 2 + IEEE80211_RATE_SIZE
2736             + 2 + (IEEE80211_RATE_MAXSIZE - IEEE80211_RATE_SIZE)
2737             + 2 + IEEE80211_MESHID_LEN
2738             + sizeof(struct ieee80211_meshconf_ie)
2739             + sizeof(struct ieee80211_meshpeer_ie)
2740         );
2741         if (m != NULL) {
2742                 /*
2743                  * mesh peer open action frame format:
2744                  *   [1] category
2745                  *   [1] action
2746                  *   [2] capabilities
2747                  *   [tlv] rates
2748                  *   [tlv] xrates
2749                  *   [tlv] mesh id
2750                  *   [tlv] mesh conf
2751                  *   [tlv] mesh peer link mgmt
2752                  */
2753                 *frm++ = category;
2754                 *frm++ = action;
2755                 ADDSHORT(frm, ieee80211_getcapinfo(vap, ni->ni_chan));
2756                 rs = ieee80211_get_suprates(ic, ic->ic_curchan);
2757                 frm = ieee80211_add_rates(frm, rs);
2758                 frm = ieee80211_add_xrates(frm, rs);
2759                 frm = ieee80211_add_meshid(frm, vap);
2760                 frm = ieee80211_add_meshconf(frm, vap);
2761                 frm = ieee80211_add_meshpeer(frm, IEEE80211_ACTION_MESHPEERING_OPEN,
2762                     args[0], 0, 0);
2763                 m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2764                 return mesh_send_action(ni, vap->iv_myaddr, ni->ni_macaddr, m);
2765         } else {
2766                 vap->iv_stats.is_tx_nobuf++;
2767                 ieee80211_free_node(ni);
2768                 return ENOMEM;
2769         }
2770 }
2771
2772 static int
2773 mesh_send_action_meshpeering_confirm(struct ieee80211_node *ni,
2774         int category, int action, void *args0)
2775 {
2776         struct ieee80211vap *vap = ni->ni_vap;
2777         struct ieee80211com *ic = ni->ni_ic;
2778         uint16_t *args = args0;
2779         const struct ieee80211_rateset *rs;
2780         struct mbuf *m;
2781         uint8_t *frm;
2782
2783         IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH, ni,
2784             "send PEER CONFIRM action: localid 0x%x, peerid 0x%x",
2785             args[0], args[1]);
2786
2787         IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2788             "ieee80211_ref_node (%s:%u) %p<%s> refcnt %d\n", __func__, __LINE__,
2789             ni, ether_sprintf(ni->ni_macaddr), ieee80211_node_refcnt(ni)+1);
2790         ieee80211_ref_node(ni);
2791
2792         m = ieee80211_getmgtframe(&frm,
2793             ic->ic_headroom + sizeof(struct ieee80211_frame),
2794             sizeof(uint16_t)    /* action+category */
2795             + sizeof(uint16_t)  /* capabilites */
2796             + sizeof(uint16_t)  /* status code */
2797             + sizeof(uint16_t)  /* AID */
2798             + 2 + IEEE80211_RATE_SIZE
2799             + 2 + (IEEE80211_RATE_MAXSIZE - IEEE80211_RATE_SIZE)
2800             + 2 + IEEE80211_MESHID_LEN
2801             + sizeof(struct ieee80211_meshconf_ie)
2802             + sizeof(struct ieee80211_meshpeer_ie)
2803         );
2804         if (m != NULL) {
2805                 /*
2806                  * mesh peer confirm action frame format:
2807                  *   [1] category
2808                  *   [1] action
2809                  *   [2] capabilities
2810                  *   [2] status code
2811                  *   [2] association id (peer ID)
2812                  *   [tlv] rates
2813                  *   [tlv] xrates
2814                  *   [tlv] mesh id
2815                  *   [tlv] mesh conf
2816                  *   [tlv] mesh peer link mgmt
2817                  */
2818                 *frm++ = category;
2819                 *frm++ = action;
2820                 ADDSHORT(frm, ieee80211_getcapinfo(vap, ni->ni_chan));
2821                 ADDSHORT(frm, 0);               /* status code */
2822                 ADDSHORT(frm, args[1]);         /* AID */
2823                 rs = ieee80211_get_suprates(ic, ic->ic_curchan);
2824                 frm = ieee80211_add_rates(frm, rs);
2825                 frm = ieee80211_add_xrates(frm, rs);
2826                 frm = ieee80211_add_meshid(frm, vap);
2827                 frm = ieee80211_add_meshconf(frm, vap);
2828                 frm = ieee80211_add_meshpeer(frm,
2829                     IEEE80211_ACTION_MESHPEERING_CONFIRM,
2830                     args[0], args[1], 0);
2831                 m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2832                 return mesh_send_action(ni, vap->iv_myaddr, ni->ni_macaddr, m);
2833         } else {
2834                 vap->iv_stats.is_tx_nobuf++;
2835                 ieee80211_free_node(ni);
2836                 return ENOMEM;
2837         }
2838 }
2839
2840 static int
2841 mesh_send_action_meshpeering_close(struct ieee80211_node *ni,
2842         int category, int action, void *args0)
2843 {
2844         struct ieee80211vap *vap = ni->ni_vap;
2845         struct ieee80211com *ic = ni->ni_ic;
2846         uint16_t *args = args0;
2847         struct mbuf *m;
2848         uint8_t *frm;
2849
2850         IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH, ni,
2851             "send PEER CLOSE action: localid 0x%x, peerid 0x%x reason %d (%s)",
2852             args[0], args[1], args[2], ieee80211_reason_to_string(args[2]));
2853
2854         IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2855             "ieee80211_ref_node (%s:%u) %p<%s> refcnt %d\n", __func__, __LINE__,
2856             ni, ether_sprintf(ni->ni_macaddr), ieee80211_node_refcnt(ni)+1);
2857         ieee80211_ref_node(ni);
2858
2859         m = ieee80211_getmgtframe(&frm,
2860             ic->ic_headroom + sizeof(struct ieee80211_frame),
2861             sizeof(uint16_t)    /* action+category */
2862             + sizeof(uint16_t)  /* reason code */
2863             + 2 + IEEE80211_MESHID_LEN
2864             + sizeof(struct ieee80211_meshpeer_ie)
2865         );
2866         if (m != NULL) {
2867                 /*
2868                  * mesh peer close action frame format:
2869                  *   [1] category
2870                  *   [1] action
2871                  *   [tlv] mesh id
2872                  *   [tlv] mesh peer link mgmt
2873                  */
2874                 *frm++ = category;
2875                 *frm++ = action;
2876                 frm = ieee80211_add_meshid(frm, vap);
2877                 frm = ieee80211_add_meshpeer(frm,
2878                     IEEE80211_ACTION_MESHPEERING_CLOSE,
2879                     args[0], args[1], args[2]);
2880                 m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2881                 return mesh_send_action(ni, vap->iv_myaddr, ni->ni_macaddr, m);
2882         } else {
2883                 vap->iv_stats.is_tx_nobuf++;
2884                 ieee80211_free_node(ni);
2885                 return ENOMEM;
2886         }
2887 }
2888
2889 static int
2890 mesh_send_action_meshlmetric(struct ieee80211_node *ni,
2891         int category, int action, void *arg0)
2892 {
2893         struct ieee80211vap *vap = ni->ni_vap;
2894         struct ieee80211com *ic = ni->ni_ic;
2895         struct ieee80211_meshlmetric_ie *ie = arg0;
2896         struct mbuf *m;
2897         uint8_t *frm;
2898
2899         if (ie->lm_flags & IEEE80211_MESH_LMETRIC_FLAGS_REQ) {
2900                 IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH,
2901                     ni, "%s", "send LINK METRIC REQUEST action");
2902         } else {
2903                 IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH,
2904                     ni, "send LINK METRIC REPLY action: metric 0x%x",
2905                     ie->lm_metric);
2906         }
2907         IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2908             "ieee80211_ref_node (%s:%u) %p<%s> refcnt %d\n", __func__, __LINE__,
2909             ni, ether_sprintf(ni->ni_macaddr), ieee80211_node_refcnt(ni)+1);
2910         ieee80211_ref_node(ni);
2911
2912         m = ieee80211_getmgtframe(&frm,
2913             ic->ic_headroom + sizeof(struct ieee80211_frame),
2914             sizeof(uint16_t) +  /* action+category */
2915             sizeof(struct ieee80211_meshlmetric_ie)
2916         );
2917         if (m != NULL) {
2918                 /*
2919                  * mesh link metric
2920                  *   [1] category
2921                  *   [1] action
2922                  *   [tlv] mesh link metric
2923                  */
2924                 *frm++ = category;
2925                 *frm++ = action;
2926                 frm = ieee80211_add_meshlmetric(frm,
2927                     ie->lm_flags, ie->lm_metric);
2928                 m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2929                 return mesh_send_action(ni, vap->iv_myaddr, ni->ni_macaddr, m);
2930         } else {
2931                 vap->iv_stats.is_tx_nobuf++;
2932                 ieee80211_free_node(ni);
2933                 return ENOMEM;
2934         }
2935 }
2936
2937 static int
2938 mesh_send_action_meshgate(struct ieee80211_node *ni,
2939         int category, int action, void *arg0)
2940 {
2941         struct ieee80211vap *vap = ni->ni_vap;
2942         struct ieee80211com *ic = ni->ni_ic;
2943         struct ieee80211_meshgann_ie *ie = arg0;
2944         struct mbuf *m;
2945         uint8_t *frm;
2946
2947         IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2948             "ieee80211_ref_node (%s:%u) %p<%s> refcnt %d\n", __func__, __LINE__,
2949             ni, ether_sprintf(ni->ni_macaddr), ieee80211_node_refcnt(ni)+1);
2950         ieee80211_ref_node(ni);
2951
2952         m = ieee80211_getmgtframe(&frm,
2953             ic->ic_headroom + sizeof(struct ieee80211_frame),
2954             sizeof(uint16_t) +  /* action+category */
2955             IEEE80211_MESHGANN_BASE_SZ
2956         );
2957         if (m != NULL) {
2958                 /*
2959                  * mesh link metric
2960                  *   [1] category
2961                  *   [1] action
2962                  *   [tlv] mesh gate annoucement
2963                  */
2964                 *frm++ = category;
2965                 *frm++ = action;
2966                 frm = ieee80211_add_meshgate(frm, ie);
2967                 m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2968                 return mesh_send_action(ni, vap->iv_myaddr, broadcastaddr, m);
2969         } else {
2970                 vap->iv_stats.is_tx_nobuf++;
2971                 ieee80211_free_node(ni);
2972                 return ENOMEM;
2973         }
2974 }
2975
2976 static void
2977 mesh_peer_timeout_setup(struct ieee80211_node *ni)
2978 {
2979         switch (ni->ni_mlstate) {
2980         case IEEE80211_NODE_MESH_HOLDING:
2981                 ni->ni_mltval = ieee80211_mesh_holdingtimeout;
2982                 break;
2983         case IEEE80211_NODE_MESH_CONFIRMRCV:
2984                 ni->ni_mltval = ieee80211_mesh_confirmtimeout;
2985                 break;
2986         case IEEE80211_NODE_MESH_IDLE:
2987                 ni->ni_mltval = 0;
2988                 break;
2989         default:
2990                 ni->ni_mltval = ieee80211_mesh_retrytimeout;
2991                 break;
2992         }
2993         if (ni->ni_mltval)
2994                 callout_reset(&ni->ni_mltimer, ni->ni_mltval,
2995                     mesh_peer_timeout_cb, ni);
2996 }
2997
2998 /*
2999  * Same as above but backoffs timer statisically 50%.
3000  */
3001 static void
3002 mesh_peer_timeout_backoff(struct ieee80211_node *ni)
3003 {
3004         uint32_t r;
3005         
3006         r = arc4random();
3007         ni->ni_mltval += r % ni->ni_mltval;
3008         callout_reset(&ni->ni_mltimer, ni->ni_mltval, mesh_peer_timeout_cb,
3009             ni);
3010 }
3011
3012 static __inline void
3013 mesh_peer_timeout_stop(struct ieee80211_node *ni)
3014 {
3015         callout_drain(&ni->ni_mltimer);
3016 }
3017
3018 static void
3019 mesh_peer_backoff_cb(void *arg)
3020 {
3021         struct ieee80211_node *ni = (struct ieee80211_node *)arg;
3022
3023         /* After backoff timeout, try to peer automatically again. */
3024         ni->ni_mlhcnt = 0;
3025 }
3026
3027 /*
3028  * Mesh Peer Link Management FSM timeout handling.
3029  */
3030 static void
3031 mesh_peer_timeout_cb(void *arg)
3032 {
3033         struct ieee80211_node *ni = (struct ieee80211_node *)arg;
3034         uint16_t args[3];
3035
3036         IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_MESH,
3037             ni, "mesh link timeout, state %d, retry counter %d",
3038             ni->ni_mlstate, ni->ni_mlrcnt);
3039         
3040         switch (ni->ni_mlstate) {
3041         case IEEE80211_NODE_MESH_IDLE:
3042         case IEEE80211_NODE_MESH_ESTABLISHED:
3043                 break;
3044         case IEEE80211_NODE_MESH_OPENSNT:
3045         case IEEE80211_NODE_MESH_OPENRCV:
3046                 if (ni->ni_mlrcnt == ieee80211_mesh_maxretries) {
3047                         args[0] = ni->ni_mlpid;
3048                         args[2] = IEEE80211_REASON_MESH_MAX_RETRIES;
3049                         ieee80211_send_action(ni,
3050                             IEEE80211_ACTION_CAT_SELF_PROT,
3051                             IEEE80211_ACTION_MESHPEERING_CLOSE, args);
3052                         ni->ni_mlrcnt = 0;
3053                         mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
3054                         mesh_peer_timeout_setup(ni);
3055                 } else {
3056                         args[0] = ni->ni_mlpid;
3057                         ieee80211_send_action(ni,
3058                             IEEE80211_ACTION_CAT_SELF_PROT,
3059                             IEEE80211_ACTION_MESHPEERING_OPEN, args);
3060                         ni->ni_mlrcnt++;
3061                         mesh_peer_timeout_backoff(ni);
3062                 }
3063                 break;
3064         case IEEE80211_NODE_MESH_CONFIRMRCV:
3065                 args[0] = ni->ni_mlpid;
3066                 args[2] = IEEE80211_REASON_MESH_CONFIRM_TIMEOUT;
3067                 ieee80211_send_action(ni,
3068                     IEEE80211_ACTION_CAT_SELF_PROT,
3069                     IEEE80211_ACTION_MESHPEERING_CLOSE, args);
3070                 mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
3071                 mesh_peer_timeout_setup(ni);
3072                 break;
3073         case IEEE80211_NODE_MESH_HOLDING:
3074                 ni->ni_mlhcnt++;
3075                 if (ni->ni_mlhcnt >= ieee80211_mesh_maxholding)
3076                         callout_reset(&ni->ni_mlhtimer,
3077                             ieee80211_mesh_backofftimeout,
3078                             mesh_peer_backoff_cb, ni);
3079                 mesh_linkchange(ni, IEEE80211_NODE_MESH_IDLE);
3080                 break;
3081         }
3082 }
3083
3084 static int
3085 mesh_verify_meshid(struct ieee80211vap *vap, const uint8_t *ie)
3086 {
3087         struct ieee80211_mesh_state *ms = vap->iv_mesh;
3088
3089         if (ie == NULL || ie[1] != ms->ms_idlen)
3090                 return 1;
3091         return memcmp(ms->ms_id, ie + 2, ms->ms_idlen);
3092 }
3093
3094 /*
3095  * Check if we are using the same algorithms for this mesh.
3096  */
3097 static int
3098 mesh_verify_meshconf(struct ieee80211vap *vap, const uint8_t *ie)
3099 {
3100         const struct ieee80211_meshconf_ie *meshconf =
3101             (const struct ieee80211_meshconf_ie *) ie;
3102         const struct ieee80211_mesh_state *ms = vap->iv_mesh;
3103
3104         if (meshconf == NULL)
3105                 return 1;
3106         if (meshconf->conf_pselid != ms->ms_ppath->mpp_ie) {
3107                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_MESH,
3108                     "unknown path selection algorithm: 0x%x\n",
3109                     meshconf->conf_pselid);
3110                 return 1;
3111         }
3112         if (meshconf->conf_pmetid != ms->ms_pmetric->mpm_ie) {
3113                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_MESH,
3114                     "unknown path metric algorithm: 0x%x\n",
3115                     meshconf->conf_pmetid);
3116                 return 1;
3117         }
3118         if (meshconf->conf_ccid != 0) {
3119                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_MESH,
3120                     "unknown congestion control algorithm: 0x%x\n",
3121                     meshconf->conf_ccid);
3122                 return 1;
3123         }
3124         if (meshconf->conf_syncid != IEEE80211_MESHCONF_SYNC_NEIGHOFF) {
3125                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_MESH,
3126                     "unknown sync algorithm: 0x%x\n",
3127                     meshconf->conf_syncid);
3128                 return 1;
3129         }
3130         if (meshconf->conf_authid != 0) {
3131                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_MESH,
3132                     "unknown auth auth algorithm: 0x%x\n",
3133                     meshconf->conf_pselid);
3134                 return 1;
3135         }
3136         /* Not accepting peers */
3137         if (!(meshconf->conf_cap & IEEE80211_MESHCONF_CAP_AP)) {
3138                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_MESH,
3139                     "not accepting peers: 0x%x\n", meshconf->conf_cap);
3140                 return 1;
3141         }
3142         return 0;
3143 }
3144
3145 static int
3146 mesh_verify_meshpeer(struct ieee80211vap *vap, uint8_t subtype,
3147     const uint8_t *ie)
3148 {
3149         const struct ieee80211_meshpeer_ie *meshpeer =
3150             (const struct ieee80211_meshpeer_ie *) ie;
3151
3152         if (meshpeer == NULL ||
3153             meshpeer->peer_len < IEEE80211_MPM_BASE_SZ ||
3154             meshpeer->peer_len > IEEE80211_MPM_MAX_SZ)
3155                 return 1;
3156         if (meshpeer->peer_proto != IEEE80211_MPPID_MPM) {
3157                 IEEE80211_DPRINTF(vap,
3158                     IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH,
3159                     "Only MPM protocol is supported (proto: 0x%02X)",
3160                     meshpeer->peer_proto);
3161                 return 1;
3162         }
3163         switch (subtype) {
3164         case IEEE80211_ACTION_MESHPEERING_OPEN:
3165                 if (meshpeer->peer_len != IEEE80211_MPM_BASE_SZ)
3166                         return 1;
3167                 break;
3168         case IEEE80211_ACTION_MESHPEERING_CONFIRM:
3169                 if (meshpeer->peer_len != IEEE80211_MPM_BASE_SZ + 2)
3170                         return 1;
3171                 break;
3172         case IEEE80211_ACTION_MESHPEERING_CLOSE:
3173                 if (meshpeer->peer_len < IEEE80211_MPM_BASE_SZ + 2)
3174                         return 1;
3175                 if (meshpeer->peer_len == (IEEE80211_MPM_BASE_SZ + 2) &&
3176                     meshpeer->peer_linkid != 0)
3177                         return 1;
3178                 if (meshpeer->peer_rcode == 0)
3179                         return 1;
3180                 break;
3181         }
3182         return 0;
3183 }
3184
3185 /*
3186  * Add a Mesh ID IE to a frame.
3187  */
3188 uint8_t *
3189 ieee80211_add_meshid(uint8_t *frm, struct ieee80211vap *vap)
3190 {
3191         struct ieee80211_mesh_state *ms = vap->iv_mesh;
3192
3193         KASSERT(vap->iv_opmode == IEEE80211_M_MBSS, ("not a mbss vap"));
3194
3195         *frm++ = IEEE80211_ELEMID_MESHID;
3196         *frm++ = ms->ms_idlen;
3197         memcpy(frm, ms->ms_id, ms->ms_idlen);
3198         return frm + ms->ms_idlen;
3199 }
3200
3201 /*
3202  * Add a Mesh Configuration IE to a frame.
3203  * For now just use HWMP routing, Airtime link metric, Null Congestion
3204  * Signaling, Null Sync Protocol and Null Authentication.
3205  */
3206 uint8_t *
3207 ieee80211_add_meshconf(uint8_t *frm, struct ieee80211vap *vap)
3208 {
3209         const struct ieee80211_mesh_state *ms = vap->iv_mesh;
3210         uint16_t caps;
3211
3212         KASSERT(vap->iv_opmode == IEEE80211_M_MBSS, ("not a MBSS vap"));
3213
3214         *frm++ = IEEE80211_ELEMID_MESHCONF;
3215         *frm++ = IEEE80211_MESH_CONF_SZ;
3216         *frm++ = ms->ms_ppath->mpp_ie;          /* path selection */
3217         *frm++ = ms->ms_pmetric->mpm_ie;        /* link metric */
3218         *frm++ = IEEE80211_MESHCONF_CC_DISABLED;
3219         *frm++ = IEEE80211_MESHCONF_SYNC_NEIGHOFF;
3220         *frm++ = IEEE80211_MESHCONF_AUTH_DISABLED;
3221         /* NB: set the number of neighbors before the rest */
3222         *frm = (ms->ms_neighbors > IEEE80211_MESH_MAX_NEIGHBORS ?
3223             IEEE80211_MESH_MAX_NEIGHBORS : ms->ms_neighbors) << 1;
3224         if (ms->ms_flags & IEEE80211_MESHFLAGS_GATE)
3225                 *frm |= IEEE80211_MESHCONF_FORM_GATE;
3226         frm += 1;
3227         caps = 0;
3228         if (ms->ms_flags & IEEE80211_MESHFLAGS_AP)
3229                 caps |= IEEE80211_MESHCONF_CAP_AP;
3230         if (ms->ms_flags & IEEE80211_MESHFLAGS_FWD)
3231                 caps |= IEEE80211_MESHCONF_CAP_FWRD;
3232         *frm++ = caps;
3233         return frm;
3234 }
3235
3236 /*
3237  * Add a Mesh Peer Management IE to a frame.
3238  */
3239 uint8_t *
3240 ieee80211_add_meshpeer(uint8_t *frm, uint8_t subtype, uint16_t localid,
3241     uint16_t peerid, uint16_t reason)
3242 {
3243
3244         KASSERT(localid != 0, ("localid == 0"));
3245
3246         *frm++ = IEEE80211_ELEMID_MESHPEER;
3247         switch (subtype) {
3248         case IEEE80211_ACTION_MESHPEERING_OPEN:
3249                 *frm++ = IEEE80211_MPM_BASE_SZ;         /* length */
3250                 ADDSHORT(frm, IEEE80211_MPPID_MPM);     /* proto */
3251                 ADDSHORT(frm, localid);                 /* local ID */
3252                 break;
3253         case IEEE80211_ACTION_MESHPEERING_CONFIRM:
3254                 KASSERT(peerid != 0, ("sending peer confirm without peer id"));
3255                 *frm++ = IEEE80211_MPM_BASE_SZ + 2;     /* length */
3256                 ADDSHORT(frm, IEEE80211_MPPID_MPM);     /* proto */
3257                 ADDSHORT(frm, localid);                 /* local ID */
3258                 ADDSHORT(frm, peerid);                  /* peer ID */
3259                 break;
3260         case IEEE80211_ACTION_MESHPEERING_CLOSE:
3261                 if (peerid)
3262                         *frm++ = IEEE80211_MPM_MAX_SZ;  /* length */
3263                 else
3264                         *frm++ = IEEE80211_MPM_BASE_SZ + 2; /* length */
3265                 ADDSHORT(frm, IEEE80211_MPPID_MPM);     /* proto */
3266                 ADDSHORT(frm, localid); /* local ID */
3267                 if (peerid)
3268                         ADDSHORT(frm, peerid);  /* peer ID */
3269                 ADDSHORT(frm, reason);
3270                 break;
3271         }
3272         return frm;
3273 }
3274
3275 /*
3276  * Compute an Airtime Link Metric for the link with this node.
3277  *
3278  * Based on Draft 3.0 spec (11B.10, p.149).
3279  */
3280 /*
3281  * Max 802.11s overhead.
3282  */
3283 #define IEEE80211_MESH_MAXOVERHEAD \
3284         (sizeof(struct ieee80211_qosframe_addr4) \
3285          + sizeof(struct ieee80211_meshcntl_ae10) \
3286         + sizeof(struct llc) \
3287         + IEEE80211_ADDR_LEN \
3288         + IEEE80211_WEP_IVLEN \
3289         + IEEE80211_WEP_KIDLEN \
3290         + IEEE80211_WEP_CRCLEN \
3291         + IEEE80211_WEP_MICLEN \
3292         + IEEE80211_CRC_LEN)
3293 uint32_t
3294 mesh_airtime_calc(struct ieee80211_node *ni)
3295 {
3296 #define M_BITS 8
3297 #define S_FACTOR (2 * M_BITS)
3298         struct ieee80211com *ic = ni->ni_ic;
3299         struct ifnet *ifp = ni->ni_vap->iv_ifp;
3300         const static int nbits = 8192 << M_BITS;
3301         uint32_t overhead, rate, errrate;
3302         uint64_t res;
3303
3304         /* Time to transmit a frame */
3305         rate = ni->ni_txrate;
3306         overhead = ieee80211_compute_duration(ic->ic_rt,
3307             ifp->if_mtu + IEEE80211_MESH_MAXOVERHEAD, rate, 0) << M_BITS;
3308         /* Error rate in percentage */
3309         /* XXX assuming small failures are ok */
3310         errrate = (((ifp->if_get_counter(ifp, IFCOUNTER_OERRORS) +
3311             ifp->if_get_counter(ifp, IFCOUNTER_IERRORS)) / 100) << M_BITS)
3312             / 100;
3313         res = (overhead + (nbits / rate)) *
3314             ((1 << S_FACTOR) / ((1 << M_BITS) - errrate));
3315
3316         return (uint32_t)(res >> S_FACTOR);
3317 #undef M_BITS
3318 #undef S_FACTOR
3319 }
3320
3321 /*
3322  * Add a Mesh Link Metric report IE to a frame.
3323  */
3324 uint8_t *
3325 ieee80211_add_meshlmetric(uint8_t *frm, uint8_t flags, uint32_t metric)
3326 {
3327         *frm++ = IEEE80211_ELEMID_MESHLINK;
3328         *frm++ = 5;
3329         *frm++ = flags;
3330         ADDWORD(frm, metric);
3331         return frm;
3332 }
3333
3334 /*
3335  * Add a Mesh Gate Announcement IE to a frame.
3336  */
3337 uint8_t *
3338 ieee80211_add_meshgate(uint8_t *frm, struct ieee80211_meshgann_ie *ie)
3339 {
3340         *frm++ = IEEE80211_ELEMID_MESHGANN; /* ie */
3341         *frm++ = IEEE80211_MESHGANN_BASE_SZ; /* len */
3342         *frm++ = ie->gann_flags;
3343         *frm++ = ie->gann_hopcount;
3344         *frm++ = ie->gann_ttl;
3345         IEEE80211_ADDR_COPY(frm, ie->gann_addr);
3346         frm += 6;
3347         ADDWORD(frm, ie->gann_seq);
3348         ADDSHORT(frm, ie->gann_interval);
3349         return frm;
3350 }
3351 #undef ADDSHORT
3352 #undef ADDWORD
3353
3354 /*
3355  * Initialize any mesh-specific node state.
3356  */
3357 void
3358 ieee80211_mesh_node_init(struct ieee80211vap *vap, struct ieee80211_node *ni)
3359 {
3360         ni->ni_flags |= IEEE80211_NODE_QOS;
3361         callout_init(&ni->ni_mltimer, 1);
3362         callout_init(&ni->ni_mlhtimer, 1);
3363 }
3364
3365 /*
3366  * Cleanup any mesh-specific node state.
3367  */
3368 void
3369 ieee80211_mesh_node_cleanup(struct ieee80211_node *ni)
3370 {
3371         struct ieee80211vap *vap = ni->ni_vap;
3372         struct ieee80211_mesh_state *ms = vap->iv_mesh;
3373
3374         callout_drain(&ni->ni_mltimer);
3375         callout_drain(&ni->ni_mlhtimer);
3376         /* NB: short-circuit callbacks after mesh_vdetach */
3377         if (vap->iv_mesh != NULL)
3378                 ms->ms_ppath->mpp_peerdown(ni);
3379 }
3380
3381 void
3382 ieee80211_parse_meshid(struct ieee80211_node *ni, const uint8_t *ie)
3383 {
3384         ni->ni_meshidlen = ie[1];
3385         memcpy(ni->ni_meshid, ie + 2, ie[1]);
3386 }
3387
3388 /*
3389  * Setup mesh-specific node state on neighbor discovery.
3390  */
3391 void
3392 ieee80211_mesh_init_neighbor(struct ieee80211_node *ni,
3393         const struct ieee80211_frame *wh,
3394         const struct ieee80211_scanparams *sp)
3395 {
3396         ieee80211_parse_meshid(ni, sp->meshid);
3397 }
3398
3399 void
3400 ieee80211_mesh_update_beacon(struct ieee80211vap *vap,
3401         struct ieee80211_beacon_offsets *bo)
3402 {
3403         KASSERT(vap->iv_opmode == IEEE80211_M_MBSS, ("not a MBSS vap"));
3404
3405         if (isset(bo->bo_flags, IEEE80211_BEACON_MESHCONF)) {
3406                 (void)ieee80211_add_meshconf(bo->bo_meshconf, vap);
3407                 clrbit(bo->bo_flags, IEEE80211_BEACON_MESHCONF);
3408         }
3409 }
3410
3411 static int
3412 mesh_ioctl_get80211(struct ieee80211vap *vap, struct ieee80211req *ireq)
3413 {
3414         struct ieee80211_mesh_state *ms = vap->iv_mesh;
3415         uint8_t tmpmeshid[IEEE80211_NWID_LEN];
3416         struct ieee80211_mesh_route *rt;
3417         struct ieee80211req_mesh_route *imr;
3418         size_t len, off;
3419         uint8_t *p;
3420         int error;
3421
3422         if (vap->iv_opmode != IEEE80211_M_MBSS)
3423                 return ENOSYS;
3424
3425         error = 0;
3426         switch (ireq->i_type) {
3427         case IEEE80211_IOC_MESH_ID:
3428                 ireq->i_len = ms->ms_idlen;
3429                 memcpy(tmpmeshid, ms->ms_id, ireq->i_len);
3430                 error = copyout(tmpmeshid, ireq->i_data, ireq->i_len);
3431                 break;
3432         case IEEE80211_IOC_MESH_AP:
3433                 ireq->i_val = (ms->ms_flags & IEEE80211_MESHFLAGS_AP) != 0;
3434                 break;
3435         case IEEE80211_IOC_MESH_FWRD:
3436                 ireq->i_val = (ms->ms_flags & IEEE80211_MESHFLAGS_FWD) != 0;
3437                 break;
3438         case IEEE80211_IOC_MESH_GATE:
3439                 ireq->i_val = (ms->ms_flags & IEEE80211_MESHFLAGS_GATE) != 0;
3440                 break;
3441         case IEEE80211_IOC_MESH_TTL:
3442                 ireq->i_val = ms->ms_ttl;
3443                 break;
3444         case IEEE80211_IOC_MESH_RTCMD:
3445                 switch (ireq->i_val) {
3446                 case IEEE80211_MESH_RTCMD_LIST:
3447                         len = 0;
3448                         MESH_RT_LOCK(ms);
3449                         TAILQ_FOREACH(rt, &ms->ms_routes, rt_next) {
3450                                 len += sizeof(*imr);
3451                         }
3452                         MESH_RT_UNLOCK(ms);
3453                         if (len > ireq->i_len || ireq->i_len < sizeof(*imr)) {
3454                                 ireq->i_len = len;
3455                                 return ENOMEM;
3456                         }
3457                         ireq->i_len = len;
3458                         /* XXX M_WAIT? */
3459                         p = IEEE80211_MALLOC(len, M_TEMP,
3460                             IEEE80211_M_NOWAIT | IEEE80211_M_ZERO);
3461                         if (p == NULL)
3462                                 return ENOMEM;
3463                         off = 0;
3464                         MESH_RT_LOCK(ms);
3465                         TAILQ_FOREACH(rt, &ms->ms_routes, rt_next) {
3466                                 if (off >= len)
3467                                         break;
3468                                 imr = (struct ieee80211req_mesh_route *)
3469                                     (p + off);
3470                                 IEEE80211_ADDR_COPY(imr->imr_dest,
3471                                     rt->rt_dest);
3472                                 IEEE80211_ADDR_COPY(imr->imr_nexthop,
3473                                     rt->rt_nexthop);
3474                                 imr->imr_metric = rt->rt_metric;
3475                                 imr->imr_nhops = rt->rt_nhops;
3476                                 imr->imr_lifetime =
3477                                     ieee80211_mesh_rt_update(rt, 0);
3478                                 imr->imr_lastmseq = rt->rt_lastmseq;
3479                                 imr->imr_flags = rt->rt_flags; /* last */
3480                                 off += sizeof(*imr);
3481                         }
3482                         MESH_RT_UNLOCK(ms);
3483                         error = copyout(p, (uint8_t *)ireq->i_data,
3484                             ireq->i_len);
3485                         IEEE80211_FREE(p, M_TEMP);
3486                         break;
3487                 case IEEE80211_MESH_RTCMD_FLUSH:
3488                 case IEEE80211_MESH_RTCMD_ADD:
3489                 case IEEE80211_MESH_RTCMD_DELETE:
3490                         return EINVAL;
3491                 default:
3492                         return ENOSYS;
3493                 }
3494                 break;
3495         case IEEE80211_IOC_MESH_PR_METRIC:
3496                 len = strlen(ms->ms_pmetric->mpm_descr);
3497                 if (ireq->i_len < len)
3498                         return EINVAL;
3499                 ireq->i_len = len;
3500                 error = copyout(ms->ms_pmetric->mpm_descr,
3501                     (uint8_t *)ireq->i_data, len);
3502                 break;
3503         case IEEE80211_IOC_MESH_PR_PATH:
3504                 len = strlen(ms->ms_ppath->mpp_descr);
3505                 if (ireq->i_len < len)
3506                         return EINVAL;
3507                 ireq->i_len = len;
3508                 error = copyout(ms->ms_ppath->mpp_descr,
3509                     (uint8_t *)ireq->i_data, len);
3510                 break;
3511         default:
3512                 return ENOSYS;
3513         }
3514
3515         return error;
3516 }
3517 IEEE80211_IOCTL_GET(mesh, mesh_ioctl_get80211);
3518
3519 static int
3520 mesh_ioctl_set80211(struct ieee80211vap *vap, struct ieee80211req *ireq)
3521 {
3522         struct ieee80211_mesh_state *ms = vap->iv_mesh;
3523         uint8_t tmpmeshid[IEEE80211_NWID_LEN];
3524         uint8_t tmpaddr[IEEE80211_ADDR_LEN];
3525         char tmpproto[IEEE80211_MESH_PROTO_DSZ];
3526         int error;
3527
3528         if (vap->iv_opmode != IEEE80211_M_MBSS)
3529                 return ENOSYS;
3530
3531         error = 0;
3532         switch (ireq->i_type) {
3533         case IEEE80211_IOC_MESH_ID:
3534                 if (ireq->i_val != 0 || ireq->i_len > IEEE80211_MESHID_LEN)
3535                         return EINVAL;
3536                 error = copyin(ireq->i_data, tmpmeshid, ireq->i_len);
3537                 if (error != 0)
3538                         break;
3539                 memset(ms->ms_id, 0, IEEE80211_NWID_LEN);
3540                 ms->ms_idlen = ireq->i_len;
3541                 memcpy(ms->ms_id, tmpmeshid, ireq->i_len);
3542                 error = ENETRESET;
3543                 break;
3544         case IEEE80211_IOC_MESH_AP:
3545                 if (ireq->i_val)
3546                         ms->ms_flags |= IEEE80211_MESHFLAGS_AP;
3547                 else
3548                         ms->ms_flags &= ~IEEE80211_MESHFLAGS_AP;
3549                 error = ENETRESET;
3550                 break;
3551         case IEEE80211_IOC_MESH_FWRD:
3552                 if (ireq->i_val)
3553                         ms->ms_flags |= IEEE80211_MESHFLAGS_FWD;
3554                 else
3555                         ms->ms_flags &= ~IEEE80211_MESHFLAGS_FWD;
3556                 mesh_gatemode_setup(vap);
3557                 break;
3558         case IEEE80211_IOC_MESH_GATE:
3559                 if (ireq->i_val)
3560                         ms->ms_flags |= IEEE80211_MESHFLAGS_GATE;
3561                 else
3562                         ms->ms_flags &= ~IEEE80211_MESHFLAGS_GATE;
3563                 break;
3564         case IEEE80211_IOC_MESH_TTL:
3565                 ms->ms_ttl = (uint8_t) ireq->i_val;
3566                 break;
3567         case IEEE80211_IOC_MESH_RTCMD:
3568                 switch (ireq->i_val) {
3569                 case IEEE80211_MESH_RTCMD_LIST:
3570                         return EINVAL;
3571                 case IEEE80211_MESH_RTCMD_FLUSH:
3572                         ieee80211_mesh_rt_flush(vap);
3573                         break;
3574                 case IEEE80211_MESH_RTCMD_ADD:
3575                         if (IEEE80211_ADDR_EQ(vap->iv_myaddr, ireq->i_data) ||
3576                             IEEE80211_ADDR_EQ(broadcastaddr, ireq->i_data))
3577                                 return EINVAL;
3578                         error = copyin(ireq->i_data, &tmpaddr,
3579                             IEEE80211_ADDR_LEN);
3580                         if (error == 0)
3581                                 ieee80211_mesh_discover(vap, tmpaddr, NULL);
3582                         break;
3583                 case IEEE80211_MESH_RTCMD_DELETE:
3584                         ieee80211_mesh_rt_del(vap, ireq->i_data);
3585                         break;
3586                 default:
3587                         return ENOSYS;
3588                 }
3589                 break;
3590         case IEEE80211_IOC_MESH_PR_METRIC:
3591                 error = copyin(ireq->i_data, tmpproto, sizeof(tmpproto));
3592                 if (error == 0) {
3593                         error = mesh_select_proto_metric(vap, tmpproto);
3594                         if (error == 0)
3595                                 error = ENETRESET;
3596                 }
3597                 break;
3598         case IEEE80211_IOC_MESH_PR_PATH:
3599                 error = copyin(ireq->i_data, tmpproto, sizeof(tmpproto));
3600                 if (error == 0) {
3601                         error = mesh_select_proto_path(vap, tmpproto);
3602                         if (error == 0)
3603                                 error = ENETRESET;
3604                 }
3605                 break;
3606         default:
3607                 return ENOSYS;
3608         }
3609         return error;
3610 }
3611 IEEE80211_IOCTL_SET(mesh, mesh_ioctl_set80211);