8652950037c6aeacffbf8ba1337111223b7d153d
[dragonfly.git] / sys / netproto / 802_11 / wlan / 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  * $FreeBSD: head/sys/net80211/ieee80211_mesh.c 203423 2010-02-03 10:12:49Z rpaulo $
30  * $DragonFly$
31  */ 
32
33 /*
34  * IEEE 802.11s Mesh Point (MBSS) support.
35  *
36  * Based on March 2009, D3.0 802.11s draft spec.
37  */
38 #include "opt_inet.h"
39 #include "opt_wlan.h"
40
41 #include <sys/param.h>
42 #include <sys/systm.h> 
43 #include <sys/mbuf.h>   
44 #include <sys/malloc.h>
45 #include <sys/kernel.h>
46
47 #include <sys/socket.h>
48 #include <sys/sockio.h>
49 #include <sys/endian.h>
50 #include <sys/errno.h>
51 #include <sys/proc.h>
52 #include <sys/sysctl.h>
53
54 #include <net/if.h>
55 #include <net/if_media.h>
56 #include <net/if_llc.h>
57 #include <net/ethernet.h>
58 #include <net/route.h>
59
60 #include <netproto/802_11/ieee80211_var.h>
61 #include <netproto/802_11/ieee80211_action.h>
62 #include <netproto/802_11/ieee80211_input.h>
63 #include <netproto/802_11/ieee80211_mesh.h>
64
65 static void     mesh_rt_flush_invalid(struct ieee80211vap *);
66 static int      mesh_select_proto_path(struct ieee80211vap *, const char *);
67 static int      mesh_select_proto_metric(struct ieee80211vap *, const char *);
68 static void     mesh_vattach(struct ieee80211vap *);
69 static int      mesh_newstate(struct ieee80211vap *, enum ieee80211_state, int);
70 static void     mesh_rt_cleanup_cb(void *);
71 static void     mesh_linkchange(struct ieee80211_node *,
72                     enum ieee80211_mesh_mlstate);
73 static void     mesh_checkid(void *, struct ieee80211_node *);
74 static uint32_t mesh_generateid(struct ieee80211vap *);
75 static int      mesh_checkpseq(struct ieee80211vap *,
76                     const uint8_t [IEEE80211_ADDR_LEN], uint32_t);
77 static struct ieee80211_node *
78                 mesh_find_txnode(struct ieee80211vap *,
79                     const uint8_t [IEEE80211_ADDR_LEN]);
80 static void     mesh_forward(struct ieee80211vap *, struct mbuf *,
81                     const struct ieee80211_meshcntl *);
82 static int      mesh_input(struct ieee80211_node *, struct mbuf *, int, int);
83 static void     mesh_recv_mgmt(struct ieee80211_node *, struct mbuf *, int,
84                     int, int);
85 static void     mesh_peer_timeout_setup(struct ieee80211_node *);
86 static void     mesh_peer_timeout_backoff(struct ieee80211_node *);
87 static void     mesh_peer_timeout_cb(void *);
88 static __inline void
89                 mesh_peer_timeout_stop(struct ieee80211_node *);
90 static int      mesh_verify_meshid(struct ieee80211vap *, const uint8_t *);
91 static int      mesh_verify_meshconf(struct ieee80211vap *, const uint8_t *);
92 static int      mesh_verify_meshpeer(struct ieee80211vap *, uint8_t,
93                     const uint8_t *);
94 uint32_t        mesh_airtime_calc(struct ieee80211_node *);
95
96 /*
97  * Timeout values come from the specification and are in milliseconds.
98  */
99 SYSCTL_NODE(_net_wlan, OID_AUTO, mesh, CTLFLAG_RD, 0,
100     "IEEE 802.11s parameters");
101 static int ieee80211_mesh_retrytimeout = -1;
102 SYSCTL_PROC(_net_wlan_mesh, OID_AUTO, retrytimeout, CTLTYPE_INT | CTLFLAG_RW,
103     &ieee80211_mesh_retrytimeout, 0, ieee80211_sysctl_msecs_ticks, "I",
104     "Retry timeout (msec)");
105 static int ieee80211_mesh_holdingtimeout = -1;
106 SYSCTL_PROC(_net_wlan_mesh, OID_AUTO, holdingtimeout, CTLTYPE_INT | CTLFLAG_RW,
107     &ieee80211_mesh_holdingtimeout, 0, ieee80211_sysctl_msecs_ticks, "I",
108     "Holding state timeout (msec)");
109 static int ieee80211_mesh_confirmtimeout = -1;
110 SYSCTL_PROC(_net_wlan_mesh, OID_AUTO, confirmtimeout, CTLTYPE_INT | CTLFLAG_RW,
111     &ieee80211_mesh_confirmtimeout, 0, ieee80211_sysctl_msecs_ticks, "I",
112     "Confirm state timeout (msec)");
113 static int ieee80211_mesh_maxretries = 2;
114 SYSCTL_INT(_net_wlan_mesh, OID_AUTO, maxretries, CTLTYPE_INT | CTLFLAG_RW,
115     &ieee80211_mesh_maxretries, 0,
116     "Maximum retries during peer link establishment");
117
118 static const uint8_t broadcastaddr[IEEE80211_ADDR_LEN] =
119         { 0xff, 0xff, 0xff, 0xff, 0xff, 0xff };
120
121 static  ieee80211_recv_action_func mesh_recv_action_meshpeering_open;
122 static  ieee80211_recv_action_func mesh_recv_action_meshpeering_confirm;
123 static  ieee80211_recv_action_func mesh_recv_action_meshpeering_close;
124 static  ieee80211_recv_action_func mesh_recv_action_meshlmetric_req;
125 static  ieee80211_recv_action_func mesh_recv_action_meshlmetric_rep;
126
127 static  ieee80211_send_action_func mesh_send_action_meshpeering_open;
128 static  ieee80211_send_action_func mesh_send_action_meshpeering_confirm;
129 static  ieee80211_send_action_func mesh_send_action_meshpeering_close;
130 static  ieee80211_send_action_func mesh_send_action_meshlink_request;
131 static  ieee80211_send_action_func mesh_send_action_meshlink_reply;
132
133 static const struct ieee80211_mesh_proto_metric mesh_metric_airtime = {
134         .mpm_descr      = "AIRTIME",
135         .mpm_ie         = IEEE80211_MESHCONF_METRIC_AIRTIME,
136         .mpm_metric     = mesh_airtime_calc,
137 };
138
139 static struct ieee80211_mesh_proto_path         mesh_proto_paths[4];
140 static struct ieee80211_mesh_proto_metric       mesh_proto_metrics[4];
141
142 #define MESH_RT_LOCK(ms)        lockmgr(&(ms)->ms_rt_lock, LK_EXCLUSIVE)
143 #define MESH_RT_LOCK_ASSERT(ms) \
144         KKASSERT(lockstatus(&(ms)->ms_rt_lock, curthread) != 0)
145 #define MESH_RT_UNLOCK(ms)      lockmgr(&(ms)->ms_rt_lock, LK_RELEASE)
146
147 MALLOC_DEFINE(M_80211_MESH_RT, "80211mesh", "802.11s routing table");
148
149 /*
150  * Helper functions to manipulate the Mesh routing table.
151  */
152
153 static struct ieee80211_mesh_route *
154 mesh_rt_find_locked(struct ieee80211_mesh_state *ms,
155     const uint8_t dest[IEEE80211_ADDR_LEN])
156 {
157         struct ieee80211_mesh_route *rt;
158
159         MESH_RT_LOCK_ASSERT(ms);
160
161         TAILQ_FOREACH(rt, &ms->ms_routes, rt_next) {
162                 if (IEEE80211_ADDR_EQ(dest, rt->rt_dest))
163                         return rt;
164         }
165         return NULL;
166 }
167
168 static struct ieee80211_mesh_route *
169 mesh_rt_add_locked(struct ieee80211_mesh_state *ms,
170     const uint8_t dest[IEEE80211_ADDR_LEN])
171 {
172         struct ieee80211_mesh_route *rt;
173
174         KASSERT(!IEEE80211_ADDR_EQ(broadcastaddr, dest),
175             ("%s: adding broadcast to the routing table", __func__));
176
177         MESH_RT_LOCK_ASSERT(ms);
178
179         rt = kmalloc(ALIGN(sizeof(struct ieee80211_mesh_route)) +
180             ms->ms_ppath->mpp_privlen, M_80211_MESH_RT, M_INTWAIT | M_ZERO);
181         if (rt != NULL) {
182                 IEEE80211_ADDR_COPY(rt->rt_dest, dest);
183                 rt->rt_priv = (void *)ALIGN(&rt[1]);
184                 rt->rt_crtime = ticks;
185                 TAILQ_INSERT_TAIL(&ms->ms_routes, rt, rt_next);
186         }
187         return rt;
188 }
189
190 struct ieee80211_mesh_route *
191 ieee80211_mesh_rt_find(struct ieee80211vap *vap,
192     const uint8_t dest[IEEE80211_ADDR_LEN])
193 {
194         struct ieee80211_mesh_state *ms = vap->iv_mesh;
195         struct ieee80211_mesh_route *rt;
196
197         MESH_RT_LOCK(ms);
198         rt = mesh_rt_find_locked(ms, dest);
199         MESH_RT_UNLOCK(ms);
200         return rt;
201 }
202
203 struct ieee80211_mesh_route *
204 ieee80211_mesh_rt_add(struct ieee80211vap *vap,
205     const uint8_t dest[IEEE80211_ADDR_LEN])
206 {
207         struct ieee80211_mesh_state *ms = vap->iv_mesh;
208         struct ieee80211_mesh_route *rt;
209
210         KASSERT(ieee80211_mesh_rt_find(vap, dest) == NULL,
211             ("%s: duplicate entry in the routing table", __func__));
212         KASSERT(!IEEE80211_ADDR_EQ(vap->iv_myaddr, dest),
213             ("%s: adding self to the routing table", __func__));
214
215         MESH_RT_LOCK(ms);
216         rt = mesh_rt_add_locked(ms, dest);
217         MESH_RT_UNLOCK(ms);
218         return rt;
219 }
220
221 /*
222  * Add a proxy route (as needed) for the specified destination.
223  */
224 void
225 ieee80211_mesh_proxy_check(struct ieee80211vap *vap,
226     const uint8_t dest[IEEE80211_ADDR_LEN])
227 {
228         struct ieee80211_mesh_state *ms = vap->iv_mesh;
229         struct ieee80211_mesh_route *rt;
230
231         MESH_RT_LOCK(ms);
232         rt = mesh_rt_find_locked(ms, dest);
233         if (rt == NULL) {
234                 rt = mesh_rt_add_locked(ms, dest);
235                 if (rt == NULL) {
236                         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, dest,
237                             "%s", "unable to add proxy entry");
238                         vap->iv_stats.is_mesh_rtaddfailed++;
239                 } else {
240                         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, dest,
241                             "%s", "add proxy entry");
242                         IEEE80211_ADDR_COPY(rt->rt_nexthop, vap->iv_myaddr);
243                         rt->rt_flags |= IEEE80211_MESHRT_FLAGS_VALID
244                                      |  IEEE80211_MESHRT_FLAGS_PROXY;
245                 }
246         /* XXX assert PROXY? */
247         } else if ((rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) == 0) {
248                 struct ieee80211com *ic = vap->iv_ic;
249                 /*
250                  * Fix existing entry created by received frames from
251                  * stations that have some memory of dest.  We also
252                  * flush any frames held on the staging queue; delivering
253                  * them is too much trouble right now.
254                  */
255                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, dest,
256                     "%s", "fix proxy entry");
257                 IEEE80211_ADDR_COPY(rt->rt_nexthop, vap->iv_myaddr);
258                 rt->rt_flags |= IEEE80211_MESHRT_FLAGS_VALID
259                              |  IEEE80211_MESHRT_FLAGS_PROXY;
260                 /* XXX belongs in hwmp */
261                 ieee80211_ageq_drain_node(&ic->ic_stageq,
262                    (void *)(uintptr_t) ieee80211_mac_hash(ic, dest));
263                 /* XXX stat? */
264         }
265         MESH_RT_UNLOCK(ms);
266 }
267
268 static __inline void
269 mesh_rt_del(struct ieee80211_mesh_state *ms, struct ieee80211_mesh_route *rt)
270 {
271         TAILQ_REMOVE(&ms->ms_routes, rt, rt_next);
272         kfree(rt, M_80211_MESH_RT);
273 }
274
275 void
276 ieee80211_mesh_rt_del(struct ieee80211vap *vap,
277     const uint8_t dest[IEEE80211_ADDR_LEN])
278 {
279         struct ieee80211_mesh_state *ms = vap->iv_mesh;
280         struct ieee80211_mesh_route *rt, *next;
281
282         MESH_RT_LOCK(ms);
283         TAILQ_FOREACH_MUTABLE(rt, &ms->ms_routes, rt_next, next) {
284                 if (IEEE80211_ADDR_EQ(rt->rt_dest, dest)) {
285                         mesh_rt_del(ms, rt);
286                         MESH_RT_UNLOCK(ms);
287                         return;
288                 }
289         }
290         MESH_RT_UNLOCK(ms);
291 }
292
293 void
294 ieee80211_mesh_rt_flush(struct ieee80211vap *vap)
295 {
296         struct ieee80211_mesh_state *ms = vap->iv_mesh;
297         struct ieee80211_mesh_route *rt, *next;
298
299         if (ms == NULL)
300                 return;
301         MESH_RT_LOCK(ms);
302         TAILQ_FOREACH_MUTABLE(rt, &ms->ms_routes, rt_next, next)
303                 mesh_rt_del(ms, rt);
304         MESH_RT_UNLOCK(ms);
305 }
306
307 void
308 ieee80211_mesh_rt_flush_peer(struct ieee80211vap *vap,
309     const uint8_t peer[IEEE80211_ADDR_LEN])
310 {
311         struct ieee80211_mesh_state *ms = vap->iv_mesh;
312         struct ieee80211_mesh_route *rt, *next;
313
314         MESH_RT_LOCK(ms);
315         TAILQ_FOREACH_MUTABLE(rt, &ms->ms_routes, rt_next, next) {
316                 if (IEEE80211_ADDR_EQ(rt->rt_nexthop, peer))
317                         mesh_rt_del(ms, rt);
318         }
319         MESH_RT_UNLOCK(ms);
320 }
321
322 /*
323  * Flush expired routing entries, i.e. those in invalid state for
324  * some time.
325  */
326 static void
327 mesh_rt_flush_invalid(struct ieee80211vap *vap)
328 {
329         struct ieee80211_mesh_state *ms = vap->iv_mesh;
330         struct ieee80211_mesh_route *rt, *next;
331
332         if (ms == NULL)
333                 return;
334         MESH_RT_LOCK(ms);
335         TAILQ_FOREACH_MUTABLE(rt, &ms->ms_routes, rt_next, next) {
336                 if ((rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) == 0 &&
337                     ticks - rt->rt_crtime >= ms->ms_ppath->mpp_inact)
338                         mesh_rt_del(ms, rt);
339         }
340         MESH_RT_UNLOCK(ms);
341 }
342
343 #define N(a)    (sizeof(a) / sizeof(a[0]))
344 int
345 ieee80211_mesh_register_proto_path(const struct ieee80211_mesh_proto_path *mpp)
346 {
347         int i, firstempty = -1;
348
349         for (i = 0; i < N(mesh_proto_paths); i++) {
350                 if (strncmp(mpp->mpp_descr, mesh_proto_paths[i].mpp_descr,
351                     IEEE80211_MESH_PROTO_DSZ) == 0)
352                         return EEXIST;
353                 if (!mesh_proto_paths[i].mpp_active && firstempty == -1)
354                         firstempty = i;
355         }
356         if (firstempty < 0)
357                 return ENOSPC;
358         memcpy(&mesh_proto_paths[firstempty], mpp, sizeof(*mpp));
359         mesh_proto_paths[firstempty].mpp_active = 1;
360         return 0;
361 }
362
363 int
364 ieee80211_mesh_register_proto_metric(const struct
365     ieee80211_mesh_proto_metric *mpm)
366 {
367         int i, firstempty = -1;
368
369         for (i = 0; i < N(mesh_proto_metrics); i++) {
370                 if (strncmp(mpm->mpm_descr, mesh_proto_metrics[i].mpm_descr,
371                     IEEE80211_MESH_PROTO_DSZ) == 0)
372                         return EEXIST;
373                 if (!mesh_proto_metrics[i].mpm_active && firstempty == -1)
374                         firstempty = i;
375         }
376         if (firstempty < 0)
377                 return ENOSPC;
378         memcpy(&mesh_proto_metrics[firstempty], mpm, sizeof(*mpm));
379         mesh_proto_metrics[firstempty].mpm_active = 1;
380         return 0;
381 }
382
383 static int
384 mesh_select_proto_path(struct ieee80211vap *vap, const char *name)
385 {
386         struct ieee80211_mesh_state *ms = vap->iv_mesh;
387         int i;
388
389         for (i = 0; i < N(mesh_proto_paths); i++) {
390                 if (strcasecmp(mesh_proto_paths[i].mpp_descr, name) == 0) {
391                         ms->ms_ppath = &mesh_proto_paths[i];
392                         return 0;
393                 }
394         }
395         return ENOENT;
396 }
397
398 static int
399 mesh_select_proto_metric(struct ieee80211vap *vap, const char *name)
400 {
401         struct ieee80211_mesh_state *ms = vap->iv_mesh;
402         int i;
403
404         for (i = 0; i < N(mesh_proto_metrics); i++) {
405                 if (strcasecmp(mesh_proto_metrics[i].mpm_descr, name) == 0) {
406                         ms->ms_pmetric = &mesh_proto_metrics[i];
407                         return 0;
408                 }
409         }
410         return ENOENT;
411 }
412 #undef  N
413
414 static void
415 ieee80211_mesh_init(void)
416 {
417
418         memset(mesh_proto_paths, 0, sizeof(mesh_proto_paths));
419         memset(mesh_proto_metrics, 0, sizeof(mesh_proto_metrics));
420
421         /*
422          * Setup mesh parameters that depends on the clock frequency.
423          */
424         ieee80211_mesh_retrytimeout = msecs_to_ticks(40);
425         ieee80211_mesh_holdingtimeout = msecs_to_ticks(40);
426         ieee80211_mesh_confirmtimeout = msecs_to_ticks(40);
427
428         /*
429          * Register action frame handlers.
430          */
431         ieee80211_recv_action_register(IEEE80211_ACTION_CAT_MESHPEERING,
432             IEEE80211_ACTION_MESHPEERING_OPEN,
433             mesh_recv_action_meshpeering_open);
434         ieee80211_recv_action_register(IEEE80211_ACTION_CAT_MESHPEERING,
435             IEEE80211_ACTION_MESHPEERING_CONFIRM,
436             mesh_recv_action_meshpeering_confirm);
437         ieee80211_recv_action_register(IEEE80211_ACTION_CAT_MESHPEERING,
438             IEEE80211_ACTION_MESHPEERING_CLOSE,
439             mesh_recv_action_meshpeering_close);
440         ieee80211_recv_action_register(IEEE80211_ACTION_CAT_MESHLMETRIC,
441             IEEE80211_ACTION_MESHLMETRIC_REQ, mesh_recv_action_meshlmetric_req);
442         ieee80211_recv_action_register(IEEE80211_ACTION_CAT_MESHLMETRIC,
443             IEEE80211_ACTION_MESHLMETRIC_REP, mesh_recv_action_meshlmetric_rep);
444
445         ieee80211_send_action_register(IEEE80211_ACTION_CAT_MESHPEERING, 
446             IEEE80211_ACTION_MESHPEERING_OPEN,
447             mesh_send_action_meshpeering_open);
448         ieee80211_send_action_register(IEEE80211_ACTION_CAT_MESHPEERING, 
449             IEEE80211_ACTION_MESHPEERING_CONFIRM,
450             mesh_send_action_meshpeering_confirm);
451         ieee80211_send_action_register(IEEE80211_ACTION_CAT_MESHPEERING, 
452             IEEE80211_ACTION_MESHPEERING_CLOSE,
453             mesh_send_action_meshpeering_close);
454         ieee80211_send_action_register(IEEE80211_ACTION_CAT_MESHLMETRIC, 
455             IEEE80211_ACTION_MESHLMETRIC_REQ,
456             mesh_send_action_meshlink_request);
457         ieee80211_send_action_register(IEEE80211_ACTION_CAT_MESHLMETRIC, 
458             IEEE80211_ACTION_MESHLMETRIC_REP,
459             mesh_send_action_meshlink_reply);
460
461         /*
462          * Register Airtime Link Metric.
463          */
464         ieee80211_mesh_register_proto_metric(&mesh_metric_airtime);
465
466 }
467 SYSINIT(wlan_mesh, SI_SUB_DRIVERS, SI_ORDER_FIRST, ieee80211_mesh_init, NULL);
468
469 void
470 ieee80211_mesh_attach(struct ieee80211com *ic)
471 {
472         ic->ic_vattach[IEEE80211_M_MBSS] = mesh_vattach;
473 }
474
475 void
476 ieee80211_mesh_detach(struct ieee80211com *ic)
477 {
478 }
479
480 static void
481 mesh_vdetach_peers(void *arg, struct ieee80211_node *ni)
482 {
483         struct ieee80211com *ic = ni->ni_ic;
484         uint16_t args[3];
485
486         if (ni->ni_mlstate == IEEE80211_NODE_MESH_ESTABLISHED) {
487                 args[0] = ni->ni_mlpid;
488                 args[1] = ni->ni_mllid;
489                 args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
490                 ieee80211_send_action(ni,
491                     IEEE80211_ACTION_CAT_MESHPEERING,
492                     IEEE80211_ACTION_MESHPEERING_CLOSE,
493                     args);
494         }
495         callout_stop(&ni->ni_mltimer);
496         /* XXX belongs in hwmp */
497         ieee80211_ageq_drain_node(&ic->ic_stageq,
498            (void *)(uintptr_t) ieee80211_mac_hash(ic, ni->ni_macaddr));
499 }
500
501 static void
502 mesh_vdetach(struct ieee80211vap *vap)
503 {
504         struct ieee80211_mesh_state *ms = vap->iv_mesh;
505
506         callout_stop(&ms->ms_cleantimer);
507         ieee80211_iterate_nodes(&vap->iv_ic->ic_sta, mesh_vdetach_peers,
508             NULL);
509         ieee80211_mesh_rt_flush(vap);
510         lockuninit(&ms->ms_rt_lock);
511         ms->ms_ppath->mpp_vdetach(vap);
512         kfree(vap->iv_mesh, M_80211_VAP);
513         vap->iv_mesh = NULL;
514 }
515
516 static void
517 mesh_vattach(struct ieee80211vap *vap)
518 {
519         struct ieee80211_mesh_state *ms;
520         vap->iv_newstate = mesh_newstate;
521         vap->iv_input = mesh_input;
522         vap->iv_opdetach = mesh_vdetach;
523         vap->iv_recv_mgmt = mesh_recv_mgmt;
524         ms = kmalloc(sizeof(struct ieee80211_mesh_state), M_80211_VAP,
525             M_INTWAIT | M_ZERO);
526         if (ms == NULL) {
527                 kprintf("%s: couldn't alloc MBSS state\n", __func__);
528                 return;
529         }
530         vap->iv_mesh = ms;
531         ms->ms_seq = 0;
532         ms->ms_flags = (IEEE80211_MESHFLAGS_AP | IEEE80211_MESHFLAGS_FWD);
533         ms->ms_ttl = IEEE80211_MESH_DEFAULT_TTL;
534         TAILQ_INIT(&ms->ms_routes);
535         lockinit(&ms->ms_rt_lock, "MBSS", 0, 0);
536         callout_init_mp(&ms->ms_cleantimer);
537         mesh_select_proto_metric(vap, "AIRTIME");
538         KASSERT(ms->ms_pmetric, ("ms_pmetric == NULL"));
539         mesh_select_proto_path(vap, "HWMP");
540         KASSERT(ms->ms_ppath, ("ms_ppath == NULL"));
541         ms->ms_ppath->mpp_vattach(vap);
542 }
543
544 /*
545  * IEEE80211_M_MBSS vap state machine handler.
546  */
547 static int
548 mesh_newstate(struct ieee80211vap *vap, enum ieee80211_state nstate, int arg)
549 {
550         struct ieee80211_mesh_state *ms = vap->iv_mesh;
551         struct ieee80211com *ic = vap->iv_ic;
552         struct ieee80211_node *ni;
553         enum ieee80211_state ostate;
554
555         IEEE80211_LOCK_ASSERT(ic);
556
557         ostate = vap->iv_state;
558         IEEE80211_DPRINTF(vap, IEEE80211_MSG_STATE, "%s: %s -> %s (%d)\n",
559             __func__, ieee80211_state_name[ostate],
560             ieee80211_state_name[nstate], arg);
561         vap->iv_state = nstate;         /* state transition */
562         if (ostate != IEEE80211_S_SCAN)
563                 ieee80211_cancel_scan(vap);     /* background scan */
564         ni = vap->iv_bss;                       /* NB: no reference held */
565         if (nstate != IEEE80211_S_RUN && ostate == IEEE80211_S_RUN)
566                 callout_stop(&ms->ms_cleantimer);
567         switch (nstate) {
568         case IEEE80211_S_INIT:
569                 switch (ostate) {
570                 case IEEE80211_S_SCAN:
571                         ieee80211_cancel_scan(vap);
572                         break;
573                 case IEEE80211_S_CAC:
574                         ieee80211_dfs_cac_stop(vap);
575                         break;
576                 case IEEE80211_S_RUN:
577                         ieee80211_iterate_nodes(&ic->ic_sta,
578                             mesh_vdetach_peers, NULL);
579                         break;
580                 default:
581                         break;
582                 }
583                 if (ostate != IEEE80211_S_INIT) {
584                         /* NB: optimize INIT -> INIT case */
585                         ieee80211_reset_bss(vap);
586                         ieee80211_mesh_rt_flush(vap);
587                 }
588                 break;
589         case IEEE80211_S_SCAN:
590                 switch (ostate) {
591                 case IEEE80211_S_INIT:
592                         if (vap->iv_des_chan != IEEE80211_CHAN_ANYC &&
593                             !IEEE80211_IS_CHAN_RADAR(vap->iv_des_chan) &&
594                             ms->ms_idlen != 0) {
595                                 /*
596                                  * Already have a channel and a mesh ID; bypass
597                                  * the scan and startup immediately.
598                                  */
599                                 ieee80211_create_ibss(vap, vap->iv_des_chan);
600                                 break;
601                         }
602                         /*
603                          * Initiate a scan.  We can come here as a result
604                          * of an IEEE80211_IOC_SCAN_REQ too in which case
605                          * the vap will be marked with IEEE80211_FEXT_SCANREQ
606                          * and the scan request parameters will be present
607                          * in iv_scanreq.  Otherwise we do the default.
608                         */
609                         if (vap->iv_flags_ext & IEEE80211_FEXT_SCANREQ) {
610                                 ieee80211_check_scan(vap,
611                                     vap->iv_scanreq_flags,
612                                     vap->iv_scanreq_duration,
613                                     vap->iv_scanreq_mindwell,
614                                     vap->iv_scanreq_maxdwell,
615                                     vap->iv_scanreq_nssid, vap->iv_scanreq_ssid);
616                                 vap->iv_flags_ext &= ~IEEE80211_FEXT_SCANREQ;
617                         } else
618                                 ieee80211_check_scan_current(vap);
619                         break;
620                 default:
621                         break;
622                 }
623                 break;
624         case IEEE80211_S_CAC:
625                 /*
626                  * Start CAC on a DFS channel.  We come here when starting
627                  * a bss on a DFS channel (see ieee80211_create_ibss).
628                  */
629                 ieee80211_dfs_cac_start(vap);
630                 break;
631         case IEEE80211_S_RUN:
632                 switch (ostate) {
633                 case IEEE80211_S_INIT:
634                         /*
635                          * Already have a channel; bypass the
636                          * scan and startup immediately.
637                          * Note that ieee80211_create_ibss will call
638                          * back to do a RUN->RUN state change.
639                          */
640                         ieee80211_create_ibss(vap,
641                             ieee80211_ht_adjust_channel(ic,
642                                 ic->ic_curchan, vap->iv_flags_ht));
643                         /* NB: iv_bss is changed on return */
644                         break;
645                 case IEEE80211_S_CAC:
646                         /*
647                          * NB: This is the normal state change when CAC
648                          * expires and no radar was detected; no need to
649                          * clear the CAC timer as it's already expired.
650                          */
651                         /* fall thru... */
652                 case IEEE80211_S_CSA:
653 #if 0
654                         /*
655                          * Shorten inactivity timer of associated stations
656                          * to weed out sta's that don't follow a CSA.
657                          */
658                         ieee80211_iterate_nodes(&ic->ic_sta, sta_csa, vap);
659 #endif
660                         /*
661                          * Update bss node channel to reflect where
662                          * we landed after CSA.
663                          */
664                         ieee80211_node_set_chan(vap->iv_bss,
665                             ieee80211_ht_adjust_channel(ic, ic->ic_curchan,
666                                 ieee80211_htchanflags(vap->iv_bss->ni_chan)));
667                         /* XXX bypass debug msgs */
668                         break;
669                 case IEEE80211_S_SCAN:
670                 case IEEE80211_S_RUN:
671 #ifdef IEEE80211_DEBUG
672                         if (ieee80211_msg_debug(vap)) {
673                                 struct ieee80211_node *ni = vap->iv_bss;
674                                 ieee80211_note(vap,
675                                     "synchronized with %6D meshid ",
676                                     ni->ni_meshid, ":");
677                                 ieee80211_print_essid(ni->ni_meshid,
678                                     ni->ni_meshidlen);
679                                 /* XXX MCS/HT */
680                                 kprintf(" channel %d\n",
681                                     ieee80211_chan2ieee(ic, ic->ic_curchan));
682                         }
683 #endif
684                         break;
685                 default:
686                         break;
687                 }
688                 ieee80211_node_authorize(vap->iv_bss);
689                 callout_reset(&ms->ms_cleantimer, ms->ms_ppath->mpp_inact,
690                     mesh_rt_cleanup_cb, vap);
691                 break;
692         default:
693                 break;
694         }
695         /* NB: ostate not nstate */
696         ms->ms_ppath->mpp_newstate(vap, ostate, arg);
697         return 0;
698 }
699
700 static void
701 mesh_rt_cleanup_cb(void *arg)
702 {
703         struct ieee80211vap *vap = arg;
704         struct ieee80211_mesh_state *ms = vap->iv_mesh;
705
706         mesh_rt_flush_invalid(vap);
707         callout_reset(&ms->ms_cleantimer, ms->ms_ppath->mpp_inact,
708             mesh_rt_cleanup_cb, vap);
709 }
710
711
712 /*
713  * Helper function to note the Mesh Peer Link FSM change.
714  */
715 static void
716 mesh_linkchange(struct ieee80211_node *ni, enum ieee80211_mesh_mlstate state)
717 {
718         struct ieee80211vap *vap = ni->ni_vap;
719         struct ieee80211_mesh_state *ms = vap->iv_mesh;
720 #ifdef IEEE80211_DEBUG
721         static const char *meshlinkstates[] = {
722                 [IEEE80211_NODE_MESH_IDLE]              = "IDLE",
723                 [IEEE80211_NODE_MESH_OPENSNT]           = "OPEN SENT",
724                 [IEEE80211_NODE_MESH_OPENRCV]           = "OPEN RECEIVED",
725                 [IEEE80211_NODE_MESH_CONFIRMRCV]        = "CONFIRM RECEIVED",
726                 [IEEE80211_NODE_MESH_ESTABLISHED]       = "ESTABLISHED",
727                 [IEEE80211_NODE_MESH_HOLDING]           = "HOLDING"
728         };
729 #endif
730         IEEE80211_NOTE(vap, IEEE80211_MSG_MESH,
731             ni, "peer link: %s -> %s",
732             meshlinkstates[ni->ni_mlstate], meshlinkstates[state]);
733
734         /* track neighbor count */
735         if (state == IEEE80211_NODE_MESH_ESTABLISHED &&
736             ni->ni_mlstate != IEEE80211_NODE_MESH_ESTABLISHED) {
737                 KASSERT(ms->ms_neighbors < 65535, ("neighbor count overflow"));
738                 ms->ms_neighbors++;
739                 ieee80211_beacon_notify(vap, IEEE80211_BEACON_MESHCONF);
740         } else if (ni->ni_mlstate == IEEE80211_NODE_MESH_ESTABLISHED &&
741             state != IEEE80211_NODE_MESH_ESTABLISHED) {
742                 KASSERT(ms->ms_neighbors > 0, ("neighbor count 0"));
743                 ms->ms_neighbors--;
744                 ieee80211_beacon_notify(vap, IEEE80211_BEACON_MESHCONF);
745         }
746         ni->ni_mlstate = state;
747         switch (state) {
748         case IEEE80211_NODE_MESH_HOLDING:
749                 ms->ms_ppath->mpp_peerdown(ni);
750                 break;
751         case IEEE80211_NODE_MESH_ESTABLISHED:
752                 ieee80211_mesh_discover(vap, ni->ni_macaddr, NULL);
753                 break;
754         default:
755                 break;
756         }
757 }
758
759 /*
760  * Helper function to generate a unique local ID required for mesh
761  * peer establishment.
762  */
763 static void
764 mesh_checkid(void *arg, struct ieee80211_node *ni)
765 {
766         uint16_t *r = arg;
767         
768         if (*r == ni->ni_mllid)
769                 *(uint16_t *)arg = 0;
770 }
771
772 static uint32_t
773 mesh_generateid(struct ieee80211vap *vap)
774 {
775         int maxiter = 4;
776         uint16_t r;
777
778         do {
779                 get_random_bytes(&r, 2);
780                 ieee80211_iterate_nodes(&vap->iv_ic->ic_sta, mesh_checkid, &r);
781                 maxiter--;
782         } while (r == 0 && maxiter > 0);
783         return r;
784 }
785
786 /*
787  * Verifies if we already received this packet by checking its
788  * sequence number.
789  * Returns 0 if the frame is to be accepted, 1 otherwise.
790  */
791 static int
792 mesh_checkpseq(struct ieee80211vap *vap,
793     const uint8_t source[IEEE80211_ADDR_LEN], uint32_t seq)
794 {
795         struct ieee80211_mesh_route *rt;
796
797         rt = ieee80211_mesh_rt_find(vap, source);
798         if (rt == NULL) {
799                 rt = ieee80211_mesh_rt_add(vap, source);
800                 if (rt == NULL) {
801                         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, source,
802                             "%s", "add mcast route failed");
803                         vap->iv_stats.is_mesh_rtaddfailed++;
804                         return 1;
805                 }
806                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, source,
807                     "add mcast route, mesh seqno %d", seq);
808                 rt->rt_lastmseq = seq;
809                 return 0;
810         }
811         if (IEEE80211_MESH_SEQ_GEQ(rt->rt_lastmseq, seq)) {
812                 return 1;
813         } else {
814                 rt->rt_lastmseq = seq;
815                 return 0;
816         }
817 }
818
819 /*
820  * Iterate the routing table and locate the next hop.
821  */
822 static struct ieee80211_node *
823 mesh_find_txnode(struct ieee80211vap *vap,
824     const uint8_t dest[IEEE80211_ADDR_LEN])
825 {
826         struct ieee80211_mesh_route *rt;
827
828         rt = ieee80211_mesh_rt_find(vap, dest);
829         if (rt == NULL)
830                 return NULL;
831         if ((rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) == 0 ||
832             (rt->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY)) {
833                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_MESH, dest,
834                     "%s: !valid or proxy, flags 0x%x", __func__, rt->rt_flags);
835                 /* XXX stat */
836                 return NULL;
837         }
838         return ieee80211_find_txnode(vap, rt->rt_nexthop);
839 }
840
841 /*
842  * Forward the specified frame.
843  * Decrement the TTL and set TA to our MAC address.
844  */
845 static void
846 mesh_forward(struct ieee80211vap *vap, struct mbuf *m,
847     const struct ieee80211_meshcntl *mc)
848 {
849         struct ieee80211com *ic = vap->iv_ic;
850         struct ieee80211_mesh_state *ms = vap->iv_mesh;
851         struct ifnet *ifp = vap->iv_ifp;
852         struct ifnet *parent = ic->ic_ifp;
853         const struct ieee80211_frame *wh =
854             mtod(m, const struct ieee80211_frame *);
855         struct mbuf *mcopy;
856         struct ieee80211_meshcntl *mccopy;
857         struct ieee80211_frame *whcopy;
858         struct ieee80211_node *ni;
859         int err;
860
861         if (mc->mc_ttl == 0) {
862                 IEEE80211_NOTE_FRAME(vap, IEEE80211_MSG_MESH, wh,
863                     "%s", "frame not fwd'd, ttl 0");
864                 vap->iv_stats.is_mesh_fwd_ttl++;
865                 return;
866         }
867         if (!(ms->ms_flags & IEEE80211_MESHFLAGS_FWD)) {
868                 IEEE80211_NOTE_FRAME(vap, IEEE80211_MSG_MESH, wh,
869                     "%s", "frame not fwd'd, fwding disabled");
870                 vap->iv_stats.is_mesh_fwd_disabled++;
871                 return;
872         }
873         mcopy = m_dup(m, MB_DONTWAIT);
874         if (mcopy == NULL) {
875                 IEEE80211_NOTE_FRAME(vap, IEEE80211_MSG_MESH, wh,
876                     "%s", "frame not fwd'd, cannot dup");
877                 vap->iv_stats.is_mesh_fwd_nobuf++;
878                 ifp->if_oerrors++;
879                 return;
880         }
881         mcopy = m_pullup(mcopy, ieee80211_hdrspace(ic, wh) +
882             sizeof(struct ieee80211_meshcntl));
883         if (mcopy == NULL) {
884                 IEEE80211_NOTE_FRAME(vap, IEEE80211_MSG_MESH, wh,
885                     "%s", "frame not fwd'd, too short");
886                 vap->iv_stats.is_mesh_fwd_tooshort++;
887                 ifp->if_oerrors++;
888                 m_freem(mcopy);
889                 return;
890         }
891         whcopy = mtod(mcopy, struct ieee80211_frame *);
892         mccopy = (struct ieee80211_meshcntl *)
893             (mtod(mcopy, uint8_t *) + ieee80211_hdrspace(ic, wh));
894         /* XXX clear other bits? */
895         whcopy->i_fc[1] &= ~IEEE80211_FC1_RETRY;
896         IEEE80211_ADDR_COPY(whcopy->i_addr2, vap->iv_myaddr);
897         if (IEEE80211_IS_MULTICAST(wh->i_addr1)) {
898                 ni = ieee80211_ref_node(vap->iv_bss);
899                 mcopy->m_flags |= M_MCAST;
900         } else {
901                 ni = mesh_find_txnode(vap, whcopy->i_addr3);
902                 if (ni == NULL) {
903                         IEEE80211_NOTE_FRAME(vap, IEEE80211_MSG_MESH, wh,
904                             "%s", "frame not fwd'd, no path");
905                         vap->iv_stats.is_mesh_fwd_nopath++;
906                         m_freem(mcopy);
907                         return;
908                 }
909                 IEEE80211_ADDR_COPY(whcopy->i_addr1, ni->ni_macaddr);
910         }
911         KASSERT(mccopy->mc_ttl > 0, ("%s called with wrong ttl", __func__));
912         mccopy->mc_ttl--;
913
914         /* XXX calculate priority so drivers can find the tx queue */
915         M_WME_SETAC(mcopy, WME_AC_BE);
916
917         /* XXX do we know m_nextpkt is NULL? */
918         mcopy->m_pkthdr.rcvif = (void *) ni;
919         err = ieee80211_handoff(parent, mcopy);
920         if (err != 0) {
921                 /* NB: IFQ_HANDOFF reclaims mbuf */
922                 ieee80211_free_node(ni);
923         } else {
924                 ifp->if_opackets++;
925         }
926 }
927
928 static struct mbuf *
929 mesh_decap(struct ieee80211vap *vap, struct mbuf *m, int hdrlen, int meshdrlen)
930 {
931 #define WHDIR(wh) ((wh)->i_fc[1] & IEEE80211_FC1_DIR_MASK)
932         uint8_t b[sizeof(struct ieee80211_qosframe_addr4) +
933                   sizeof(struct ieee80211_meshcntl_ae11)];
934         const struct ieee80211_qosframe_addr4 *wh;
935         const struct ieee80211_meshcntl_ae10 *mc;
936         struct ether_header *eh;
937         struct llc *llc;
938         int ae;
939
940         if (m->m_len < hdrlen + sizeof(*llc) &&
941             (m = m_pullup(m, hdrlen + sizeof(*llc))) == NULL) {
942                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_ANY,
943                     "discard data frame: %s", "m_pullup failed");
944                 vap->iv_stats.is_rx_tooshort++;
945                 return NULL;
946         }
947         memcpy(b, mtod(m, caddr_t), hdrlen);
948         wh = (const struct ieee80211_qosframe_addr4 *)&b[0];
949         mc = (const struct ieee80211_meshcntl_ae10 *)&b[hdrlen - meshdrlen];
950         KASSERT(WHDIR(wh) == IEEE80211_FC1_DIR_FROMDS ||
951                 WHDIR(wh) == IEEE80211_FC1_DIR_DSTODS,
952             ("bogus dir, fc 0x%x:0x%x", wh->i_fc[0], wh->i_fc[1]));
953
954         llc = (struct llc *)(mtod(m, caddr_t) + hdrlen);
955         if (llc->llc_dsap == LLC_SNAP_LSAP && llc->llc_ssap == LLC_SNAP_LSAP &&
956             llc->llc_control == LLC_UI && llc->llc_snap.org_code[0] == 0 &&
957             llc->llc_snap.org_code[1] == 0 && llc->llc_snap.org_code[2] == 0 &&
958             /* NB: preserve AppleTalk frames that have a native SNAP hdr */
959             !(llc->llc_snap.ether_type == htons(ETHERTYPE_AARP) ||
960               llc->llc_snap.ether_type == htons(ETHERTYPE_IPX))) {
961                 m_adj(m, hdrlen + sizeof(struct llc) - sizeof(*eh));
962                 llc = NULL;
963         } else {
964                 m_adj(m, hdrlen - sizeof(*eh));
965         }
966         eh = mtod(m, struct ether_header *);
967         ae = mc->mc_flags & 3;
968         if (WHDIR(wh) == IEEE80211_FC1_DIR_FROMDS) {
969                 IEEE80211_ADDR_COPY(eh->ether_dhost, wh->i_addr1);
970                 if (ae == 0) {
971                         IEEE80211_ADDR_COPY(eh->ether_shost, wh->i_addr3);
972                 } else if (ae == 1) {
973                         IEEE80211_ADDR_COPY(eh->ether_shost, mc->mc_addr4);
974                 } else {
975                         IEEE80211_DISCARD(vap, IEEE80211_MSG_ANY,
976                             (const struct ieee80211_frame *)wh, NULL,
977                             "bad AE %d", ae);
978                         vap->iv_stats.is_mesh_badae++;
979                         m_freem(m);
980                         return NULL;
981                 }
982         } else {
983                 if (ae == 0) {
984                         IEEE80211_ADDR_COPY(eh->ether_dhost, wh->i_addr3);
985                         IEEE80211_ADDR_COPY(eh->ether_shost, wh->i_addr4);
986                 } else if (ae == 2) {
987                         IEEE80211_ADDR_COPY(eh->ether_dhost, mc->mc_addr4);
988                         IEEE80211_ADDR_COPY(eh->ether_shost, mc->mc_addr5);
989                 } else {
990                         IEEE80211_DISCARD(vap, IEEE80211_MSG_ANY,
991                             (const struct ieee80211_frame *)wh, NULL,
992                             "bad AE %d", ae);
993                         vap->iv_stats.is_mesh_badae++;
994                         m_freem(m);
995                         return NULL;
996                 }
997         }
998 #ifdef ALIGNED_POINTER
999         if (!ALIGNED_POINTER(mtod(m, caddr_t) + sizeof(*eh), uint32_t)) {
1000                 m = ieee80211_realign(vap, m, sizeof(*eh));
1001                 if (m == NULL)
1002                         return NULL;
1003         }
1004 #endif /* ALIGNED_POINTER */
1005         if (llc != NULL) {
1006                 eh = mtod(m, struct ether_header *);
1007                 eh->ether_type = htons(m->m_pkthdr.len - sizeof(*eh));
1008         }
1009         return m;
1010 #undef WDIR
1011 }
1012
1013 /*
1014  * Return non-zero if the unicast mesh data frame should be processed
1015  * locally.  Frames that are not proxy'd have our address, otherwise
1016  * we need to consult the routing table to look for a proxy entry.
1017  */
1018 static __inline int
1019 mesh_isucastforme(struct ieee80211vap *vap, const struct ieee80211_frame *wh,
1020     const struct ieee80211_meshcntl *mc)
1021 {
1022         int ae = mc->mc_flags & 3;
1023
1024         KASSERT((wh->i_fc[1] & IEEE80211_FC1_DIR_MASK) == IEEE80211_FC1_DIR_DSTODS,
1025             ("bad dir 0x%x:0x%x", wh->i_fc[0], wh->i_fc[1]));
1026         KASSERT(ae == 0 || ae == 2, ("bad AE %d", ae));
1027         if (ae == 2) {                          /* ucast w/ proxy */
1028                 const struct ieee80211_meshcntl_ae10 *mc10 =
1029                     (const struct ieee80211_meshcntl_ae10 *) mc;
1030                 struct ieee80211_mesh_route *rt =
1031                     ieee80211_mesh_rt_find(vap, mc10->mc_addr4);
1032                 /* check for proxy route to ourself */
1033                 return (rt != NULL &&
1034                     (rt->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY));
1035         } else                                  /* ucast w/o proxy */
1036                 return IEEE80211_ADDR_EQ(wh->i_addr3, vap->iv_myaddr);
1037 }
1038
1039 static int
1040 mesh_input(struct ieee80211_node *ni, struct mbuf *m, int rssi, int nf)
1041 {
1042 #define SEQ_LEQ(a,b)    ((int)((a)-(b)) <= 0)
1043 #define HAS_SEQ(type)   ((type & 0x4) == 0)
1044         struct ieee80211vap *vap = ni->ni_vap;
1045         struct ieee80211com *ic = ni->ni_ic;
1046         struct ifnet *ifp = vap->iv_ifp;
1047         struct ieee80211_frame *wh;
1048         const struct ieee80211_meshcntl *mc;
1049         int hdrspace, meshdrlen, need_tap;
1050         uint8_t dir, type, subtype, qos;
1051         uint32_t seq;
1052         uint8_t *addr;
1053         ieee80211_seq rxseq;
1054
1055         KASSERT(ni != NULL, ("null node"));
1056         ni->ni_inact = ni->ni_inact_reload;
1057
1058         need_tap = 1;                   /* mbuf need to be tapped. */
1059         type = -1;                      /* undefined */
1060
1061         if (m->m_pkthdr.len < sizeof(struct ieee80211_frame_min)) {
1062                 IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
1063                     ni->ni_macaddr, NULL,
1064                     "too short (1): len %u", m->m_pkthdr.len);
1065                 vap->iv_stats.is_rx_tooshort++;
1066                 goto out;
1067         }
1068         /*
1069          * Bit of a cheat here, we use a pointer for a 3-address
1070          * frame format but don't reference fields past outside
1071          * ieee80211_frame_min w/o first validating the data is
1072          * present.
1073         */
1074         wh = mtod(m, struct ieee80211_frame *);
1075
1076         if ((wh->i_fc[0] & IEEE80211_FC0_VERSION_MASK) !=
1077             IEEE80211_FC0_VERSION_0) {
1078                 IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
1079                     ni->ni_macaddr, NULL, "wrong version %x", wh->i_fc[0]);
1080                 vap->iv_stats.is_rx_badversion++;
1081                 goto err;
1082         }
1083         dir = wh->i_fc[1] & IEEE80211_FC1_DIR_MASK;
1084         type = wh->i_fc[0] & IEEE80211_FC0_TYPE_MASK;
1085         subtype = wh->i_fc[0] & IEEE80211_FC0_SUBTYPE_MASK;
1086         if ((ic->ic_flags & IEEE80211_F_SCAN) == 0) {
1087                 IEEE80211_RSSI_LPF(ni->ni_avgrssi, rssi);
1088                 ni->ni_noise = nf;
1089                 if (HAS_SEQ(type)) {
1090                         uint8_t tid = ieee80211_gettid(wh);
1091
1092                         if (IEEE80211_QOS_HAS_SEQ(wh) &&
1093                             TID_TO_WME_AC(tid) >= WME_AC_VI)
1094                                 ic->ic_wme.wme_hipri_traffic++;
1095                         rxseq = le16toh(*(uint16_t *)wh->i_seq);
1096                         if ((ni->ni_flags & IEEE80211_NODE_HT) == 0 &&
1097                             (wh->i_fc[1] & IEEE80211_FC1_RETRY) &&
1098                             SEQ_LEQ(rxseq, ni->ni_rxseqs[tid])) {
1099                                 /* duplicate, discard */
1100                                 IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_INPUT,
1101                                     wh->i_addr1, "duplicate",
1102                                     "seqno <%u,%u> fragno <%u,%u> tid %u",
1103                                     rxseq >> IEEE80211_SEQ_SEQ_SHIFT,
1104                                     ni->ni_rxseqs[tid] >>
1105                                     IEEE80211_SEQ_SEQ_SHIFT,
1106                                     rxseq & IEEE80211_SEQ_FRAG_MASK,
1107                                     ni->ni_rxseqs[tid] &
1108                                     IEEE80211_SEQ_FRAG_MASK,
1109                                     tid);
1110                                 vap->iv_stats.is_rx_dup++;
1111                                 IEEE80211_NODE_STAT(ni, rx_dup);
1112                                 goto out;
1113                         }
1114                         ni->ni_rxseqs[tid] = rxseq;
1115                 }
1116         }
1117 #ifdef IEEE80211_DEBUG
1118         /*
1119          * It's easier, but too expensive, to simulate different mesh
1120          * topologies by consulting the ACL policy very early, so do this
1121          * only under DEBUG.
1122          *
1123          * NB: this check is also done upon peering link initiation.
1124          */
1125         if (vap->iv_acl != NULL && !vap->iv_acl->iac_check(vap, wh->i_addr2)) {
1126                 IEEE80211_DISCARD(vap, IEEE80211_MSG_ACL,
1127                     wh, NULL, "%s", "disallowed by ACL");
1128                 vap->iv_stats.is_rx_acl++;
1129                 goto out;
1130         }
1131 #endif
1132         switch (type) {
1133         case IEEE80211_FC0_TYPE_DATA:
1134                 if (ni == vap->iv_bss)
1135                         goto out;
1136                 if (ni->ni_mlstate != IEEE80211_NODE_MESH_ESTABLISHED) {
1137                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_MESH,
1138                             ni->ni_macaddr, NULL,
1139                             "peer link not yet established (%d)",
1140                             ni->ni_mlstate);
1141                         vap->iv_stats.is_mesh_nolink++;
1142                         goto out;
1143                 }       
1144                 if (dir != IEEE80211_FC1_DIR_FROMDS &&
1145                     dir != IEEE80211_FC1_DIR_DSTODS) {
1146                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1147                             wh, "data", "incorrect dir 0x%x", dir);
1148                         vap->iv_stats.is_rx_wrongdir++;
1149                         goto err;
1150                 }
1151                 /* pull up enough to get to the mesh control */
1152                 hdrspace = ieee80211_hdrspace(ic, wh);
1153                 if (m->m_len < hdrspace + sizeof(struct ieee80211_meshcntl) &&
1154                     (m = m_pullup(m, hdrspace +
1155                         sizeof(struct ieee80211_meshcntl))) == NULL) {
1156                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
1157                             ni->ni_macaddr, NULL,
1158                             "data too short: expecting %u", hdrspace);
1159                         vap->iv_stats.is_rx_tooshort++;
1160                         goto out;               /* XXX */
1161                 }
1162                 /*
1163                  * Now calculate the full extent of the headers. Note
1164                  * mesh_decap will pull up anything we didn't get
1165                  * above when it strips the 802.11 headers.
1166                  */
1167                 mc = (const struct ieee80211_meshcntl *)
1168                     (mtod(m, const uint8_t *) + hdrspace);
1169                 meshdrlen = sizeof(struct ieee80211_meshcntl) +
1170                     (mc->mc_flags & 3) * IEEE80211_ADDR_LEN;
1171                 hdrspace += meshdrlen;
1172                 seq = LE_READ_4(mc->mc_seq);
1173                 if (IEEE80211_IS_MULTICAST(wh->i_addr1))
1174                         addr = wh->i_addr3;
1175                 else
1176                         addr = ((struct ieee80211_qosframe_addr4 *)wh)->i_addr4;
1177                 if (IEEE80211_ADDR_EQ(vap->iv_myaddr, addr)) {
1178                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_INPUT,
1179                             addr, "data", "%s", "not to me");
1180                         vap->iv_stats.is_rx_wrongbss++; /* XXX kinda */
1181                         goto out;
1182                 }
1183                 if (mesh_checkpseq(vap, addr, seq) != 0) {
1184                         vap->iv_stats.is_rx_dup++;
1185                         goto out;
1186                 }
1187
1188                 /*
1189                  * Potentially forward packet.  See table s36 (p140)
1190                  * for the rules.  XXX tap fwd'd packets not for us?
1191                  */
1192                 if (dir == IEEE80211_FC1_DIR_FROMDS ||
1193                     !mesh_isucastforme(vap, wh, mc)) {
1194                         mesh_forward(vap, m, mc);
1195                         if (dir == IEEE80211_FC1_DIR_DSTODS)
1196                                 goto out;
1197                         /* NB: fall thru to deliver mcast frames locally */
1198                 }
1199
1200                 /*
1201                  * Save QoS bits for use below--before we strip the header.
1202                  */
1203                 if (subtype == IEEE80211_FC0_SUBTYPE_QOS) {
1204                         qos = (dir == IEEE80211_FC1_DIR_DSTODS) ?
1205                             ((struct ieee80211_qosframe_addr4 *)wh)->i_qos[0] :
1206                             ((struct ieee80211_qosframe *)wh)->i_qos[0];
1207                 } else
1208                         qos = 0;
1209                 /*
1210                  * Next up, any fragmentation.
1211                  */
1212                 if (!IEEE80211_IS_MULTICAST(wh->i_addr1)) {
1213                         m = ieee80211_defrag(ni, m, hdrspace);
1214                         if (m == NULL) {
1215                                 /* Fragment dropped or frame not complete yet */
1216                                 goto out;
1217                         }
1218                 }
1219                 wh = NULL;              /* no longer valid, catch any uses */
1220
1221                 if (ieee80211_radiotap_active_vap(vap))
1222                         ieee80211_radiotap_rx(vap, m);
1223                 need_tap = 0;
1224
1225                 /*
1226                  * Finally, strip the 802.11 header.
1227                  */
1228                 m = mesh_decap(vap, m, hdrspace, meshdrlen);
1229                 if (m == NULL) {
1230                         /* XXX mask bit to check for both */
1231                         /* don't count Null data frames as errors */
1232                         if (subtype == IEEE80211_FC0_SUBTYPE_NODATA ||
1233                             subtype == IEEE80211_FC0_SUBTYPE_QOS_NULL)
1234                                 goto out;
1235                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_INPUT,
1236                             ni->ni_macaddr, "data", "%s", "decap error");
1237                         vap->iv_stats.is_rx_decap++;
1238                         IEEE80211_NODE_STAT(ni, rx_decap);
1239                         goto err;
1240                 }
1241                 if (qos & IEEE80211_QOS_AMSDU) {
1242                         m = ieee80211_decap_amsdu(ni, m);
1243                         if (m == NULL)
1244                                 return IEEE80211_FC0_TYPE_DATA;
1245                 }
1246                 ieee80211_deliver_data(vap, ni, m);
1247                 return type;
1248         case IEEE80211_FC0_TYPE_MGT:
1249                 vap->iv_stats.is_rx_mgmt++;
1250                 IEEE80211_NODE_STAT(ni, rx_mgmt);
1251                 if (dir != IEEE80211_FC1_DIR_NODS) {
1252                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1253                             wh, "mgt", "incorrect dir 0x%x", dir);
1254                         vap->iv_stats.is_rx_wrongdir++;
1255                         goto err;
1256                 }
1257                 if (m->m_pkthdr.len < sizeof(struct ieee80211_frame)) {
1258                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
1259                             ni->ni_macaddr, "mgt", "too short: len %u",
1260                             m->m_pkthdr.len);
1261                         vap->iv_stats.is_rx_tooshort++;
1262                         goto out;
1263                 }
1264 #ifdef IEEE80211_DEBUG
1265                 if ((ieee80211_msg_debug(vap) && 
1266                     (vap->iv_ic->ic_flags & IEEE80211_F_SCAN)) ||
1267                     ieee80211_msg_dumppkts(vap)) {
1268                         if_printf(ifp, "received %s from %6D rssi %d\n",
1269                             ieee80211_mgt_subtype_name[subtype >>
1270                             IEEE80211_FC0_SUBTYPE_SHIFT],
1271                             wh->i_addr2, ":", rssi);
1272                 }
1273 #endif
1274                 if (wh->i_fc[1] & IEEE80211_FC1_WEP) {
1275                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1276                             wh, NULL, "%s", "WEP set but not permitted");
1277                         vap->iv_stats.is_rx_mgtdiscard++; /* XXX */
1278                         goto out;
1279                 }
1280                 vap->iv_recv_mgmt(ni, m, subtype, rssi, nf);
1281                 goto out;
1282         case IEEE80211_FC0_TYPE_CTL:
1283                 vap->iv_stats.is_rx_ctl++;
1284                 IEEE80211_NODE_STAT(ni, rx_ctrl);
1285                 goto out;
1286         default:
1287                 IEEE80211_DISCARD(vap, IEEE80211_MSG_ANY,
1288                     wh, "bad", "frame type 0x%x", type);
1289                 /* should not come here */
1290                 break;
1291         }
1292 err:
1293         ifp->if_ierrors++;
1294 out:
1295         if (m != NULL) {
1296                 if (need_tap && ieee80211_radiotap_active_vap(vap))
1297                         ieee80211_radiotap_rx(vap, m);
1298                 m_freem(m);
1299         }
1300         return type;
1301 }
1302
1303 static void
1304 mesh_recv_mgmt(struct ieee80211_node *ni, struct mbuf *m0, int subtype,
1305     int rssi, int nf)
1306 {
1307         struct ieee80211vap *vap = ni->ni_vap;
1308         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1309         struct ieee80211com *ic = ni->ni_ic;
1310         struct ieee80211_frame *wh;
1311         uint8_t *frm, *efrm;
1312
1313         wh = mtod(m0, struct ieee80211_frame *);
1314         frm = (uint8_t *)&wh[1];
1315         efrm = mtod(m0, uint8_t *) + m0->m_len;
1316         switch (subtype) {
1317         case IEEE80211_FC0_SUBTYPE_PROBE_RESP:
1318         case IEEE80211_FC0_SUBTYPE_BEACON:
1319         {
1320                 struct ieee80211_scanparams scan;
1321                 /*
1322                  * We process beacon/probe response
1323                  * frames to discover neighbors.
1324                  */
1325                 if (ieee80211_parse_beacon(ni, m0, &scan) != 0)
1326                         return;
1327                 /*
1328                  * Count frame now that we know it's to be processed.
1329                  */
1330                 if (subtype == IEEE80211_FC0_SUBTYPE_BEACON) {
1331                         vap->iv_stats.is_rx_beacon++;   /* XXX remove */
1332                         IEEE80211_NODE_STAT(ni, rx_beacons);
1333                 } else
1334                         IEEE80211_NODE_STAT(ni, rx_proberesp);
1335                 /*
1336                  * If scanning, just pass information to the scan module.
1337                  */
1338                 if (ic->ic_flags & IEEE80211_F_SCAN) {
1339                         if (ic->ic_flags_ext & IEEE80211_FEXT_PROBECHAN) {
1340                                 /*
1341                                  * Actively scanning a channel marked passive;
1342                                  * send a probe request now that we know there
1343                                  * is 802.11 traffic present.
1344                                  *
1345                                  * XXX check if the beacon we recv'd gives
1346                                  * us what we need and suppress the probe req
1347                                  */
1348                                 ieee80211_probe_curchan(vap, 1);
1349                                 ic->ic_flags_ext &= ~IEEE80211_FEXT_PROBECHAN;
1350                         }
1351                         ieee80211_add_scan(vap, &scan, wh,
1352                             subtype, rssi, nf);
1353                         return;
1354                 }
1355
1356                 /* The rest of this code assumes we are running */
1357                 if (vap->iv_state != IEEE80211_S_RUN)
1358                         return;
1359                 /*
1360                  * Ignore non-mesh STAs.
1361                  */
1362                 if ((scan.capinfo &
1363                      (IEEE80211_CAPINFO_ESS|IEEE80211_CAPINFO_IBSS)) ||
1364                     scan.meshid == NULL || scan.meshconf == NULL) {
1365                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1366                             wh, "beacon", "%s", "not a mesh sta");
1367                         vap->iv_stats.is_mesh_wrongmesh++;
1368                         return;
1369                 }
1370                 /*
1371                  * Ignore STAs for other mesh networks.
1372                  */
1373                 if (memcmp(scan.meshid+2, ms->ms_id, ms->ms_idlen) != 0 ||
1374                     mesh_verify_meshconf(vap, scan.meshconf)) {
1375                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1376                             wh, "beacon", "%s", "not for our mesh");
1377                         vap->iv_stats.is_mesh_wrongmesh++;
1378                         return;
1379                 }
1380                 /*
1381                  * Peer only based on the current ACL policy.
1382                  */
1383                 if (vap->iv_acl != NULL &&
1384                     !vap->iv_acl->iac_check(vap, wh->i_addr2)) {
1385                         IEEE80211_DISCARD(vap, IEEE80211_MSG_ACL,
1386                             wh, NULL, "%s", "disallowed by ACL");
1387                         vap->iv_stats.is_rx_acl++;
1388                         return;
1389                 }
1390                 /*
1391                  * Do neighbor discovery.
1392                  */
1393                 if (!IEEE80211_ADDR_EQ(wh->i_addr2, ni->ni_macaddr)) {
1394                         /*
1395                          * Create a new entry in the neighbor table.
1396                          */
1397                         ni = ieee80211_add_neighbor(vap, wh, &scan);
1398                 }
1399                 /*
1400                  * Automatically peer with discovered nodes if possible.
1401                  * XXX backoff on repeated failure
1402                  */
1403                 if (ni != vap->iv_bss &&
1404                     (ms->ms_flags & IEEE80211_MESHFLAGS_AP) &&
1405                     ni->ni_mlstate == IEEE80211_NODE_MESH_IDLE) {
1406                         uint16_t args[1];
1407
1408                         ni->ni_mlpid = mesh_generateid(vap);
1409                         if (ni->ni_mlpid == 0)
1410                                 return;
1411                         mesh_linkchange(ni, IEEE80211_NODE_MESH_OPENSNT);
1412                         args[0] = ni->ni_mlpid;
1413                         ieee80211_send_action(ni,
1414                             IEEE80211_ACTION_CAT_MESHPEERING,
1415                             IEEE80211_ACTION_MESHPEERING_OPEN, args);
1416                         ni->ni_mlrcnt = 0;
1417                         mesh_peer_timeout_setup(ni);
1418                 }
1419                 break;
1420         }
1421         case IEEE80211_FC0_SUBTYPE_PROBE_REQ:
1422         {
1423                 uint8_t *ssid, *meshid, *rates, *xrates;
1424                 uint8_t *sfrm;
1425
1426                 if (vap->iv_state != IEEE80211_S_RUN) {
1427                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1428                             wh, NULL, "wrong state %s",
1429                             ieee80211_state_name[vap->iv_state]);
1430                         vap->iv_stats.is_rx_mgtdiscard++;
1431                         return;
1432                 }
1433                 if (IEEE80211_IS_MULTICAST(wh->i_addr2)) {
1434                         /* frame must be directed */
1435                         IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1436                             wh, NULL, "%s", "not unicast");
1437                         vap->iv_stats.is_rx_mgtdiscard++;       /* XXX stat */
1438                         return;
1439                 }
1440                 /*
1441                  * prreq frame format
1442                  *      [tlv] ssid
1443                  *      [tlv] supported rates
1444                  *      [tlv] extended supported rates
1445                  *      [tlv] mesh id
1446                  */
1447                 ssid = meshid = rates = xrates = NULL;
1448                 sfrm = frm;
1449                 while (efrm - frm > 1) {
1450                         IEEE80211_VERIFY_LENGTH(efrm - frm, frm[1] + 2, return);
1451                         switch (*frm) {
1452                         case IEEE80211_ELEMID_SSID:
1453                                 ssid = frm;
1454                                 break;
1455                         case IEEE80211_ELEMID_RATES:
1456                                 rates = frm;
1457                                 break;
1458                         case IEEE80211_ELEMID_XRATES:
1459                                 xrates = frm;
1460                                 break;
1461                         case IEEE80211_ELEMID_MESHID:
1462                                 meshid = frm;
1463                                 break;
1464                         }
1465                         frm += frm[2] + 2;
1466                 }
1467                 IEEE80211_VERIFY_ELEMENT(ssid, IEEE80211_NWID_LEN, return);
1468                 IEEE80211_VERIFY_ELEMENT(rates, IEEE80211_RATE_MAXSIZE, return);
1469                 if (xrates != NULL)
1470                         IEEE80211_VERIFY_ELEMENT(xrates,
1471                             IEEE80211_RATE_MAXSIZE - rates[1], return);
1472                 if (meshid != NULL) {
1473                         IEEE80211_VERIFY_ELEMENT(meshid,
1474                             IEEE80211_MESHID_LEN, return);
1475                         /* NB: meshid, not ssid */
1476                         IEEE80211_VERIFY_SSID(vap->iv_bss, meshid, return);
1477                 }
1478
1479                 /* XXX find a better class or define it's own */
1480                 IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_INPUT, wh->i_addr2,
1481                     "%s", "recv probe req");
1482                 /*
1483                  * Some legacy 11b clients cannot hack a complete
1484                  * probe response frame.  When the request includes
1485                  * only a bare-bones rate set, communicate this to
1486                  * the transmit side.
1487                  */
1488                 ieee80211_send_proberesp(vap, wh->i_addr2, 0);
1489                 break;
1490         }
1491         case IEEE80211_FC0_SUBTYPE_ACTION:
1492                 if (vap->iv_state != IEEE80211_S_RUN) {
1493                         vap->iv_stats.is_rx_mgtdiscard++;
1494                         break;
1495                 }
1496                 /*
1497                  * We received an action for an unknown neighbor.
1498                  * XXX: wait for it to beacon or create ieee80211_node?
1499                  */
1500                 if (ni == vap->iv_bss) {
1501                         IEEE80211_DISCARD(vap, IEEE80211_MSG_MESH,
1502                             wh, NULL, "%s", "unknown node");
1503                         vap->iv_stats.is_rx_mgtdiscard++;
1504                         break;
1505                 }
1506                 /*
1507                  * Discard if not for us.
1508                  */
1509                 if (!IEEE80211_ADDR_EQ(vap->iv_myaddr, wh->i_addr1) &&
1510                     !IEEE80211_IS_MULTICAST(wh->i_addr1)) {
1511                         IEEE80211_DISCARD(vap, IEEE80211_MSG_MESH,
1512                             wh, NULL, "%s", "not for me");
1513                         vap->iv_stats.is_rx_mgtdiscard++;
1514                         break;
1515                 }
1516                 /* XXX parse_action is a bit useless now */
1517                 if (ieee80211_parse_action(ni, m0) == 0)
1518                         ic->ic_recv_action(ni, wh, frm, efrm);
1519                 break;
1520         case IEEE80211_FC0_SUBTYPE_AUTH:
1521         case IEEE80211_FC0_SUBTYPE_ASSOC_REQ:
1522         case IEEE80211_FC0_SUBTYPE_REASSOC_REQ:
1523         case IEEE80211_FC0_SUBTYPE_ASSOC_RESP:
1524         case IEEE80211_FC0_SUBTYPE_REASSOC_RESP:
1525         case IEEE80211_FC0_SUBTYPE_DEAUTH:
1526         case IEEE80211_FC0_SUBTYPE_DISASSOC:
1527                 IEEE80211_DISCARD(vap, IEEE80211_MSG_INPUT,
1528                     wh, NULL, "%s", "not handled");
1529                 vap->iv_stats.is_rx_mgtdiscard++;
1530                 return;
1531         default:
1532                 IEEE80211_DISCARD(vap, IEEE80211_MSG_ANY,
1533                     wh, "mgt", "subtype 0x%x not handled", subtype);
1534                 vap->iv_stats.is_rx_badsubtype++;
1535                 break;
1536         }
1537 }
1538
1539 /*
1540  * Parse meshpeering action ie's for open+confirm frames; the
1541  * important bits are returned in the supplied structure.
1542  */
1543 static const struct ieee80211_meshpeer_ie *
1544 mesh_parse_meshpeering_action(struct ieee80211_node *ni,
1545         const struct ieee80211_frame *wh,       /* XXX for VERIFY_LENGTH */
1546         const uint8_t *frm, const uint8_t *efrm,
1547         struct ieee80211_meshpeer_ie *mp, uint8_t subtype)
1548 {
1549         struct ieee80211vap *vap = ni->ni_vap;
1550         const struct ieee80211_meshpeer_ie *mpie;
1551         const uint8_t *meshid, *meshconf, *meshpeer;
1552
1553         meshid = meshconf = meshpeer = NULL;
1554         while (efrm - frm > 1) {
1555                 IEEE80211_VERIFY_LENGTH(efrm - frm, frm[1] + 2, return NULL);
1556                 switch (*frm) {
1557                 case IEEE80211_ELEMID_MESHID:
1558                         meshid = frm;
1559                         break;
1560                 case IEEE80211_ELEMID_MESHCONF:
1561                         meshconf = frm;
1562                         break;
1563                 case IEEE80211_ELEMID_MESHPEER:
1564                         meshpeer = frm;
1565                         mpie = (const struct ieee80211_meshpeer_ie *) frm;
1566                         memset(mp, 0, sizeof(*mp));
1567                         mp->peer_llinkid = LE_READ_2(&mpie->peer_llinkid);
1568                         /* NB: peer link ID is optional on these frames */
1569                         if (subtype == IEEE80211_MESH_PEER_LINK_CLOSE &&
1570                             mpie->peer_len == 8) {
1571                                 mp->peer_linkid = 0;
1572                                 mp->peer_rcode = LE_READ_2(&mpie->peer_linkid);
1573                         } else {
1574                                 mp->peer_linkid = LE_READ_2(&mpie->peer_linkid);
1575                                 mp->peer_rcode = LE_READ_2(&mpie->peer_rcode);
1576                         }
1577                         break;
1578                 }
1579                 frm += frm[1] + 2;
1580         }
1581
1582         /*
1583          * Verify the contents of the frame. Action frames with
1584          * close subtype don't have a Mesh Configuration IE.
1585          * If if fails validation, close the peer link.
1586          */
1587         KASSERT(meshpeer != NULL &&
1588             subtype != IEEE80211_ACTION_MESHPEERING_CLOSE,
1589             ("parsing close action"));
1590
1591         if (mesh_verify_meshid(vap, meshid) ||
1592             mesh_verify_meshpeer(vap, subtype, meshpeer) ||
1593             mesh_verify_meshconf(vap, meshconf)) {
1594                 uint16_t args[3];
1595
1596                 IEEE80211_DISCARD(vap,
1597                     IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH,
1598                     wh, NULL, "%s", "not for our mesh");
1599                 vap->iv_stats.is_rx_mgtdiscard++;
1600                 switch (ni->ni_mlstate) {
1601                 case IEEE80211_NODE_MESH_IDLE:
1602                 case IEEE80211_NODE_MESH_ESTABLISHED:
1603                 case IEEE80211_NODE_MESH_HOLDING:
1604                         /* ignore */
1605                         break;
1606                 case IEEE80211_NODE_MESH_OPENSNT:
1607                 case IEEE80211_NODE_MESH_OPENRCV:
1608                 case IEEE80211_NODE_MESH_CONFIRMRCV:
1609                         args[0] = ni->ni_mlpid;
1610                         args[1] = ni->ni_mllid;
1611                         args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
1612                         ieee80211_send_action(ni,
1613                             IEEE80211_ACTION_CAT_MESHPEERING,
1614                             IEEE80211_ACTION_MESHPEERING_CLOSE,
1615                             args);
1616                         mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
1617                         mesh_peer_timeout_setup(ni);
1618                         break;
1619                 }
1620                 return NULL;
1621         }
1622         return (const struct ieee80211_meshpeer_ie *) mp;
1623 }
1624
1625 static int
1626 mesh_recv_action_meshpeering_open(struct ieee80211_node *ni,
1627         const struct ieee80211_frame *wh,
1628         const uint8_t *frm, const uint8_t *efrm)
1629 {
1630         struct ieee80211vap *vap = ni->ni_vap;
1631         struct ieee80211_meshpeer_ie ie;
1632         const struct ieee80211_meshpeer_ie *meshpeer;
1633         uint16_t args[3];
1634
1635         /* +2+2 for action + code + capabilites */
1636         meshpeer = mesh_parse_meshpeering_action(ni, wh, frm+2+2, efrm, &ie,
1637             IEEE80211_ACTION_MESHPEERING_OPEN);
1638         if (meshpeer == NULL) {
1639                 return 0;
1640         }
1641
1642         /* XXX move up */
1643         IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH, ni,
1644             "recv PEER OPEN, lid 0x%x", meshpeer->peer_llinkid);
1645
1646         switch (ni->ni_mlstate) {
1647         case IEEE80211_NODE_MESH_IDLE:
1648                 mesh_linkchange(ni, IEEE80211_NODE_MESH_OPENRCV);
1649                 ni->ni_mllid = meshpeer->peer_llinkid;
1650                 ni->ni_mlpid = mesh_generateid(vap);
1651                 if (ni->ni_mlpid == 0)
1652                         return 0;               /* XXX */
1653                 args[0] = ni->ni_mlpid;
1654                 /* Announce we're open too... */
1655                 ieee80211_send_action(ni,
1656                     IEEE80211_ACTION_CAT_MESHPEERING,
1657                     IEEE80211_ACTION_MESHPEERING_OPEN, args);
1658                 /* ...and confirm the link. */
1659                 args[0] = ni->ni_mlpid;
1660                 args[1] = ni->ni_mllid;
1661                 ieee80211_send_action(ni,
1662                     IEEE80211_ACTION_CAT_MESHPEERING,
1663                     IEEE80211_ACTION_MESHPEERING_CONFIRM,
1664                     args);
1665                 mesh_peer_timeout_setup(ni);
1666                 break;
1667         case IEEE80211_NODE_MESH_OPENRCV:
1668                 /* Wrong Link ID */
1669                 if (ni->ni_mllid != meshpeer->peer_llinkid) {
1670                         args[0] = ni->ni_mllid;
1671                         args[1] = ni->ni_mlpid;
1672                         args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
1673                         ieee80211_send_action(ni,
1674                             IEEE80211_ACTION_CAT_MESHPEERING,
1675                             IEEE80211_ACTION_MESHPEERING_CLOSE,
1676                             args);
1677                         mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
1678                         mesh_peer_timeout_setup(ni);
1679                         break;
1680                 }
1681                 /* Duplicate open, confirm again. */
1682                 args[0] = ni->ni_mlpid;
1683                 args[1] = ni->ni_mllid;
1684                 ieee80211_send_action(ni,
1685                     IEEE80211_ACTION_CAT_MESHPEERING,
1686                     IEEE80211_ACTION_MESHPEERING_CONFIRM,
1687                     args);
1688                 break;
1689         case IEEE80211_NODE_MESH_OPENSNT:
1690                 ni->ni_mllid = meshpeer->peer_llinkid;
1691                 mesh_linkchange(ni, IEEE80211_NODE_MESH_OPENRCV);
1692                 args[0] = ni->ni_mlpid;
1693                 args[1] = ni->ni_mllid;
1694                 ieee80211_send_action(ni,
1695                     IEEE80211_ACTION_CAT_MESHPEERING,
1696                     IEEE80211_ACTION_MESHPEERING_CONFIRM,
1697                     args);
1698                 /* NB: don't setup/clear any timeout */
1699                 break;
1700         case IEEE80211_NODE_MESH_CONFIRMRCV:
1701                 if (ni->ni_mlpid != meshpeer->peer_linkid ||
1702                     ni->ni_mllid != meshpeer->peer_llinkid) {
1703                         args[0] = ni->ni_mlpid;
1704                         args[1] = ni->ni_mllid;
1705                         args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
1706                         ieee80211_send_action(ni,
1707                             IEEE80211_ACTION_CAT_MESHPEERING,
1708                             IEEE80211_ACTION_MESHPEERING_CLOSE,
1709                             args);
1710                         mesh_linkchange(ni,
1711                             IEEE80211_NODE_MESH_HOLDING);
1712                         mesh_peer_timeout_setup(ni);
1713                         break;
1714                 }
1715                 mesh_linkchange(ni, IEEE80211_NODE_MESH_ESTABLISHED);
1716                 ni->ni_mllid = meshpeer->peer_llinkid;
1717                 args[0] = ni->ni_mlpid;
1718                 args[1] = ni->ni_mllid;
1719                 ieee80211_send_action(ni,
1720                     IEEE80211_ACTION_CAT_MESHPEERING,
1721                     IEEE80211_ACTION_MESHPEERING_CONFIRM,
1722                     args);
1723                 mesh_peer_timeout_stop(ni);
1724                 break;
1725         case IEEE80211_NODE_MESH_ESTABLISHED:
1726                 if (ni->ni_mllid != meshpeer->peer_llinkid) {
1727                         args[0] = ni->ni_mllid;
1728                         args[1] = ni->ni_mlpid;
1729                         args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
1730                         ieee80211_send_action(ni,
1731                             IEEE80211_ACTION_CAT_MESHPEERING,
1732                             IEEE80211_ACTION_MESHPEERING_CLOSE,
1733                             args);
1734                         mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
1735                         mesh_peer_timeout_setup(ni);
1736                         break;
1737                 }
1738                 args[0] = ni->ni_mlpid;
1739                 args[1] = ni->ni_mllid;
1740                 ieee80211_send_action(ni,
1741                     IEEE80211_ACTION_CAT_MESHPEERING,
1742                     IEEE80211_ACTION_MESHPEERING_CONFIRM,
1743                     args);
1744                 break;
1745         case IEEE80211_NODE_MESH_HOLDING:
1746                 args[0] = ni->ni_mlpid;
1747                 args[1] = meshpeer->peer_llinkid;
1748                 args[2] = IEEE80211_REASON_MESH_MAX_RETRIES;
1749                 ieee80211_send_action(ni,
1750                     IEEE80211_ACTION_CAT_MESHPEERING,
1751                     IEEE80211_ACTION_MESHPEERING_CLOSE,
1752                     args);
1753                 break;
1754         }
1755         return 0;
1756 }
1757
1758 static int
1759 mesh_recv_action_meshpeering_confirm(struct ieee80211_node *ni,
1760         const struct ieee80211_frame *wh,
1761         const uint8_t *frm, const uint8_t *efrm)
1762 {
1763         struct ieee80211vap *vap = ni->ni_vap;
1764         struct ieee80211_meshpeer_ie ie;
1765         const struct ieee80211_meshpeer_ie *meshpeer;
1766         uint16_t args[3];
1767
1768         /* +2+2+2+2 for action + code + capabilites + status code + AID */
1769         meshpeer = mesh_parse_meshpeering_action(ni, wh, frm+2+2+2+2, efrm, &ie,
1770             IEEE80211_ACTION_MESHPEERING_CONFIRM);
1771         if (meshpeer == NULL) {
1772                 return 0;
1773         }
1774
1775         IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH, ni,
1776             "recv PEER CONFIRM, local id 0x%x, peer id 0x%x",
1777             meshpeer->peer_llinkid, meshpeer->peer_linkid);
1778
1779         switch (ni->ni_mlstate) {
1780         case IEEE80211_NODE_MESH_OPENRCV:
1781                 mesh_linkchange(ni, IEEE80211_NODE_MESH_ESTABLISHED);
1782                 mesh_peer_timeout_stop(ni);
1783                 break;
1784         case IEEE80211_NODE_MESH_OPENSNT:
1785                 mesh_linkchange(ni, IEEE80211_NODE_MESH_CONFIRMRCV);
1786                 break;
1787         case IEEE80211_NODE_MESH_HOLDING:
1788                 args[0] = ni->ni_mlpid;
1789                 args[1] = meshpeer->peer_llinkid;
1790                 args[2] = IEEE80211_REASON_MESH_MAX_RETRIES;
1791                 ieee80211_send_action(ni,
1792                     IEEE80211_ACTION_CAT_MESHPEERING,
1793                     IEEE80211_ACTION_MESHPEERING_CLOSE,
1794                     args);
1795                 break;
1796         case IEEE80211_NODE_MESH_CONFIRMRCV:
1797                 if (ni->ni_mllid != meshpeer->peer_llinkid) {
1798                         args[0] = ni->ni_mlpid;
1799                         args[1] = ni->ni_mllid;
1800                         args[2] = IEEE80211_REASON_PEER_LINK_CANCELED;
1801                         ieee80211_send_action(ni,
1802                             IEEE80211_ACTION_CAT_MESHPEERING,
1803                             IEEE80211_ACTION_MESHPEERING_CLOSE,
1804                             args);
1805                         mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
1806                         mesh_peer_timeout_setup(ni);
1807                 }
1808                 break;
1809         default:
1810                 IEEE80211_DISCARD(vap,
1811                     IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH,
1812                     wh, NULL, "received confirm in invalid state %d",
1813                     ni->ni_mlstate);
1814                 vap->iv_stats.is_rx_mgtdiscard++;
1815                 break;
1816         }
1817         return 0;
1818 }
1819
1820 static int
1821 mesh_recv_action_meshpeering_close(struct ieee80211_node *ni,
1822         const struct ieee80211_frame *wh,
1823         const uint8_t *frm, const uint8_t *efrm)
1824 {
1825         uint16_t args[3];
1826
1827         IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH,
1828             ni, "%s", "recv PEER CLOSE");
1829
1830         switch (ni->ni_mlstate) {
1831         case IEEE80211_NODE_MESH_IDLE:
1832                 /* ignore */
1833                 break;
1834         case IEEE80211_NODE_MESH_OPENRCV:
1835         case IEEE80211_NODE_MESH_OPENSNT:
1836         case IEEE80211_NODE_MESH_CONFIRMRCV:
1837         case IEEE80211_NODE_MESH_ESTABLISHED:
1838                 args[0] = ni->ni_mlpid;
1839                 args[1] = ni->ni_mllid;
1840                 args[2] = IEEE80211_REASON_MESH_CLOSE_RCVD;
1841                 ieee80211_send_action(ni,
1842                     IEEE80211_ACTION_CAT_MESHPEERING,
1843                     IEEE80211_ACTION_MESHPEERING_CLOSE,
1844                     args);
1845                 mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
1846                 mesh_peer_timeout_setup(ni);
1847                 break;
1848         case IEEE80211_NODE_MESH_HOLDING:
1849                 mesh_linkchange(ni, IEEE80211_NODE_MESH_IDLE);
1850                 mesh_peer_timeout_setup(ni);
1851                 break;
1852         }
1853         return 0;
1854 }
1855
1856 /*
1857  * Link Metric handling.
1858  */
1859 static int
1860 mesh_recv_action_meshlmetric_req(struct ieee80211_node *ni,
1861         const struct ieee80211_frame *wh,
1862         const uint8_t *frm, const uint8_t *efrm)
1863 {
1864         uint32_t metric;
1865
1866         metric = mesh_airtime_calc(ni);
1867         ieee80211_send_action(ni,
1868             IEEE80211_ACTION_CAT_MESHLMETRIC,
1869             IEEE80211_ACTION_MESHLMETRIC_REP,
1870             &metric);
1871         return 0;
1872 }
1873
1874 static int
1875 mesh_recv_action_meshlmetric_rep(struct ieee80211_node *ni,
1876         const struct ieee80211_frame *wh,
1877         const uint8_t *frm, const uint8_t *efrm)
1878 {
1879         return 0;
1880 }
1881
1882 static int
1883 mesh_send_action(struct ieee80211_node *ni, struct mbuf *m)
1884 {
1885         struct ieee80211_bpf_params params;
1886
1887         memset(&params, 0, sizeof(params));
1888         params.ibp_pri = WME_AC_VO;
1889         params.ibp_rate0 = ni->ni_txparms->mgmtrate;
1890         /* XXX ucast/mcast */
1891         params.ibp_try0 = ni->ni_txparms->maxretry;
1892         params.ibp_power = ni->ni_txpower;
1893         return ieee80211_mgmt_output(ni, m, IEEE80211_FC0_SUBTYPE_ACTION,
1894              &params);
1895 }
1896
1897 #define ADDSHORT(frm, v) do {                   \
1898         frm[0] = (v) & 0xff;                    \
1899         frm[1] = (v) >> 8;                      \
1900         frm += 2;                               \
1901 } while (0)
1902 #define ADDWORD(frm, v) do {                    \
1903         frm[0] = (v) & 0xff;                    \
1904         frm[1] = ((v) >> 8) & 0xff;             \
1905         frm[2] = ((v) >> 16) & 0xff;            \
1906         frm[3] = ((v) >> 24) & 0xff;            \
1907         frm += 4;                               \
1908 } while (0)
1909
1910 static int
1911 mesh_send_action_meshpeering_open(struct ieee80211_node *ni,
1912         int category, int action, void *args0)
1913 {
1914         struct ieee80211vap *vap = ni->ni_vap;
1915         struct ieee80211com *ic = ni->ni_ic;
1916         uint16_t *args = args0;
1917         const struct ieee80211_rateset *rs;
1918         struct mbuf *m;
1919         uint8_t *frm;
1920
1921         IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH, ni,
1922             "send PEER OPEN action: localid 0x%x", args[0]);
1923
1924         IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
1925             "ieee80211_ref_node (%s:%u) %p<%6D> refcnt %d\n", __func__, __LINE__,
1926             ni, ni->ni_macaddr, ":", ieee80211_node_refcnt(ni)+1);
1927         ieee80211_ref_node(ni);
1928
1929         m = ieee80211_getmgtframe(&frm,
1930             ic->ic_headroom + sizeof(struct ieee80211_frame),
1931             sizeof(uint16_t)    /* action+category */
1932             + sizeof(uint16_t)  /* capabilites */
1933             + 2 + IEEE80211_RATE_SIZE    
1934             + 2 + (IEEE80211_RATE_MAXSIZE - IEEE80211_RATE_SIZE)         
1935             + 2 + IEEE80211_MESHID_LEN
1936             + sizeof(struct ieee80211_meshconf_ie)       
1937             + sizeof(struct ieee80211_meshpeer_ie)
1938         );
1939         if (m != NULL) {
1940                 /*
1941                  * mesh peer open action frame format:
1942                  *   [1] category
1943                  *   [1] action
1944                  *   [2] capabilities
1945                  *   [tlv] rates
1946                  *   [tlv] xrates
1947                  *   [tlv] mesh id
1948                  *   [tlv] mesh conf
1949                  *   [tlv] mesh peer link mgmt
1950                  */
1951                 *frm++ = category;
1952                 *frm++ = action;
1953                 ADDSHORT(frm, ieee80211_getcapinfo(vap, ni->ni_chan));
1954                 rs = ieee80211_get_suprates(ic, ic->ic_curchan);
1955                 frm = ieee80211_add_rates(frm, rs);
1956                 frm = ieee80211_add_xrates(frm, rs);
1957                 frm = ieee80211_add_meshid(frm, vap);
1958                 frm = ieee80211_add_meshconf(frm, vap);
1959                 frm = ieee80211_add_meshpeer(frm, IEEE80211_MESH_PEER_LINK_OPEN,
1960                     args[0], 0, 0);
1961                 m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
1962                 return mesh_send_action(ni, m);
1963         } else {
1964                 vap->iv_stats.is_tx_nobuf++;
1965                 ieee80211_free_node(ni);
1966                 return ENOMEM;
1967         }
1968 }
1969
1970 static int
1971 mesh_send_action_meshpeering_confirm(struct ieee80211_node *ni,
1972         int category, int action, void *args0)
1973 {
1974         struct ieee80211vap *vap = ni->ni_vap;
1975         struct ieee80211com *ic = ni->ni_ic;
1976         uint16_t *args = args0;
1977         const struct ieee80211_rateset *rs;
1978         struct mbuf *m;
1979         uint8_t *frm;
1980
1981         IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH, ni,
1982             "send PEER CONFIRM action: localid 0x%x, peerid 0x%x",
1983             args[0], args[1]);
1984
1985         IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
1986             "ieee80211_ref_node (%s:%u) %p<%6D> refcnt %d\n", __func__, __LINE__,
1987             ni, ni->ni_macaddr, ":", ieee80211_node_refcnt(ni)+1);
1988         ieee80211_ref_node(ni);
1989
1990         m = ieee80211_getmgtframe(&frm,
1991             ic->ic_headroom + sizeof(struct ieee80211_frame),
1992             sizeof(uint16_t)    /* action+category */
1993             + sizeof(uint16_t)  /* capabilites */
1994             + sizeof(uint16_t)  /* status code */
1995             + sizeof(uint16_t)  /* AID */
1996             + 2 + IEEE80211_RATE_SIZE    
1997             + 2 + (IEEE80211_RATE_MAXSIZE - IEEE80211_RATE_SIZE)         
1998             + 2 + IEEE80211_MESHID_LEN
1999             + sizeof(struct ieee80211_meshconf_ie)       
2000             + sizeof(struct ieee80211_meshpeer_ie)
2001         );
2002         if (m != NULL) {
2003                 /*
2004                  * mesh peer confirm action frame format:
2005                  *   [1] category
2006                  *   [1] action
2007                  *   [2] capabilities
2008                  *   [2] status code
2009                  *   [2] association id (peer ID)
2010                  *   [tlv] rates
2011                  *   [tlv] xrates
2012                  *   [tlv] mesh id
2013                  *   [tlv] mesh conf
2014                  *   [tlv] mesh peer link mgmt
2015                  */
2016                 *frm++ = category;
2017                 *frm++ = action;
2018                 ADDSHORT(frm, ieee80211_getcapinfo(vap, ni->ni_chan));
2019                 ADDSHORT(frm, 0);               /* status code */
2020                 ADDSHORT(frm, args[1]);         /* AID */
2021                 rs = ieee80211_get_suprates(ic, ic->ic_curchan);
2022                 frm = ieee80211_add_rates(frm, rs);
2023                 frm = ieee80211_add_xrates(frm, rs);
2024                 frm = ieee80211_add_meshid(frm, vap);
2025                 frm = ieee80211_add_meshconf(frm, vap);
2026                 frm = ieee80211_add_meshpeer(frm,
2027                     IEEE80211_MESH_PEER_LINK_CONFIRM,
2028                     args[0], args[1], 0);
2029                 m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2030                 return mesh_send_action(ni, m);
2031         } else {
2032                 vap->iv_stats.is_tx_nobuf++;
2033                 ieee80211_free_node(ni);
2034                 return ENOMEM;
2035         }
2036 }
2037
2038 static int
2039 mesh_send_action_meshpeering_close(struct ieee80211_node *ni,
2040         int category, int action, void *args0)
2041 {
2042         struct ieee80211vap *vap = ni->ni_vap;
2043         struct ieee80211com *ic = ni->ni_ic;
2044         uint16_t *args = args0;
2045         struct mbuf *m;
2046         uint8_t *frm;
2047
2048         IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH, ni,
2049             "send PEER CLOSE action: localid 0x%x, peerid 0x%x reason %d",
2050             args[0], args[1], args[2]);
2051
2052         IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2053             "ieee80211_ref_node (%s:%u) %p<%6D> refcnt %d\n", __func__, __LINE__,
2054             ni, ni->ni_macaddr, ieee80211_node_refcnt(ni)+1);
2055         ieee80211_ref_node(ni);
2056
2057         m = ieee80211_getmgtframe(&frm,
2058             ic->ic_headroom + sizeof(struct ieee80211_frame),
2059             sizeof(uint16_t)    /* action+category */
2060             + sizeof(uint16_t)  /* reason code */
2061             + 2 + IEEE80211_MESHID_LEN
2062             + sizeof(struct ieee80211_meshpeer_ie) 
2063         );
2064         if (m != NULL) {
2065                 /*
2066                  * mesh peer close action frame format:
2067                  *   [1] category
2068                  *   [1] action
2069                  *   [2] reason code
2070                  *   [tlv] mesh id
2071                  *   [tlv] mesh peer link mgmt
2072                  */
2073                 *frm++ = category;
2074                 *frm++ = action;
2075                 ADDSHORT(frm, args[2]);         /* reason code */
2076                 frm = ieee80211_add_meshid(frm, vap);
2077                 frm = ieee80211_add_meshpeer(frm,
2078                     IEEE80211_MESH_PEER_LINK_CLOSE,
2079                     args[0], args[1], args[2]);
2080                 m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2081                 return mesh_send_action(ni, m);
2082         } else {
2083                 vap->iv_stats.is_tx_nobuf++;
2084                 ieee80211_free_node(ni);
2085                 return ENOMEM;
2086         }
2087 }
2088
2089 static int
2090 mesh_send_action_meshlink_request(struct ieee80211_node *ni,
2091         int category, int action, void *arg0)
2092 {
2093         struct ieee80211vap *vap = ni->ni_vap;
2094         struct ieee80211com *ic = ni->ni_ic;
2095         struct mbuf *m;
2096         uint8_t *frm;
2097
2098         IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH, ni,
2099             "%s", "send LINK METRIC REQUEST action");
2100
2101         IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2102             "ieee80211_ref_node (%s:%u) %p<%6D> refcnt %d\n", __func__, __LINE__,
2103             ni, ni->ni_macaddr, ":", ieee80211_node_refcnt(ni)+1);
2104         ieee80211_ref_node(ni);
2105
2106         m = ieee80211_getmgtframe(&frm,
2107             ic->ic_headroom + sizeof(struct ieee80211_frame),
2108             sizeof(uint16_t)    /* action+category */
2109         );
2110         if (m != NULL) {
2111                 /*
2112                  * mesh link metric request
2113                  *   [1] category
2114                  *   [1] action
2115                  */
2116                 *frm++ = category;
2117                 *frm++ = action;
2118                 m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2119                 return mesh_send_action(ni, m);
2120         } else {
2121                 vap->iv_stats.is_tx_nobuf++;
2122                 ieee80211_free_node(ni);
2123                 return ENOMEM;
2124         }
2125 }
2126
2127 static int
2128 mesh_send_action_meshlink_reply(struct ieee80211_node *ni,
2129         int category, int action, void *args0)
2130 {
2131         struct ieee80211vap *vap = ni->ni_vap;
2132         struct ieee80211com *ic = ni->ni_ic;
2133         uint32_t *metric = args0;
2134         struct mbuf *m;
2135         uint8_t *frm;
2136
2137         IEEE80211_NOTE(vap, IEEE80211_MSG_ACTION | IEEE80211_MSG_MESH, ni,
2138             "send LINK METRIC REPLY action: metric 0x%x", *metric);
2139
2140         IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
2141             "ieee80211_ref_node (%s:%u) %p<%6D> refcnt %d\n", __func__, __LINE__,
2142             ni, ni->ni_macaddr, ":", ieee80211_node_refcnt(ni)+1);
2143         ieee80211_ref_node(ni);
2144
2145         m = ieee80211_getmgtframe(&frm,
2146             ic->ic_headroom + sizeof(struct ieee80211_frame),
2147             sizeof(uint16_t)    /* action+category */
2148             + sizeof(struct ieee80211_meshlmetric_ie)
2149         );
2150         if (m != NULL) {
2151                 /*
2152                  * mesh link metric reply
2153                  *   [1] category
2154                  *   [1] action
2155                  *   [tlv] mesh link metric
2156                  */
2157                 *frm++ = category;
2158                 *frm++ = action;
2159                 frm = ieee80211_add_meshlmetric(frm, *metric);
2160                 m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
2161                 return mesh_send_action(ni, m);
2162         } else {
2163                 vap->iv_stats.is_tx_nobuf++;
2164                 ieee80211_free_node(ni);
2165                 return ENOMEM;
2166         }
2167 }
2168
2169 static void
2170 mesh_peer_timeout_setup(struct ieee80211_node *ni)
2171 {
2172         switch (ni->ni_mlstate) {
2173         case IEEE80211_NODE_MESH_HOLDING:
2174                 ni->ni_mltval = ieee80211_mesh_holdingtimeout;
2175                 break;
2176         case IEEE80211_NODE_MESH_CONFIRMRCV:
2177                 ni->ni_mltval = ieee80211_mesh_confirmtimeout;
2178                 break;
2179         case IEEE80211_NODE_MESH_IDLE:
2180                 ni->ni_mltval = 0;
2181                 break;
2182         default:
2183                 ni->ni_mltval = ieee80211_mesh_retrytimeout;
2184                 break;
2185         }
2186         if (ni->ni_mltval)
2187                 callout_reset(&ni->ni_mltimer, ni->ni_mltval,
2188                     mesh_peer_timeout_cb, ni);
2189 }
2190
2191 /*
2192  * Same as above but backoffs timer statisically 50%.
2193  */
2194 static void
2195 mesh_peer_timeout_backoff(struct ieee80211_node *ni)
2196 {
2197         uint32_t r;
2198         
2199         r = karc4random();
2200         ni->ni_mltval += r % ni->ni_mltval;
2201         callout_reset(&ni->ni_mltimer, ni->ni_mltval, mesh_peer_timeout_cb,
2202             ni);
2203 }
2204
2205 static __inline void
2206 mesh_peer_timeout_stop(struct ieee80211_node *ni)
2207 {
2208         callout_stop(&ni->ni_mltimer);
2209 }
2210
2211 /*
2212  * Mesh Peer Link Management FSM timeout handling.
2213  */
2214 static void
2215 mesh_peer_timeout_cb(void *arg)
2216 {
2217         struct ieee80211_node *ni = (struct ieee80211_node *)arg;
2218         uint16_t args[3];
2219
2220         IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_MESH,
2221             ni, "mesh link timeout, state %d, retry counter %d",
2222             ni->ni_mlstate, ni->ni_mlrcnt);
2223         
2224         switch (ni->ni_mlstate) {
2225         case IEEE80211_NODE_MESH_IDLE:
2226         case IEEE80211_NODE_MESH_ESTABLISHED:
2227                 break;
2228         case IEEE80211_NODE_MESH_OPENSNT:
2229         case IEEE80211_NODE_MESH_OPENRCV:
2230                 if (ni->ni_mlrcnt == ieee80211_mesh_maxretries) {
2231                         args[0] = ni->ni_mlpid;
2232                         args[2] = IEEE80211_REASON_MESH_MAX_RETRIES;
2233                         ieee80211_send_action(ni,
2234                             IEEE80211_ACTION_CAT_MESHPEERING,
2235                             IEEE80211_ACTION_MESHPEERING_CLOSE, args);
2236                         ni->ni_mlrcnt = 0;
2237                         mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
2238                         mesh_peer_timeout_setup(ni);
2239                 } else {
2240                         args[0] = ni->ni_mlpid;
2241                         ieee80211_send_action(ni,
2242                             IEEE80211_ACTION_CAT_MESHPEERING,
2243                             IEEE80211_ACTION_MESHPEERING_OPEN, args);
2244                         ni->ni_mlrcnt++;
2245                         mesh_peer_timeout_backoff(ni);
2246                 }
2247                 break;
2248         case IEEE80211_NODE_MESH_CONFIRMRCV:
2249                 if (ni->ni_mlrcnt == ieee80211_mesh_maxretries) {
2250                         args[0] = ni->ni_mlpid;
2251                         args[2] = IEEE80211_REASON_MESH_CONFIRM_TIMEOUT;
2252                         ieee80211_send_action(ni,
2253                             IEEE80211_ACTION_CAT_MESHPEERING,
2254                             IEEE80211_ACTION_MESHPEERING_CLOSE, args);
2255                         ni->ni_mlrcnt = 0;
2256                         mesh_linkchange(ni, IEEE80211_NODE_MESH_HOLDING);
2257                         mesh_peer_timeout_setup(ni);
2258                 } else {
2259                         ni->ni_mlrcnt++;
2260                         mesh_peer_timeout_setup(ni);
2261                 }
2262                 break;
2263         case IEEE80211_NODE_MESH_HOLDING:
2264                 mesh_linkchange(ni, IEEE80211_NODE_MESH_IDLE);
2265                 break;
2266         }
2267 }
2268
2269 static int
2270 mesh_verify_meshid(struct ieee80211vap *vap, const uint8_t *ie)
2271 {
2272         struct ieee80211_mesh_state *ms = vap->iv_mesh;
2273
2274         if (ie == NULL || ie[1] != ms->ms_idlen)
2275                 return 1;
2276         return memcmp(ms->ms_id, ie + 2, ms->ms_idlen);
2277 }
2278
2279 /*
2280  * Check if we are using the same algorithms for this mesh.
2281  */
2282 static int
2283 mesh_verify_meshconf(struct ieee80211vap *vap, const uint8_t *ie)
2284 {
2285         const struct ieee80211_meshconf_ie *meshconf =
2286             (const struct ieee80211_meshconf_ie *) ie;
2287         const struct ieee80211_mesh_state *ms = vap->iv_mesh;
2288         uint16_t cap;
2289
2290         if (meshconf == NULL)
2291                 return 1;
2292         if (meshconf->conf_pselid != ms->ms_ppath->mpp_ie) {
2293                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_MESH,
2294                     "unknown path selection algorithm: 0x%x\n",
2295                     meshconf->conf_pselid);
2296                 return 1;
2297         }
2298         if (meshconf->conf_pmetid != ms->ms_pmetric->mpm_ie) {
2299                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_MESH,
2300                     "unknown path metric algorithm: 0x%x\n",
2301                     meshconf->conf_pmetid);
2302                 return 1;
2303         }
2304         if (meshconf->conf_ccid != 0) {
2305                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_MESH,
2306                     "unknown congestion control algorithm: 0x%x\n",
2307                     meshconf->conf_ccid);
2308                 return 1;
2309         }
2310         if (meshconf->conf_syncid != IEEE80211_MESHCONF_SYNC_NEIGHOFF) {
2311                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_MESH,
2312                     "unknown sync algorithm: 0x%x\n",
2313                     meshconf->conf_syncid);
2314                 return 1;
2315         }
2316         if (meshconf->conf_authid != 0) {
2317                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_MESH,
2318                     "unknown auth auth algorithm: 0x%x\n",
2319                     meshconf->conf_pselid);
2320                 return 1;
2321         }
2322         /* NB: conf_cap is only read correctly here */
2323         cap = LE_READ_2(&meshconf->conf_cap);
2324         /* Not accepting peers */
2325         if (!(cap & IEEE80211_MESHCONF_CAP_AP)) {
2326                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_MESH,
2327                     "not accepting peers: 0x%x\n", meshconf->conf_cap);
2328                 return 1;
2329         }
2330         return 0;
2331 }
2332
2333 static int
2334 mesh_verify_meshpeer(struct ieee80211vap *vap, uint8_t subtype,
2335     const uint8_t *ie)
2336 {
2337         const struct ieee80211_meshpeer_ie *meshpeer =
2338             (const struct ieee80211_meshpeer_ie *) ie;
2339
2340         if (meshpeer == NULL || meshpeer->peer_len < 6 ||
2341             meshpeer->peer_len > 10)
2342                 return 1;
2343         switch (subtype) {
2344         case IEEE80211_MESH_PEER_LINK_OPEN:
2345                 if (meshpeer->peer_len != 6)
2346                         return 1;
2347                 break;
2348         case IEEE80211_MESH_PEER_LINK_CONFIRM:
2349                 if (meshpeer->peer_len != 8)
2350                         return 1;
2351                 break;
2352         case IEEE80211_MESH_PEER_LINK_CLOSE:
2353                 if (meshpeer->peer_len < 8)
2354                         return 1;
2355                 if (meshpeer->peer_len == 8 && meshpeer->peer_linkid != 0)
2356                         return 1;
2357                 if (meshpeer->peer_rcode == 0)
2358                         return 1;
2359                 break;
2360         }
2361         return 0;
2362 }
2363
2364 /*
2365  * Add a Mesh ID IE to a frame.
2366  */
2367 uint8_t *
2368 ieee80211_add_meshid(uint8_t *frm, struct ieee80211vap *vap)
2369 {
2370         struct ieee80211_mesh_state *ms = vap->iv_mesh;
2371
2372         KASSERT(vap->iv_opmode == IEEE80211_M_MBSS, ("not a mbss vap"));
2373
2374         *frm++ = IEEE80211_ELEMID_MESHID;
2375         *frm++ = ms->ms_idlen;
2376         memcpy(frm, ms->ms_id, ms->ms_idlen);
2377         return frm + ms->ms_idlen;
2378 }
2379
2380 /*
2381  * Add a Mesh Configuration IE to a frame.
2382  * For now just use HWMP routing, Airtime link metric, Null Congestion
2383  * Signaling, Null Sync Protocol and Null Authentication.
2384  */
2385 uint8_t *
2386 ieee80211_add_meshconf(uint8_t *frm, struct ieee80211vap *vap)
2387 {
2388         const struct ieee80211_mesh_state *ms = vap->iv_mesh;
2389         uint16_t caps;
2390
2391         KASSERT(vap->iv_opmode == IEEE80211_M_MBSS, ("not a MBSS vap"));
2392
2393         *frm++ = IEEE80211_ELEMID_MESHCONF;
2394         *frm++ = sizeof(struct ieee80211_meshconf_ie) - 2;
2395         *frm++ = ms->ms_ppath->mpp_ie;          /* path selection */
2396         *frm++ = ms->ms_pmetric->mpm_ie;        /* link metric */
2397         *frm++ = IEEE80211_MESHCONF_CC_DISABLED;
2398         *frm++ = IEEE80211_MESHCONF_SYNC_NEIGHOFF;
2399         *frm++ = IEEE80211_MESHCONF_AUTH_DISABLED;
2400         /* NB: set the number of neighbors before the rest */
2401         *frm = (ms->ms_neighbors > 15 ? 15 : ms->ms_neighbors) << 1;
2402         if (ms->ms_flags & IEEE80211_MESHFLAGS_PORTAL)
2403                 *frm |= IEEE80211_MESHCONF_FORM_MP;
2404         frm += 1;
2405         caps = 0;
2406         if (ms->ms_flags & IEEE80211_MESHFLAGS_AP)
2407                 caps |= IEEE80211_MESHCONF_CAP_AP;
2408         if (ms->ms_flags & IEEE80211_MESHFLAGS_FWD)
2409                 caps |= IEEE80211_MESHCONF_CAP_FWRD;
2410         ADDSHORT(frm, caps);
2411         return frm;
2412 }
2413
2414 /*
2415  * Add a Mesh Peer Management IE to a frame.
2416  */
2417 uint8_t *
2418 ieee80211_add_meshpeer(uint8_t *frm, uint8_t subtype, uint16_t localid,
2419     uint16_t peerid, uint16_t reason)
2420 {
2421         /* XXX change for AH */
2422         static const uint8_t meshpeerproto[4] = IEEE80211_MESH_PEER_PROTO;
2423
2424         KASSERT(localid != 0, ("localid == 0"));
2425
2426         *frm++ = IEEE80211_ELEMID_MESHPEER;
2427         switch (subtype) {
2428         case IEEE80211_MESH_PEER_LINK_OPEN:
2429                 *frm++ = 6;             /* length */
2430                 memcpy(frm, meshpeerproto, 4);
2431                 frm += 4;
2432                 ADDSHORT(frm, localid); /* local ID */
2433                 break;
2434         case IEEE80211_MESH_PEER_LINK_CONFIRM:
2435                 KASSERT(peerid != 0, ("sending peer confirm without peer id"));
2436                 *frm++ = 8;             /* length */
2437                 memcpy(frm, meshpeerproto, 4);
2438                 frm += 4;
2439                 ADDSHORT(frm, localid); /* local ID */
2440                 ADDSHORT(frm, peerid);  /* peer ID */
2441                 break;
2442         case IEEE80211_MESH_PEER_LINK_CLOSE:
2443                 if (peerid)
2444                         *frm++ = 10;    /* length */
2445                 else
2446                         *frm++ = 8;     /* length */
2447                 memcpy(frm, meshpeerproto, 4);
2448                 frm += 4;
2449                 ADDSHORT(frm, localid); /* local ID */
2450                 if (peerid)
2451                         ADDSHORT(frm, peerid);  /* peer ID */
2452                 ADDSHORT(frm, reason);
2453                 break;
2454         }
2455         return frm;
2456 }
2457
2458 /*
2459  * Compute an Airtime Link Metric for the link with this node.
2460  *
2461  * Based on Draft 3.0 spec (11B.10, p.149).
2462  */
2463 /*
2464  * Max 802.11s overhead.
2465  */
2466 #define IEEE80211_MESH_MAXOVERHEAD \
2467         (sizeof(struct ieee80211_qosframe_addr4) \
2468          + sizeof(struct ieee80211_meshcntl_ae11) \
2469         + sizeof(struct llc) \
2470         + IEEE80211_ADDR_LEN \
2471         + IEEE80211_WEP_IVLEN \
2472         + IEEE80211_WEP_KIDLEN \
2473         + IEEE80211_WEP_CRCLEN \
2474         + IEEE80211_WEP_MICLEN \
2475         + IEEE80211_CRC_LEN)
2476 uint32_t
2477 mesh_airtime_calc(struct ieee80211_node *ni)
2478 {
2479 #define M_BITS 8
2480 #define S_FACTOR (2 * M_BITS)
2481         struct ieee80211com *ic = ni->ni_ic;
2482         struct ifnet *ifp = ni->ni_vap->iv_ifp;
2483         const static int nbits = 8192 << M_BITS;
2484         uint32_t overhead, rate, errrate;
2485         uint64_t res;
2486
2487         /* Time to transmit a frame */
2488         rate = ni->ni_txrate;
2489         overhead = ieee80211_compute_duration(ic->ic_rt,
2490             ifp->if_mtu + IEEE80211_MESH_MAXOVERHEAD, rate, 0) << M_BITS;
2491         /* Error rate in percentage */
2492         /* XXX assuming small failures are ok */
2493         errrate = (((ifp->if_oerrors +
2494             ifp->if_ierrors) / 100) << M_BITS) / 100;
2495         res = (overhead + (nbits / rate)) *
2496             ((1 << S_FACTOR) / ((1 << M_BITS) - errrate));
2497
2498         return (uint32_t)(res >> S_FACTOR);
2499 #undef M_BITS
2500 #undef S_FACTOR
2501 }
2502
2503 /*
2504  * Add a Mesh Link Metric report IE to a frame.
2505  */
2506 uint8_t *
2507 ieee80211_add_meshlmetric(uint8_t *frm, uint32_t metric)
2508 {
2509         *frm++ = IEEE80211_ELEMID_MESHLINK;
2510         *frm++ = 4;
2511         ADDWORD(frm, metric);
2512         return frm;
2513 }
2514 #undef ADDSHORT
2515 #undef ADDWORD
2516
2517 /*
2518  * Initialize any mesh-specific node state.
2519  */
2520 void
2521 ieee80211_mesh_node_init(struct ieee80211vap *vap, struct ieee80211_node *ni)
2522 {
2523         ni->ni_flags |= IEEE80211_NODE_QOS;
2524         callout_init_mp(&ni->ni_mltimer);
2525 }
2526
2527 /*
2528  * Cleanup any mesh-specific node state.
2529  */
2530 void
2531 ieee80211_mesh_node_cleanup(struct ieee80211_node *ni)
2532 {
2533         struct ieee80211vap *vap = ni->ni_vap;
2534         struct ieee80211_mesh_state *ms = vap->iv_mesh;
2535
2536         callout_stop(&ni->ni_mltimer);
2537         /* NB: short-circuit callbacks after mesh_vdetach */
2538         if (vap->iv_mesh != NULL)
2539                 ms->ms_ppath->mpp_peerdown(ni);
2540 }
2541
2542 void
2543 ieee80211_parse_meshid(struct ieee80211_node *ni, const uint8_t *ie)
2544 {
2545         ni->ni_meshidlen = ie[1];
2546         memcpy(ni->ni_meshid, ie + 2, ie[1]);
2547 }
2548
2549 /*
2550  * Setup mesh-specific node state on neighbor discovery.
2551  */
2552 void
2553 ieee80211_mesh_init_neighbor(struct ieee80211_node *ni,
2554         const struct ieee80211_frame *wh,
2555         const struct ieee80211_scanparams *sp)
2556 {
2557         ieee80211_parse_meshid(ni, sp->meshid);
2558 }
2559
2560 void
2561 ieee80211_mesh_update_beacon(struct ieee80211vap *vap,
2562         struct ieee80211_beacon_offsets *bo)
2563 {
2564         KASSERT(vap->iv_opmode == IEEE80211_M_MBSS, ("not a MBSS vap"));
2565
2566         if (isset(bo->bo_flags, IEEE80211_BEACON_MESHCONF)) {
2567                 (void)ieee80211_add_meshconf(bo->bo_meshconf, vap);
2568                 clrbit(bo->bo_flags, IEEE80211_BEACON_MESHCONF);
2569         }
2570 }
2571
2572 static int
2573 mesh_ioctl_get80211(struct ieee80211vap *vap, struct ieee80211req *ireq)
2574 {
2575         struct ieee80211_mesh_state *ms = vap->iv_mesh;
2576         uint8_t tmpmeshid[IEEE80211_NWID_LEN];
2577         struct ieee80211_mesh_route *rt;
2578         struct ieee80211req_mesh_route *imr;
2579         size_t len, off;
2580         uint8_t *p;
2581         int error;
2582
2583         if (vap->iv_opmode != IEEE80211_M_MBSS)
2584                 return ENOSYS;
2585
2586         error = 0;
2587         switch (ireq->i_type) {
2588         case IEEE80211_IOC_MESH_ID:
2589                 ireq->i_len = ms->ms_idlen;
2590                 memcpy(tmpmeshid, ms->ms_id, ireq->i_len);
2591                 error = copyout(tmpmeshid, ireq->i_data, ireq->i_len);
2592                 break;
2593         case IEEE80211_IOC_MESH_AP:
2594                 ireq->i_val = (ms->ms_flags & IEEE80211_MESHFLAGS_AP) != 0;
2595                 break;
2596         case IEEE80211_IOC_MESH_FWRD:
2597                 ireq->i_val = (ms->ms_flags & IEEE80211_MESHFLAGS_FWD) != 0;
2598                 break;
2599         case IEEE80211_IOC_MESH_TTL:
2600                 ireq->i_val = ms->ms_ttl;
2601                 break;
2602         case IEEE80211_IOC_MESH_RTCMD:
2603                 switch (ireq->i_val) {
2604                 case IEEE80211_MESH_RTCMD_LIST:
2605                         len = 0;
2606                         MESH_RT_LOCK(ms);
2607                         TAILQ_FOREACH(rt, &ms->ms_routes, rt_next) {
2608                                 len += sizeof(*imr);
2609                         }
2610                         MESH_RT_UNLOCK(ms);
2611                         if (len > ireq->i_len || ireq->i_len < sizeof(*imr)) {
2612                                 ireq->i_len = len;
2613                                 return ENOMEM;
2614                         }
2615                         ireq->i_len = len;
2616                         /* XXX M_WAIT? */
2617                         p = kmalloc(len, M_TEMP, M_INTWAIT | M_ZERO);
2618                         if (p == NULL)
2619                                 return ENOMEM;
2620                         off = 0;
2621                         MESH_RT_LOCK(ms);
2622                         TAILQ_FOREACH(rt, &ms->ms_routes, rt_next) {
2623                                 if (off >= len)
2624                                         break;
2625                                 imr = (struct ieee80211req_mesh_route *)
2626                                     (p + off);
2627                                 imr->imr_flags = rt->rt_flags;
2628                                 IEEE80211_ADDR_COPY(imr->imr_dest,
2629                                     rt->rt_dest);
2630                                 IEEE80211_ADDR_COPY(imr->imr_nexthop,
2631                                     rt->rt_nexthop);
2632                                 imr->imr_metric = rt->rt_metric;
2633                                 imr->imr_nhops = rt->rt_nhops;
2634                                 imr->imr_lifetime = rt->rt_lifetime;
2635                                 imr->imr_lastmseq = rt->rt_lastmseq;
2636                                 off += sizeof(*imr);
2637                         }
2638                         MESH_RT_UNLOCK(ms);
2639                         error = copyout(p, (uint8_t *)ireq->i_data,
2640                             ireq->i_len);
2641                         kfree(p, M_TEMP);
2642                         break;
2643                 case IEEE80211_MESH_RTCMD_FLUSH:
2644                 case IEEE80211_MESH_RTCMD_ADD:
2645                 case IEEE80211_MESH_RTCMD_DELETE:
2646                         return EINVAL;
2647                 default:
2648                         return ENOSYS;
2649                 }
2650                 break;
2651         case IEEE80211_IOC_MESH_PR_METRIC:
2652                 len = strlen(ms->ms_pmetric->mpm_descr);
2653                 if (ireq->i_len < len)
2654                         return EINVAL;
2655                 ireq->i_len = len;
2656                 error = copyout(ms->ms_pmetric->mpm_descr,
2657                     (uint8_t *)ireq->i_data, len);
2658                 break;
2659         case IEEE80211_IOC_MESH_PR_PATH:
2660                 len = strlen(ms->ms_ppath->mpp_descr);
2661                 if (ireq->i_len < len)
2662                         return EINVAL;
2663                 ireq->i_len = len;
2664                 error = copyout(ms->ms_ppath->mpp_descr,
2665                     (uint8_t *)ireq->i_data, len);
2666                 break;
2667         default:
2668                 return ENOSYS;
2669         }
2670
2671         return error;
2672 }
2673 IEEE80211_IOCTL_GET(mesh, mesh_ioctl_get80211);
2674
2675 static int
2676 mesh_ioctl_set80211(struct ieee80211vap *vap, struct ieee80211req *ireq)
2677 {
2678         struct ieee80211_mesh_state *ms = vap->iv_mesh;
2679         uint8_t tmpmeshid[IEEE80211_NWID_LEN];
2680         uint8_t tmpaddr[IEEE80211_ADDR_LEN];
2681         char tmpproto[IEEE80211_MESH_PROTO_DSZ];
2682         int error;
2683
2684         if (vap->iv_opmode != IEEE80211_M_MBSS)
2685                 return ENOSYS;
2686
2687         error = 0;
2688         switch (ireq->i_type) {
2689         case IEEE80211_IOC_MESH_ID:
2690                 if (ireq->i_val != 0 || ireq->i_len > IEEE80211_MESHID_LEN)
2691                         return EINVAL;
2692                 error = copyin(ireq->i_data, tmpmeshid, ireq->i_len);
2693                 if (error != 0)
2694                         break;
2695                 memset(ms->ms_id, 0, IEEE80211_NWID_LEN);
2696                 ms->ms_idlen = ireq->i_len;
2697                 memcpy(ms->ms_id, tmpmeshid, ireq->i_len);
2698                 error = ENETRESET;
2699                 break;
2700         case IEEE80211_IOC_MESH_AP:
2701                 if (ireq->i_val)
2702                         ms->ms_flags |= IEEE80211_MESHFLAGS_AP;
2703                 else
2704                         ms->ms_flags &= ~IEEE80211_MESHFLAGS_AP;
2705                 error = ENETRESET;
2706                 break;
2707         case IEEE80211_IOC_MESH_FWRD:
2708                 if (ireq->i_val)
2709                         ms->ms_flags |= IEEE80211_MESHFLAGS_FWD;
2710                 else
2711                         ms->ms_flags &= ~IEEE80211_MESHFLAGS_FWD;
2712                 break;
2713         case IEEE80211_IOC_MESH_TTL:
2714                 ms->ms_ttl = (uint8_t) ireq->i_val;
2715                 break;
2716         case IEEE80211_IOC_MESH_RTCMD:
2717                 switch (ireq->i_val) {
2718                 case IEEE80211_MESH_RTCMD_LIST:
2719                         return EINVAL;
2720                 case IEEE80211_MESH_RTCMD_FLUSH:
2721                         ieee80211_mesh_rt_flush(vap);
2722                         break;
2723                 case IEEE80211_MESH_RTCMD_ADD:
2724                         if (IEEE80211_ADDR_EQ(vap->iv_myaddr, ireq->i_data) ||
2725                             IEEE80211_ADDR_EQ(broadcastaddr, ireq->i_data))
2726                                 return EINVAL;
2727                         error = copyin(ireq->i_data, &tmpaddr,
2728                             IEEE80211_ADDR_LEN);
2729                         if (error == 0)
2730                                 ieee80211_mesh_discover(vap, tmpaddr, NULL);
2731                         break;
2732                 case IEEE80211_MESH_RTCMD_DELETE:
2733                         ieee80211_mesh_rt_del(vap, ireq->i_data);
2734                         break;
2735                 default:
2736                         return ENOSYS;
2737                 }
2738                 break;
2739         case IEEE80211_IOC_MESH_PR_METRIC:
2740                 error = copyin(ireq->i_data, tmpproto, sizeof(tmpproto));
2741                 if (error == 0) {
2742                         error = mesh_select_proto_metric(vap, tmpproto);
2743                         if (error == 0)
2744                                 error = ENETRESET;
2745                 }
2746                 break;
2747         case IEEE80211_IOC_MESH_PR_PATH:
2748                 error = copyin(ireq->i_data, tmpproto, sizeof(tmpproto));
2749                 if (error == 0) {
2750                         error = mesh_select_proto_path(vap, tmpproto);
2751                         if (error == 0)
2752                                 error = ENETRESET;
2753                 }
2754                 break;
2755         default:
2756                 return ENOSYS;
2757         }
2758         return error;
2759 }
2760 IEEE80211_IOCTL_SET(mesh, mesh_ioctl_set80211);