sys/net80211/ieee80211_hwmp.c

   1 /*-
   2  * Copyright (c) 2009 The FreeBSD Foundation
   3  * All rights reserved.
   4  *
   5  * This software was developed by Rui Paulo under sponsorship from the
   6  * FreeBSD Foundation.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  27  * SUCH DAMAGE.
  28  */
  29 #include <sys/cdefs.h>
  30 #ifdef __FreeBSD__
  31 __FBSDID("$FreeBSD$");
  32 #endif
  33
  34 /*
  35  * IEEE 802.11s Hybrid Wireless Mesh Protocol, HWMP.
  36  *
  37  * Based on March 2009, D3.0 802.11s draft spec.
  38  */
  39 #include "opt_inet.h"
  40 #include "opt_wlan.h"
  41
  42 #include <sys/param.h>
  43 #include <sys/systm.h>
  44 #include <sys/mbuf.h>
  45 #include <sys/malloc.h>
  46 #include <sys/kernel.h>
  47
  48 #include <sys/socket.h>
  49 #include <sys/sockio.h>
  50 #include <sys/endian.h>
  51 #include <sys/errno.h>
  52 #include <sys/proc.h>
  53 #include <sys/sysctl.h>
  54
  55 #include <net/if.h>
  56 #include <net/if_media.h>
  57 #include <net/if_llc.h>
  58 #include <net/ethernet.h>
  59
  60 #include <net/bpf.h>
  61
  62 #include <net80211/ieee80211_var.h>
  63 #include <net80211/ieee80211_action.h>
  64 #include <net80211/ieee80211_input.h>
  65 #include <net80211/ieee80211_mesh.h>
  66
  67 static void     hwmp_vattach(struct ieee80211vap *);
  68 static void     hwmp_vdetach(struct ieee80211vap *);
  69 static int      hwmp_newstate(struct ieee80211vap *,
  70                     enum ieee80211_state, int);
  71 static int      hwmp_send_action(struct ieee80211_node *,
  72                     const uint8_t [IEEE80211_ADDR_LEN],
  73                     const uint8_t [IEEE80211_ADDR_LEN],
  74                     uint8_t *, size_t);
  75 static uint8_t * hwmp_add_meshpreq(uint8_t *,
  76                     const struct ieee80211_meshpreq_ie *);
  77 static uint8_t * hwmp_add_meshprep(uint8_t *,
  78                     const struct ieee80211_meshprep_ie *);
  79 static uint8_t * hwmp_add_meshperr(uint8_t *,
  80                     const struct ieee80211_meshperr_ie *);
  81 static uint8_t * hwmp_add_meshrann(uint8_t *,
  82                     const struct ieee80211_meshrann_ie *);
  83 static void     hwmp_rootmode_setup(struct ieee80211vap *);
  84 static void     hwmp_rootmode_cb(void *);
  85 static void     hwmp_rootmode_rann_cb(void *);
  86 static void     hwmp_recv_preq(struct ieee80211vap *, struct ieee80211_node *,
  87                     const struct ieee80211_frame *,
  88                     const struct ieee80211_meshpreq_ie *);
  89 static int      hwmp_send_preq(struct ieee80211_node *,
  90                     const uint8_t [IEEE80211_ADDR_LEN],
  91                     const uint8_t [IEEE80211_ADDR_LEN],
  92                     struct ieee80211_meshpreq_ie *,
  93                     struct timeval *, struct timeval *);
  94 static void     hwmp_recv_prep(struct ieee80211vap *, struct ieee80211_node *,
  95                     const struct ieee80211_frame *,
  96                     const struct ieee80211_meshprep_ie *);
  97 static int      hwmp_send_prep(struct ieee80211_node *,
  98                     const uint8_t [IEEE80211_ADDR_LEN],
  99                     const uint8_t [IEEE80211_ADDR_LEN],
 100                     struct ieee80211_meshprep_ie *);
 101 static void     hwmp_recv_perr(struct ieee80211vap *, struct ieee80211_node *,
 102                     const struct ieee80211_frame *,
 103                     const struct ieee80211_meshperr_ie *);
 104 static int      hwmp_send_perr(struct ieee80211_node *,
 105                     const uint8_t [IEEE80211_ADDR_LEN],
 106                     const uint8_t [IEEE80211_ADDR_LEN],
 107                     struct ieee80211_meshperr_ie *);
 108 static void     hwmp_senderror(struct ieee80211vap *,
 109                     const uint8_t [IEEE80211_ADDR_LEN],
 110                     struct ieee80211_mesh_route *, int);
 111 static void     hwmp_recv_rann(struct ieee80211vap *, struct ieee80211_node *,
 112                    const struct ieee80211_frame *,
 113                    const struct ieee80211_meshrann_ie *);
 114 static int      hwmp_send_rann(struct ieee80211_node *,
 115                     const uint8_t [IEEE80211_ADDR_LEN],
 116                     const uint8_t [IEEE80211_ADDR_LEN],
 117                     struct ieee80211_meshrann_ie *);
 118 static struct ieee80211_node *
 119                 hwmp_discover(struct ieee80211vap *,
 120                     const uint8_t [IEEE80211_ADDR_LEN], struct mbuf *);
 121 static void     hwmp_peerdown(struct ieee80211_node *);
 122
 123 static struct timeval ieee80211_hwmp_preqminint = { 0, 100000 };
 124 static struct timeval ieee80211_hwmp_perrminint = { 0, 100000 };
 125
 126 /* unalligned little endian access */
 127 #define LE_WRITE_2(p, v) do {                           \
 128         ((uint8_t *)(p))[0] = (v) & 0xff;               \
 129         ((uint8_t *)(p))[1] = ((v) >> 8) & 0xff;        \
 130 } while (0)
 131 #define LE_WRITE_4(p, v) do {                           \
 132         ((uint8_t *)(p))[0] = (v) & 0xff;               \
 133         ((uint8_t *)(p))[1] = ((v) >> 8) & 0xff;        \
 134         ((uint8_t *)(p))[2] = ((v) >> 16) & 0xff;       \
 135         ((uint8_t *)(p))[3] = ((v) >> 24) & 0xff;       \
 136 } while (0)
 137
 138
 139 /* NB: the Target Address set in a Proactive PREQ is the broadcast address. */
 140 static const uint8_t    broadcastaddr[IEEE80211_ADDR_LEN] =
 141         { 0xff, 0xff, 0xff, 0xff, 0xff, 0xff };
 142
 143 typedef uint32_t ieee80211_hwmp_seq;
 144 #define HWMP_SEQ_LT(a, b)       ((int32_t)((a)-(b)) < 0)
 145 #define HWMP_SEQ_LEQ(a, b)      ((int32_t)((a)-(b)) <= 0)
 146 #define HWMP_SEQ_EQ(a, b)       ((int32_t)((a)-(b)) == 0)
 147 #define HWMP_SEQ_GT(a, b)       ((int32_t)((a)-(b)) > 0)
 148 #define HWMP_SEQ_GEQ(a, b)      ((int32_t)((a)-(b)) >= 0)
 149
 150 #define HWMP_SEQ_MAX(a, b)      (a > b ? a : b)
 151
 152 /*
 153  * Private extension of ieee80211_mesh_route.
 154  */
 155 struct ieee80211_hwmp_route {
 156         ieee80211_hwmp_seq      hr_seq;         /* last HWMP seq seen from dst*/
 157         ieee80211_hwmp_seq      hr_preqid;      /* last PREQ ID seen from dst */
 158         ieee80211_hwmp_seq      hr_origseq;     /* seq. no. on our latest PREQ*/
 159         struct timeval          hr_lastpreq;    /* last time we sent a PREQ */
 160         struct timeval          hr_lastrootconf; /* last sent PREQ root conf */
 161         int                     hr_preqretries; /* number of discoveries */
 162         int                     hr_lastdiscovery; /* last discovery in ticks */
 163 };
 164 struct ieee80211_hwmp_state {
 165         ieee80211_hwmp_seq      hs_seq;         /* next seq to be used */
 166         ieee80211_hwmp_seq      hs_preqid;      /* next PREQ ID to be used */
 167         int                     hs_rootmode;    /* proactive HWMP */
 168         struct timeval          hs_lastperr;    /* last time we sent a PERR */
 169         struct callout          hs_roottimer;
 170         uint8_t                 hs_maxhops;     /* max hop count */
 171 };
 172
 173 static SYSCTL_NODE(_net_wlan, OID_AUTO, hwmp, CTLFLAG_RD, 0,
 174     "IEEE 802.11s HWMP parameters");
 175 static int      ieee80211_hwmp_targetonly = 0;
 176 SYSCTL_INT(_net_wlan_hwmp, OID_AUTO, targetonly, CTLTYPE_INT | CTLFLAG_RW,
 177     &ieee80211_hwmp_targetonly, 0, "Set TO bit on generated PREQs");
 178 static int      ieee80211_hwmp_pathtimeout = -1;
 179 SYSCTL_PROC(_net_wlan_hwmp, OID_AUTO, pathlifetime, CTLTYPE_INT | CTLFLAG_RW,
 180     &ieee80211_hwmp_pathtimeout, 0, ieee80211_sysctl_msecs_ticks, "I",
 181     "path entry lifetime (ms)");
 182 static int      ieee80211_hwmp_maxpreq_retries = -1;
 183 SYSCTL_PROC(_net_wlan_hwmp, OID_AUTO, maxpreq_retries, CTLTYPE_INT | CTLFLAG_RW,
 184     &ieee80211_hwmp_maxpreq_retries, 0, ieee80211_sysctl_msecs_ticks, "I",
 185     "maximum number of preq retries");
 186 static int      ieee80211_hwmp_net_diameter_traversaltime = -1;
 187 SYSCTL_PROC(_net_wlan_hwmp, OID_AUTO, net_diameter_traversal_time,
 188     CTLTYPE_INT | CTLFLAG_RW, &ieee80211_hwmp_net_diameter_traversaltime, 0,
 189     ieee80211_sysctl_msecs_ticks, "I",
 190     "estimate travelse time across the MBSS (ms)");
 191 static int      ieee80211_hwmp_roottimeout = -1;
 192 SYSCTL_PROC(_net_wlan_hwmp, OID_AUTO, roottimeout, CTLTYPE_INT | CTLFLAG_RW,
 193     &ieee80211_hwmp_roottimeout, 0, ieee80211_sysctl_msecs_ticks, "I",
 194     "root PREQ timeout (ms)");
 195 static int      ieee80211_hwmp_rootint = -1;
 196 SYSCTL_PROC(_net_wlan_hwmp, OID_AUTO, rootint, CTLTYPE_INT | CTLFLAG_RW,
 197     &ieee80211_hwmp_rootint, 0, ieee80211_sysctl_msecs_ticks, "I",
 198     "root interval (ms)");
 199 static int      ieee80211_hwmp_rannint = -1;
 200 SYSCTL_PROC(_net_wlan_hwmp, OID_AUTO, rannint, CTLTYPE_INT | CTLFLAG_RW,
 201     &ieee80211_hwmp_rannint, 0, ieee80211_sysctl_msecs_ticks, "I",
 202     "root announcement interval (ms)");
 203 static struct timeval ieee80211_hwmp_rootconfint = { 0, 0 };
 204 static int      ieee80211_hwmp_rootconfint_internal = -1;
 205 SYSCTL_PROC(_net_wlan_hwmp, OID_AUTO, rootconfint, CTLTYPE_INT | CTLFLAG_RD,
 206     &ieee80211_hwmp_rootconfint_internal, 0, ieee80211_sysctl_msecs_ticks, "I",
 207     "root confirmation interval (ms) (read-only)");
 208
 209 #define IEEE80211_HWMP_DEFAULT_MAXHOPS  31
 210
 211 static  ieee80211_recv_action_func hwmp_recv_action_meshpath;
 212
 213 static struct ieee80211_mesh_proto_path mesh_proto_hwmp = {
 214         .mpp_descr      = "HWMP",
 215         .mpp_ie         = IEEE80211_MESHCONF_PATH_HWMP,
 216         .mpp_discover   = hwmp_discover,
 217         .mpp_peerdown   = hwmp_peerdown,
 218         .mpp_senderror  = hwmp_senderror,
 219         .mpp_vattach    = hwmp_vattach,
 220         .mpp_vdetach    = hwmp_vdetach,
 221         .mpp_newstate   = hwmp_newstate,
 222         .mpp_privlen    = sizeof(struct ieee80211_hwmp_route),
 223 };
 224 SYSCTL_PROC(_net_wlan_hwmp, OID_AUTO, inact, CTLTYPE_INT | CTLFLAG_RW,
 225         &mesh_proto_hwmp.mpp_inact, 0, ieee80211_sysctl_msecs_ticks, "I",
 226         "mesh route inactivity timeout (ms)");
 227
 228
 229 static void
 230 ieee80211_hwmp_init(void)
 231 {
 232         /* Default values as per amendment */
 233         ieee80211_hwmp_pathtimeout = msecs_to_ticks(5*1000);
 234         ieee80211_hwmp_roottimeout = msecs_to_ticks(5*1000);
 235         ieee80211_hwmp_rootint = msecs_to_ticks(2*1000);
 236         ieee80211_hwmp_rannint = msecs_to_ticks(1*1000);
 237         ieee80211_hwmp_rootconfint_internal = msecs_to_ticks(2*1000);
 238         ieee80211_hwmp_maxpreq_retries = 3;
 239         /*
 240          * (TU): A measurement of time equal to 1024 μs,
 241          * 500 TU is 512 ms.
 242          */
 243         ieee80211_hwmp_net_diameter_traversaltime = msecs_to_ticks(512);
 244
 245         /*
 246          * NB: I dont know how to make SYSCTL_PROC that calls ms to ticks
 247          * and return a struct timeval...
 248          */
 249         ieee80211_hwmp_rootconfint.tv_usec =
 250             ieee80211_hwmp_rootconfint_internal * 1000;
 251
 252         /*
 253          * Register action frame handler.
 254          */
 255         ieee80211_recv_action_register(IEEE80211_ACTION_CAT_MESH,
 256             IEEE80211_ACTION_MESH_HWMP, hwmp_recv_action_meshpath);
 257
 258         /* NB: default is 5 secs per spec */
 259         mesh_proto_hwmp.mpp_inact = msecs_to_ticks(5*1000);
 260
 261         /*
 262          * Register HWMP.
 263          */
 264         ieee80211_mesh_register_proto_path(&mesh_proto_hwmp);
 265 }
 266 SYSINIT(wlan_hwmp, SI_SUB_DRIVERS, SI_ORDER_SECOND, ieee80211_hwmp_init, NULL);
 267
 268 void
 269 hwmp_vattach(struct ieee80211vap *vap)
 270 {
 271         struct ieee80211_hwmp_state *hs;
 272
 273         KASSERT(vap->iv_opmode == IEEE80211_M_MBSS,
 274             ("not a mesh vap, opmode %d", vap->iv_opmode));
 275
 276         hs = malloc(sizeof(struct ieee80211_hwmp_state), M_80211_VAP,
 277             M_NOWAIT | M_ZERO);
 278         if (hs == NULL) {
 279                 printf("%s: couldn't alloc HWMP state\n", __func__);
 280                 return;
 281         }
 282         hs->hs_maxhops = IEEE80211_HWMP_DEFAULT_MAXHOPS;
 283         callout_init(&hs->hs_roottimer, CALLOUT_MPSAFE);
 284         vap->iv_hwmp = hs;
 285 }
 286
 287 void
 288 hwmp_vdetach(struct ieee80211vap *vap)
 289 {
 290         struct ieee80211_hwmp_state *hs = vap->iv_hwmp;
 291
 292         callout_drain(&hs->hs_roottimer);
 293         free(vap->iv_hwmp, M_80211_VAP);
 294         vap->iv_hwmp = NULL;
 295 }
 296
 297 int
 298 hwmp_newstate(struct ieee80211vap *vap, enum ieee80211_state ostate, int arg)
 299 {
 300         enum ieee80211_state nstate = vap->iv_state;
 301         struct ieee80211_hwmp_state *hs = vap->iv_hwmp;
 302
 303         IEEE80211_DPRINTF(vap, IEEE80211_MSG_STATE, "%s: %s -> %s (%d)\n",
 304             __func__, ieee80211_state_name[ostate],
 305             ieee80211_state_name[nstate], arg);
 306
 307         if (nstate != IEEE80211_S_RUN && ostate == IEEE80211_S_RUN)
 308                 callout_drain(&hs->hs_roottimer);
 309         if (nstate == IEEE80211_S_RUN)
 310                 hwmp_rootmode_setup(vap);
 311         return 0;
 312 }
 313
 314 /*
 315  * Verify the length of an HWMP PREQ and return the number
 316  * of destinations >= 1, if verification fails -1 is returned.
 317  */
 318 static int
 319 verify_mesh_preq_len(struct ieee80211vap *vap,
 320     const struct ieee80211_frame *wh, const uint8_t *iefrm)
 321 {
 322         int alloc_sz = -1;
 323         int ndest = -1;
 324         if (iefrm[2] & IEEE80211_MESHPREQ_FLAGS_AE) {
 325                 /* Originator External Address  present */
 326                 alloc_sz =  IEEE80211_MESHPREQ_BASE_SZ_AE;
 327                 ndest = iefrm[IEEE80211_MESHPREQ_TCNT_OFFSET_AE];
 328         } else {
 329                 /* w/o Originator External Address */
 330                 alloc_sz =  IEEE80211_MESHPREQ_BASE_SZ;
 331                 ndest = iefrm[IEEE80211_MESHPREQ_TCNT_OFFSET];
 332         }
 333         alloc_sz += ndest * IEEE80211_MESHPREQ_TRGT_SZ;
 334
 335         if(iefrm[1] != (alloc_sz)) {
 336                 IEEE80211_DISCARD(vap,
 337                     IEEE80211_MSG_ACTION | IEEE80211_MSG_HWMP,
 338                     wh, NULL, "PREQ (AE=%s) with wrong len",
 339                     iefrm[2] & IEEE80211_MESHPREQ_FLAGS_AE ? "1" : "0");
 340                 return (-1);
 341         }
 342         return ndest;
 343 }
 344
 345 /*
 346  * Verify the length of an HWMP PREP and returns 1 on success,
 347  * otherwise -1.
 348  */
 349 static int
 350 verify_mesh_prep_len(struct ieee80211vap *vap,
 351     const struct ieee80211_frame *wh, const uint8_t *iefrm)
 352 {
 353         int alloc_sz = -1;
 354         if (iefrm[2] & IEEE80211_MESHPREP_FLAGS_AE) {
 355                 if (iefrm[1] == IEEE80211_MESHPREP_BASE_SZ_AE)
 356                         alloc_sz = IEEE80211_MESHPREP_BASE_SZ_AE;
 357         } else if (iefrm[1] == IEEE80211_MESHPREP_BASE_SZ)
 358                 alloc_sz = IEEE80211_MESHPREP_BASE_SZ;
 359         if(alloc_sz < 0) {
 360                 IEEE80211_DISCARD(vap,
 361                     IEEE80211_MSG_ACTION | IEEE80211_MSG_HWMP,
 362                     wh, NULL, "PREP (AE=%s) with wrong len",
 363                     iefrm[2] & IEEE80211_MESHPREP_FLAGS_AE ? "1" : "0");
 364                 return (-1);
 365         }
 366         return (1);
 367 }
 368
 369 /*
 370  * Verify the length of an HWMP PERR and return the number
 371  * of destinations >= 1, if verification fails -1 is returned.
 372  */
 373 static int
 374 verify_mesh_perr_len(struct ieee80211vap *vap,
 375     const struct ieee80211_frame *wh, const uint8_t *iefrm)
 376 {
 377         int alloc_sz = -1;
 378         const uint8_t *iefrm_t = iefrm;
 379         uint8_t ndest = iefrm_t[IEEE80211_MESHPERR_NDEST_OFFSET];
 380         int i;
 381
 382         if(ndest > IEEE80211_MESHPERR_MAXDEST) {
 383                 IEEE80211_DISCARD(vap,
 384                     IEEE80211_MSG_ACTION | IEEE80211_MSG_HWMP,
 385                     wh, NULL, "PERR with wrong number of destionat (>19), %u",
 386                     ndest);
 387                 return (-1);
 388         }
 389
 390         iefrm_t += IEEE80211_MESHPERR_NDEST_OFFSET + 1; /* flag is next field */
 391         /* We need to check each destionation flag to know size */
 392         for(i = 0; i<ndest; i++) {
 393                 if ((*iefrm_t) & IEEE80211_MESHPERR_FLAGS_AE)
 394                         iefrm_t += IEEE80211_MESHPERR_DEST_SZ_AE;
 395                 else
 396                         iefrm_t += IEEE80211_MESHPERR_DEST_SZ;
 397         }
 398
 399         alloc_sz = (iefrm_t - iefrm) - 2; /* action + code */
 400         if(alloc_sz !=  iefrm[1]) {
 401                 IEEE80211_DISCARD(vap,
 402                     IEEE80211_MSG_ACTION | IEEE80211_MSG_HWMP,
 403                     wh, NULL, "%s", "PERR with wrong len");
 404                 return (-1);
 405         }
 406         return ndest;
 407 }
 408
 409 static int
 410 hwmp_recv_action_meshpath(struct ieee80211_node *ni,
 411         const struct ieee80211_frame *wh,
 412         const uint8_t *frm, const uint8_t *efrm)
 413 {
 414         struct ieee80211vap *vap = ni->ni_vap;
 415         struct ieee80211_meshpreq_ie *preq;
 416         struct ieee80211_meshprep_ie *prep;
 417         struct ieee80211_meshperr_ie *perr;
 418         struct ieee80211_meshrann_ie rann;
 419         const uint8_t *iefrm = frm + 2; /* action + code */
 420         const uint8_t *iefrm_t = iefrm; /* temporary pointer */
 421         int ndest = -1;
 422         int found = 0;
 423
 424         while (efrm - iefrm > 1) {
 425                 IEEE80211_VERIFY_LENGTH(efrm - iefrm, iefrm[1] + 2, return 0);
 426                 switch (*iefrm) {
 427                 case IEEE80211_ELEMID_MESHPREQ:
 428                 {
 429                         int i = 0;
 430
 431                         iefrm_t = iefrm;
 432                         ndest = verify_mesh_preq_len(vap, wh, iefrm_t);
 433                         if (ndest < 0) {
 434                                 vap->iv_stats.is_rx_mgtdiscard++;
 435                                 break;
 436                         }
 437                         preq = malloc(sizeof(*preq) +
 438                             (ndest - 1) * sizeof(*preq->preq_targets),
 439                             M_80211_MESH_PREQ, M_NOWAIT | M_ZERO);
 440                         KASSERT(preq != NULL, ("preq == NULL"));
 441
 442                         preq->preq_ie = *iefrm_t++;
 443                         preq->preq_len = *iefrm_t++;
 444                         preq->preq_flags = *iefrm_t++;
 445                         preq->preq_hopcount = *iefrm_t++;
 446                         preq->preq_ttl = *iefrm_t++;
 447                         preq->preq_id = LE_READ_4(iefrm_t); iefrm_t += 4;
 448                         IEEE80211_ADDR_COPY(preq->preq_origaddr, iefrm_t);
 449                         iefrm_t += 6;
 450                         preq->preq_origseq = LE_READ_4(iefrm_t); iefrm_t += 4;
 451                         /* NB: may have Originator Proxied Address */
 452                         if (preq->preq_flags & IEEE80211_MESHPREQ_FLAGS_AE)  {
 453                                 IEEE80211_ADDR_COPY(
 454                                     preq->preq_orig_ext_addr, iefrm_t);
 455                                 iefrm_t += 6;
 456                         }
 457                         preq->preq_lifetime = LE_READ_4(iefrm_t); iefrm_t += 4;
 458                         preq->preq_metric = LE_READ_4(iefrm_t); iefrm_t += 4;
 459                         preq->preq_tcount = *iefrm_t++;
 460
 461                         for (i = 0; i < preq->preq_tcount; i++) {
 462                                 preq->preq_targets[i].target_flags = *iefrm_t++;
 463                                 IEEE80211_ADDR_COPY(
 464                                     preq->preq_targets[i].target_addr, iefrm_t);
 465                                 iefrm_t += 6;
 466                                 preq->preq_targets[i].target_seq =
 467                                     LE_READ_4(iefrm_t);
 468                                 iefrm_t += 4;
 469                         }
 470
 471                         hwmp_recv_preq(vap, ni, wh, preq);
 472                         free(preq, M_80211_MESH_PREQ);
 473                         found++;
 474                         break;
 475                 }
 476                 case IEEE80211_ELEMID_MESHPREP:
 477                 {
 478                         iefrm_t = iefrm;
 479                         ndest = verify_mesh_prep_len(vap, wh, iefrm_t);
 480                         if (ndest < 0) {
 481                                 vap->iv_stats.is_rx_mgtdiscard++;
 482                                 break;
 483                         }
 484                         prep = malloc(sizeof(*prep),
 485                             M_80211_MESH_PREP, M_NOWAIT | M_ZERO);
 486                         KASSERT(prep != NULL, ("prep == NULL"));
 487
 488                         prep->prep_ie = *iefrm_t++;
 489                         prep->prep_len = *iefrm_t++;
 490                         prep->prep_flags = *iefrm_t++;
 491                         prep->prep_hopcount = *iefrm_t++;
 492                         prep->prep_ttl = *iefrm_t++;
 493                         IEEE80211_ADDR_COPY(prep->prep_targetaddr, iefrm_t);
 494                         iefrm_t += 6;
 495                         prep->prep_targetseq = LE_READ_4(iefrm_t); iefrm_t += 4;
 496                         /* NB: May have Target Proxied Address */
 497                         if (prep->prep_flags & IEEE80211_MESHPREP_FLAGS_AE)  {
 498                                 IEEE80211_ADDR_COPY(
 499                                     prep->prep_target_ext_addr, iefrm_t);
 500                                 iefrm_t += 6;
 501                         }
 502                         prep->prep_lifetime = LE_READ_4(iefrm_t); iefrm_t += 4;
 503                         prep->prep_metric = LE_READ_4(iefrm_t); iefrm_t += 4;
 504                         IEEE80211_ADDR_COPY(prep->prep_origaddr, iefrm_t);
 505                         iefrm_t += 6;
 506                         prep->prep_origseq = LE_READ_4(iefrm_t); iefrm_t += 4;
 507
 508                         hwmp_recv_prep(vap, ni, wh, prep);
 509                         free(prep, M_80211_MESH_PREP);
 510                         found++;
 511                         break;
 512                 }
 513                 case IEEE80211_ELEMID_MESHPERR:
 514                 {
 515                         int i = 0;
 516
 517                         iefrm_t = iefrm;
 518                         ndest = verify_mesh_perr_len(vap, wh, iefrm_t);
 519                         if (ndest < 0) {
 520                                 vap->iv_stats.is_rx_mgtdiscard++;
 521                                 break;
 522                         }
 523                         perr = malloc(sizeof(*perr) +
 524                             (ndest - 1) * sizeof(*perr->perr_dests),
 525                             M_80211_MESH_PERR, M_NOWAIT | M_ZERO);
 526                         KASSERT(perr != NULL, ("perr == NULL"));
 527
 528                         perr->perr_ie = *iefrm_t++;
 529                         perr->perr_len = *iefrm_t++;
 530                         perr->perr_ttl = *iefrm_t++;
 531                         perr->perr_ndests = *iefrm_t++;
 532
 533                         for (i = 0; i<perr->perr_ndests; i++) {
 534                                 perr->perr_dests[i].dest_flags = *iefrm_t++;
 535                                 IEEE80211_ADDR_COPY(
 536                                     perr->perr_dests[i].dest_addr, iefrm_t);
 537                                 iefrm_t += 6;
 538                                 perr->perr_dests[i].dest_seq = LE_READ_4(iefrm_t);
 539                                 iefrm_t += 4;
 540                                 /* NB: May have Target Proxied Address */
 541                                 if (perr->perr_dests[i].dest_flags &
 542                                     IEEE80211_MESHPERR_FLAGS_AE) {
 543                                         IEEE80211_ADDR_COPY(
 544                                             perr->perr_dests[i].dest_ext_addr,
 545                                             iefrm_t);
 546                                         iefrm_t += 6;
 547                                 }
 548                                 perr->perr_dests[i].dest_rcode =
 549                                     LE_READ_2(iefrm_t);
 550                                 iefrm_t += 2;
 551                         }
 552
 553                         hwmp_recv_perr(vap, ni, wh, perr);
 554                         free(perr, M_80211_MESH_PERR);
 555                         found++;
 556                         break;
 557                 }
 558                 case IEEE80211_ELEMID_MESHRANN:
 559                 {
 560                         const struct ieee80211_meshrann_ie *mrann =
 561                             (const struct ieee80211_meshrann_ie *) iefrm;
 562                         if (mrann->rann_len !=
 563                             sizeof(struct ieee80211_meshrann_ie) - 2) {
 564                                 IEEE80211_DISCARD(vap,
 565                                     IEEE80211_MSG_ACTION | IEEE80211_MSG_HWMP,
 566                                     wh, NULL, "%s", "RAN with wrong len");
 567                                     vap->iv_stats.is_rx_mgtdiscard++;
 568                                 return 1;
 569                         }
 570                         memcpy(&rann, mrann, sizeof(rann));
 571                         rann.rann_seq = LE_READ_4(&mrann->rann_seq);
 572                         rann.rann_interval = LE_READ_4(&mrann->rann_interval);
 573                         rann.rann_metric = LE_READ_4(&mrann->rann_metric);
 574                         hwmp_recv_rann(vap, ni, wh, &rann);
 575                         found++;
 576                         break;
 577                 }
 578                 }
 579                 iefrm += iefrm[1] + 2;
 580         }
 581         if (!found) {
 582                 IEEE80211_DISCARD(vap,
 583                     IEEE80211_MSG_ACTION | IEEE80211_MSG_HWMP,
 584                     wh, NULL, "%s", "PATH SEL action without IE");
 585                 vap->iv_stats.is_rx_mgtdiscard++;
 586         }
 587         return 0;
 588 }
 589
 590 static int
 591 hwmp_send_action(struct ieee80211_node *ni,
 592     const uint8_t sa[IEEE80211_ADDR_LEN],
 593     const uint8_t da[IEEE80211_ADDR_LEN],
 594     uint8_t *ie, size_t len)
 595 {
 596         struct ieee80211vap *vap = ni->ni_vap;
 597         struct ieee80211com *ic = ni->ni_ic;
 598         struct ieee80211_bpf_params params;
 599         struct mbuf *m;
 600         uint8_t *frm;
 601
 602         if (vap->iv_state == IEEE80211_S_CAC) {
 603                 IEEE80211_NOTE(vap, IEEE80211_MSG_OUTPUT, ni,
 604                     "block %s frame in CAC state", "HWMP action");
 605                 vap->iv_stats.is_tx_badstate++;
 606                 return EIO;     /* XXX */
 607         }
 608
 609         KASSERT(ni != NULL, ("null node"));
 610         /*
 611          * Hold a reference on the node so it doesn't go away until after
 612          * the xmit is complete all the way in the driver.  On error we
 613          * will remove our reference.
 614          */
 615 #ifdef IEEE80211_DEBUG_REFCNT
 616         IEEE80211_DPRINTF(vap, IEEE80211_MSG_NODE,
 617             "ieee80211_ref_node (%s:%u) %p<%s> refcnt %d\n",
 618             __func__, __LINE__,
 619             ni, ether_sprintf(ni->ni_macaddr),
 620             ieee80211_node_refcnt(ni)+1);
 621 #endif
 622         ieee80211_ref_node(ni);
 623
 624         m = ieee80211_getmgtframe(&frm,
 625             ic->ic_headroom + sizeof(struct ieee80211_frame),
 626             sizeof(struct ieee80211_action) + len
 627         );
 628         if (m == NULL) {
 629                 ieee80211_free_node(ni);
 630                 vap->iv_stats.is_tx_nobuf++;
 631                 return ENOMEM;
 632         }
 633         *frm++ = IEEE80211_ACTION_CAT_MESH;
 634         *frm++ = IEEE80211_ACTION_MESH_HWMP;
 635         switch (*ie) {
 636         case IEEE80211_ELEMID_MESHPREQ:
 637                 frm = hwmp_add_meshpreq(frm,
 638                     (struct ieee80211_meshpreq_ie *)ie);
 639                 break;
 640         case IEEE80211_ELEMID_MESHPREP:
 641                 frm = hwmp_add_meshprep(frm,
 642                     (struct ieee80211_meshprep_ie *)ie);
 643                 break;
 644         case IEEE80211_ELEMID_MESHPERR:
 645                 frm = hwmp_add_meshperr(frm,
 646                     (struct ieee80211_meshperr_ie *)ie);
 647                 break;
 648         case IEEE80211_ELEMID_MESHRANN:
 649                 frm = hwmp_add_meshrann(frm,
 650                     (struct ieee80211_meshrann_ie *)ie);
 651                 break;
 652         }
 653
 654         m->m_pkthdr.len = m->m_len = frm - mtod(m, uint8_t *);
 655         M_PREPEND(m, sizeof(struct ieee80211_frame), M_DONTWAIT);
 656         if (m == NULL) {
 657                 ieee80211_free_node(ni);
 658                 vap->iv_stats.is_tx_nobuf++;
 659                 return ENOMEM;
 660         }
 661         ieee80211_send_setup(ni, m,
 662             IEEE80211_FC0_TYPE_MGT | IEEE80211_FC0_SUBTYPE_ACTION,
 663             IEEE80211_NONQOS_TID, sa, da, sa);
 664
 665         m->m_flags |= M_ENCAP;          /* mark encapsulated */
 666         IEEE80211_NODE_STAT(ni, tx_mgmt);
 667
 668         memset(&params, 0, sizeof(params));
 669         params.ibp_pri = WME_AC_VO;
 670         params.ibp_rate0 = ni->ni_txparms->mgmtrate;
 671         if (IEEE80211_IS_MULTICAST(da))
 672                 params.ibp_try0 = 1;
 673         else
 674                 params.ibp_try0 = ni->ni_txparms->maxretry;
 675         params.ibp_power = ni->ni_txpower;
 676         return ic->ic_raw_xmit(ni, m, &params);
 677 }
 678
 679 #define ADDSHORT(frm, v) do {           \
 680         frm[0] = (v) & 0xff;            \
 681         frm[1] = (v) >> 8;              \
 682         frm += 2;                       \
 683 } while (0)
 684 #define ADDWORD(frm, v) do {            \
 685         LE_WRITE_4(frm, v);             \
 686         frm += 4;                       \
 687 } while (0)
 688 /*
 689  * Add a Mesh Path Request IE to a frame.
 690  */
 691 #define PREQ_TFLAGS(n)  preq->preq_targets[n].target_flags
 692 #define PREQ_TADDR(n)   preq->preq_targets[n].target_addr
 693 #define PREQ_TSEQ(n)    preq->preq_targets[n].target_seq
 694 static uint8_t *
 695 hwmp_add_meshpreq(uint8_t *frm, const struct ieee80211_meshpreq_ie *preq)
 696 {
 697         int i;
 698
 699         *frm++ = IEEE80211_ELEMID_MESHPREQ;
 700         *frm++ = preq->preq_len;        /* len already calculated */
 701         *frm++ = preq->preq_flags;
 702         *frm++ = preq->preq_hopcount;
 703         *frm++ = preq->preq_ttl;
 704         ADDWORD(frm, preq->preq_id);
 705         IEEE80211_ADDR_COPY(frm, preq->preq_origaddr); frm += 6;
 706         ADDWORD(frm, preq->preq_origseq);
 707         if (preq->preq_flags & IEEE80211_MESHPREQ_FLAGS_AE) {
 708                 IEEE80211_ADDR_COPY(frm, preq->preq_orig_ext_addr);
 709                 frm += 6;
 710         }
 711         ADDWORD(frm, preq->preq_lifetime);
 712         ADDWORD(frm, preq->preq_metric);
 713         *frm++ = preq->preq_tcount;
 714         for (i = 0; i < preq->preq_tcount; i++) {
 715                 *frm++ = PREQ_TFLAGS(i);
 716                 IEEE80211_ADDR_COPY(frm, PREQ_TADDR(i));
 717                 frm += 6;
 718                 ADDWORD(frm, PREQ_TSEQ(i));
 719         }
 720         return frm;
 721 }
 722 #undef  PREQ_TFLAGS
 723 #undef  PREQ_TADDR
 724 #undef  PREQ_TSEQ
 725
 726 /*
 727  * Add a Mesh Path Reply IE to a frame.
 728  */
 729 static uint8_t *
 730 hwmp_add_meshprep(uint8_t *frm, const struct ieee80211_meshprep_ie *prep)
 731 {
 732         *frm++ = IEEE80211_ELEMID_MESHPREP;
 733         *frm++ = prep->prep_len;        /* len already calculated */
 734         *frm++ = prep->prep_flags;
 735         *frm++ = prep->prep_hopcount;
 736         *frm++ = prep->prep_ttl;
 737         IEEE80211_ADDR_COPY(frm, prep->prep_targetaddr); frm += 6;
 738         ADDWORD(frm, prep->prep_targetseq);
 739         if (prep->prep_flags & IEEE80211_MESHPREP_FLAGS_AE) {
 740                 IEEE80211_ADDR_COPY(frm, prep->prep_target_ext_addr);
 741                 frm += 6;
 742         }
 743         ADDWORD(frm, prep->prep_lifetime);
 744         ADDWORD(frm, prep->prep_metric);
 745         IEEE80211_ADDR_COPY(frm, prep->prep_origaddr); frm += 6;
 746         ADDWORD(frm, prep->prep_origseq);
 747         return frm;
 748 }
 749
 750 /*
 751  * Add a Mesh Path Error IE to a frame.
 752  */
 753 #define PERR_DFLAGS(n)  perr->perr_dests[n].dest_flags
 754 #define PERR_DADDR(n)   perr->perr_dests[n].dest_addr
 755 #define PERR_DSEQ(n)    perr->perr_dests[n].dest_seq
 756 #define PERR_EXTADDR(n) perr->perr_dests[n].dest_ext_addr
 757 #define PERR_DRCODE(n)  perr->perr_dests[n].dest_rcode
 758 static uint8_t *
 759 hwmp_add_meshperr(uint8_t *frm, const struct ieee80211_meshperr_ie *perr)
 760 {
 761         int i;
 762
 763         *frm++ = IEEE80211_ELEMID_MESHPERR;
 764         *frm++ = perr->perr_len;        /* len already calculated */
 765         *frm++ = perr->perr_ttl;
 766         *frm++ = perr->perr_ndests;
 767         for (i = 0; i < perr->perr_ndests; i++) {
 768                 *frm++ = PERR_DFLAGS(i);
 769                 IEEE80211_ADDR_COPY(frm, PERR_DADDR(i));
 770                 frm += 6;
 771                 ADDWORD(frm, PERR_DSEQ(i));
 772                 if (PERR_DFLAGS(i) & IEEE80211_MESHPERR_FLAGS_AE) {
 773                         IEEE80211_ADDR_COPY(frm, PERR_EXTADDR(i));
 774                         frm += 6;
 775                 }
 776                 ADDSHORT(frm, PERR_DRCODE(i));
 777         }
 778         return frm;
 779 }
 780 #undef  PERR_DFLAGS
 781 #undef  PERR_DADDR
 782 #undef  PERR_DSEQ
 783 #undef  PERR_EXTADDR
 784 #undef  PERR_DRCODE
 785
 786 /*
 787  * Add a Root Annoucement IE to a frame.
 788  */
 789 static uint8_t *
 790 hwmp_add_meshrann(uint8_t *frm, const struct ieee80211_meshrann_ie *rann)
 791 {
 792         *frm++ = IEEE80211_ELEMID_MESHRANN;
 793         *frm++ = rann->rann_len;
 794         *frm++ = rann->rann_flags;
 795         *frm++ = rann->rann_hopcount;
 796         *frm++ = rann->rann_ttl;
 797         IEEE80211_ADDR_COPY(frm, rann->rann_addr); frm += 6;
 798         ADDWORD(frm, rann->rann_seq);
 799         ADDWORD(frm, rann->rann_interval);
 800         ADDWORD(frm, rann->rann_metric);
 801         return frm;
 802 }
 803
 804 static void
 805 hwmp_rootmode_setup(struct ieee80211vap *vap)
 806 {
 807         struct ieee80211_hwmp_state *hs = vap->iv_hwmp;
 808
 809         switch (hs->hs_rootmode) {
 810         case IEEE80211_HWMP_ROOTMODE_DISABLED:
 811                 callout_drain(&hs->hs_roottimer);
 812                 break;
 813         case IEEE80211_HWMP_ROOTMODE_NORMAL:
 814         case IEEE80211_HWMP_ROOTMODE_PROACTIVE:
 815                 callout_reset(&hs->hs_roottimer, ieee80211_hwmp_rootint,
 816                     hwmp_rootmode_cb, vap);
 817                 break;
 818         case IEEE80211_HWMP_ROOTMODE_RANN:
 819                 callout_reset(&hs->hs_roottimer, ieee80211_hwmp_rannint,
 820                     hwmp_rootmode_rann_cb, vap);
 821                 break;
 822         }
 823 }
 824
 825 /*
 826  * Send a broadcast Path Request to find all nodes on the mesh. We are
 827  * called when the vap is configured as a HWMP root node.
 828  */
 829 #define PREQ_TFLAGS(n)  preq.preq_targets[n].target_flags
 830 #define PREQ_TADDR(n)   preq.preq_targets[n].target_addr
 831 #define PREQ_TSEQ(n)    preq.preq_targets[n].target_seq
 832 static void
 833 hwmp_rootmode_cb(void *arg)
 834 {
 835         struct ieee80211vap *vap = (struct ieee80211vap *)arg;
 836         struct ieee80211_hwmp_state *hs = vap->iv_hwmp;
 837         struct ieee80211_mesh_state *ms = vap->iv_mesh;
 838         struct ieee80211_meshpreq_ie preq;
 839
 840         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, vap->iv_bss,
 841             "%s", "send broadcast PREQ");
 842
 843         preq.preq_flags = IEEE80211_MESHPREQ_FLAGS_AM;
 844         if (ms->ms_flags & IEEE80211_MESHFLAGS_GATE)
 845                 preq.preq_flags |= IEEE80211_MESHPREQ_FLAGS_GATE;
 846         if (hs->hs_rootmode == IEEE80211_HWMP_ROOTMODE_PROACTIVE)
 847                 preq.preq_flags |= IEEE80211_MESHPREQ_FLAGS_PP;
 848         preq.preq_hopcount = 0;
 849         preq.preq_ttl = ms->ms_ttl;
 850         preq.preq_id = ++hs->hs_preqid;
 851         IEEE80211_ADDR_COPY(preq.preq_origaddr, vap->iv_myaddr);
 852         preq.preq_origseq = ++hs->hs_seq;
 853         preq.preq_lifetime = ticks_to_msecs(ieee80211_hwmp_roottimeout);
 854         preq.preq_metric = IEEE80211_MESHLMETRIC_INITIALVAL;
 855         preq.preq_tcount = 1;
 856         IEEE80211_ADDR_COPY(PREQ_TADDR(0), broadcastaddr);
 857         PREQ_TFLAGS(0) = IEEE80211_MESHPREQ_TFLAGS_TO |
 858             IEEE80211_MESHPREQ_TFLAGS_USN;
 859         PREQ_TSEQ(0) = 0;
 860         vap->iv_stats.is_hwmp_rootreqs++;
 861         hwmp_send_preq(vap->iv_bss, vap->iv_myaddr, broadcastaddr, &preq,
 862             NULL, NULL);        /* NB: we enforce rate check ourself */
 863         hwmp_rootmode_setup(vap);
 864 }
 865 #undef  PREQ_TFLAGS
 866 #undef  PREQ_TADDR
 867 #undef  PREQ_TSEQ
 868
 869 /*
 870  * Send a Root Annoucement (RANN) to find all the nodes on the mesh. We are
 871  * called when the vap is configured as a HWMP RANN root node.
 872  */
 873 static void
 874 hwmp_rootmode_rann_cb(void *arg)
 875 {
 876         struct ieee80211vap *vap = (struct ieee80211vap *)arg;
 877         struct ieee80211_hwmp_state *hs = vap->iv_hwmp;
 878         struct ieee80211_mesh_state *ms = vap->iv_mesh;
 879         struct ieee80211_meshrann_ie rann;
 880
 881         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, vap->iv_bss,
 882             "%s", "send broadcast RANN");
 883
 884         rann.rann_flags = 0;
 885         if (ms->ms_flags & IEEE80211_MESHFLAGS_GATE)
 886                 rann.rann_flags |= IEEE80211_MESHFLAGS_GATE;
 887         rann.rann_hopcount = 0;
 888         rann.rann_ttl = ms->ms_ttl;
 889         IEEE80211_ADDR_COPY(rann.rann_addr, vap->iv_myaddr);
 890         rann.rann_seq = ++hs->hs_seq;
 891         rann.rann_interval = ieee80211_hwmp_rannint;
 892         rann.rann_metric = IEEE80211_MESHLMETRIC_INITIALVAL;
 893
 894         vap->iv_stats.is_hwmp_rootrann++;
 895         hwmp_send_rann(vap->iv_bss, vap->iv_myaddr, broadcastaddr, &rann);
 896         hwmp_rootmode_setup(vap);
 897 }
 898
 899 #define PREQ_TFLAGS(n)  preq->preq_targets[n].target_flags
 900 #define PREQ_TADDR(n)   preq->preq_targets[n].target_addr
 901 #define PREQ_TSEQ(n)    preq->preq_targets[n].target_seq
 902 static void
 903 hwmp_recv_preq(struct ieee80211vap *vap, struct ieee80211_node *ni,
 904     const struct ieee80211_frame *wh, const struct ieee80211_meshpreq_ie *preq)
 905 {
 906         struct ieee80211_mesh_state *ms = vap->iv_mesh;
 907         struct ieee80211_mesh_route *rtorig = NULL;
 908         struct ieee80211_mesh_route *rtorig_ext = NULL;
 909         struct ieee80211_mesh_route *rttarg = NULL;
 910         struct ieee80211_hwmp_route *hrorig = NULL;
 911         struct ieee80211_hwmp_route *hrtarg = NULL;
 912         struct ieee80211_hwmp_state *hs = vap->iv_hwmp;
 913         struct ieee80211_meshprep_ie prep;
 914         ieee80211_hwmp_seq preqid;      /* last seen preqid for orig */
 915
 916         if (ni == vap->iv_bss ||
 917             ni->ni_mlstate != IEEE80211_NODE_MESH_ESTABLISHED)
 918                 return;
 919         /*
 920          * Ignore PREQs from us. Could happen because someone forward it
 921          * back to us.
 922          */
 923         if (IEEE80211_ADDR_EQ(vap->iv_myaddr, preq->preq_origaddr))
 924                 return;
 925
 926         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
 927             "received PREQ, orig %6D, targ(0) %6D", preq->preq_origaddr, ":",
 928             PREQ_TADDR(0), ":");
 929
 930         /*
 931          * Acceptance criteria: (if the PREQ is not for us or not broadcast,
 932          * or an external mac address not proxied by us),
 933          * AND forwarding is disabled, discard this PREQ.
 934          */
 935         rttarg = ieee80211_mesh_rt_find(vap, PREQ_TADDR(0));
 936         if (!(ms->ms_flags & IEEE80211_MESHFLAGS_FWD) &&
 937             (!IEEE80211_ADDR_EQ(vap->iv_myaddr, PREQ_TADDR(0)) ||
 938             !IEEE80211_IS_MULTICAST(PREQ_TADDR(0)) ||
 939             (rttarg != NULL &&
 940             rttarg->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY &&
 941             IEEE80211_ADDR_EQ(vap->iv_myaddr, rttarg->rt_mesh_gate)))) {
 942                 IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_HWMP,
 943                     preq->preq_origaddr, NULL, "%s", "not accepting PREQ");
 944                 return;
 945         }
 946         /*
 947          * Acceptance criteria: if unicast addressed
 948          * AND no valid forwarding for Target of PREQ, discard this PREQ.
 949          */
 950         if(rttarg != NULL)
 951                 hrtarg = IEEE80211_MESH_ROUTE_PRIV(rttarg,
 952                     struct ieee80211_hwmp_route);
 953         /* Address mode: ucast */
 954         if((preq->preq_flags & IEEE80211_MESHPREQ_FLAGS_AM) == 0 &&
 955             rttarg == NULL &&
 956             !IEEE80211_ADDR_EQ(vap->iv_myaddr, PREQ_TADDR(0))) {
 957                 IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_HWMP,
 958                     preq->preq_origaddr, NULL,
 959                     "unicast addressed PREQ of unknown target %6D",
 960                     PREQ_TADDR(0), ":");
 961                 return;
 962         }
 963
 964         /* PREQ ACCEPTED */
 965
 966         rtorig = ieee80211_mesh_rt_find(vap, preq->preq_origaddr);
 967         if (rtorig == NULL) {
 968                 rtorig = ieee80211_mesh_rt_add(vap, preq->preq_origaddr);
 969                 if (rtorig == NULL) {
 970                         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
 971                             "unable to add orig path to %6D",
 972                             preq->preq_origaddr, ":");
 973                         vap->iv_stats.is_mesh_rtaddfailed++;
 974                         return;
 975                 }
 976                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
 977                     "adding originator %6D", preq->preq_origaddr, ":");
 978         }
 979         hrorig = IEEE80211_MESH_ROUTE_PRIV(rtorig, struct ieee80211_hwmp_route);
 980
 981         /* record last seen preqid */
 982         preqid = hrorig->hr_preqid;
 983         hrorig->hr_preqid = HWMP_SEQ_MAX(hrorig->hr_preqid, preq->preq_id);
 984
 985         /* Data creation and update of forwarding information
 986          * according to Table 11C-8 for originator mesh STA.
 987          */
 988         if (HWMP_SEQ_GT(preq->preq_origseq, hrorig->hr_seq) ||
 989             (HWMP_SEQ_EQ(preq->preq_origseq, hrorig->hr_seq) &&
 990             preq->preq_metric < rtorig->rt_metric)) {
 991                 hrorig->hr_seq = preq->preq_origseq;
 992                 IEEE80211_ADDR_COPY(rtorig->rt_nexthop, wh->i_addr2);
 993                 rtorig->rt_metric = preq->preq_metric +
 994                         ms->ms_pmetric->mpm_metric(ni);
 995                 rtorig->rt_nhops  = preq->preq_hopcount + 1;
 996                 ieee80211_mesh_rt_update(rtorig, preq->preq_lifetime);
 997                 /* path to orig is valid now */
 998                 rtorig->rt_flags |= IEEE80211_MESHRT_FLAGS_VALID;
 999         }else if ((hrtarg != NULL &&
1000             HWMP_SEQ_EQ(hrtarg->hr_seq, PREQ_TSEQ(0)) &&
1001             ((rtorig->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) == 0)) ||
1002             preqid >= preq->preq_id) {
1003                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1004                     "discard PREQ from %6D, old seqno %u <= %u,"
1005                     " or old preqid %u < %u",
1006                     preq->preq_origaddr, ":",
1007                     preq->preq_origseq, hrorig->hr_seq,
1008                     preq->preq_id, preqid);
1009                 return;
1010         }
1011
1012         /*
1013          * Forwarding information for transmitter mesh STA
1014          * [OPTIONAL: if metric improved]
1015          */
1016
1017         /*
1018          * Check if the PREQ is addressed to us.
1019          * or a Proxy currently supplied by us.
1020          */
1021         if (IEEE80211_ADDR_EQ(vap->iv_myaddr, PREQ_TADDR(0)) ||
1022             (rttarg != NULL &&
1023             rttarg->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY &&
1024             rttarg->rt_flags & IEEE80211_MESHRT_FLAGS_VALID)) {
1025                 /*
1026                  * When we are the target we shall update our own HWMP seq
1027                  * number with max of (current and preq->seq) + 1
1028                  */
1029                 hs->hs_seq = HWMP_SEQ_MAX(hs->hs_seq, PREQ_TSEQ(0)) + 1;
1030
1031                 prep.prep_flags = 0;
1032                 if (rttarg != NULL && /* if NULL it means we are the target */
1033                     rttarg->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY) {
1034                         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1035                             "reply for proxy %6D", rttarg->rt_dest, ":");
1036                         prep.prep_flags |= IEEE80211_MESHPREP_FLAGS_AE;
1037                         IEEE80211_ADDR_COPY(prep.prep_target_ext_addr,
1038                             rttarg->rt_dest);
1039                         /* update proxy seqno to HWMP seqno */
1040                         rttarg->rt_ext_seq = hs->hs_seq;
1041                 }
1042                 /*
1043                  * Build and send a PREP frame.
1044                  */
1045                 prep.prep_hopcount = 0;
1046                 prep.prep_ttl = ms->ms_ttl;
1047                 IEEE80211_ADDR_COPY(prep.prep_targetaddr, vap->iv_myaddr);
1048                 prep.prep_targetseq = hs->hs_seq;
1049                 prep.prep_lifetime = preq->preq_lifetime;
1050                 prep.prep_metric = IEEE80211_MESHLMETRIC_INITIALVAL;
1051                 IEEE80211_ADDR_COPY(prep.prep_origaddr, preq->preq_origaddr);
1052                 prep.prep_origseq = preq->preq_origseq;
1053
1054                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1055                     "reply to %6D", preq->preq_origaddr, ":");
1056                 hwmp_send_prep(ni, vap->iv_myaddr, wh->i_addr2, &prep);
1057                 return;
1058         }
1059         /* we may update our proxy information for the orig external */
1060         else if (preq->preq_flags & IEEE80211_MESHPREQ_FLAGS_AE) {
1061                 rtorig_ext =
1062                     ieee80211_mesh_rt_find(vap, preq->preq_orig_ext_addr);
1063                 if (rtorig_ext == NULL) {
1064                         rtorig_ext = ieee80211_mesh_rt_add(vap,
1065                             preq->preq_orig_ext_addr);
1066                         if (rtorig_ext == NULL) {
1067                                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1068                                     "unable to add orig ext proxy to %6D",
1069                                     preq->preq_orig_ext_addr, ":");
1070                                 vap->iv_stats.is_mesh_rtaddfailed++;
1071                                 return;
1072                         }
1073                         IEEE80211_ADDR_COPY(rtorig_ext->rt_mesh_gate,
1074                             preq->preq_origaddr);
1075                 }
1076                 rtorig_ext->rt_ext_seq = preq->preq_origseq;
1077                 ieee80211_mesh_rt_update(rtorig_ext, preq->preq_lifetime);
1078         }
1079         /*
1080          * Proactive PREQ: reply with a proactive PREP to the
1081          * root STA if requested.
1082          */
1083         if (IEEE80211_ADDR_EQ(PREQ_TADDR(0), broadcastaddr) &&
1084             (PREQ_TFLAGS(0) & IEEE80211_MESHPREQ_TFLAGS_TO)) {
1085                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1086                     "root mesh station @ %6D", preq->preq_origaddr, ":");
1087
1088                 /*
1089                  * Reply with a PREP if we don't have a path to the root
1090                  * or if the root sent us a proactive PREQ.
1091                  */
1092                 if ((rtorig->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) == 0 ||
1093                     (preq->preq_flags & IEEE80211_MESHPREQ_FLAGS_PP)) {
1094                         prep.prep_flags = 0;
1095                         prep.prep_hopcount = 0;
1096                         prep.prep_ttl = ms->ms_ttl;
1097                         IEEE80211_ADDR_COPY(prep.prep_origaddr,
1098                             preq->preq_origaddr);
1099                         prep.prep_origseq = preq->preq_origseq;
1100                         prep.prep_lifetime = preq->preq_lifetime;
1101                         prep.prep_metric = IEEE80211_MESHLMETRIC_INITIALVAL;
1102                         IEEE80211_ADDR_COPY(prep.prep_targetaddr,
1103                             vap->iv_myaddr);
1104                         prep.prep_targetseq = ++hs->hs_seq;
1105                         hwmp_send_prep(vap->iv_bss, vap->iv_myaddr,
1106                             rtorig->rt_nexthop, &prep);
1107                 }
1108         }
1109
1110         /*
1111          * Forwarding and Intermediate reply for PREQs with 1 target.
1112          */
1113         if ((preq->preq_tcount == 1) && (preq->preq_ttl > 1) &&
1114             (ms->ms_flags & IEEE80211_MESHFLAGS_FWD)) {
1115                 struct ieee80211_meshpreq_ie ppreq; /* propagated PREQ */
1116
1117                 memcpy(&ppreq, preq, sizeof(ppreq));
1118
1119                 /*
1120                  * We have a valid route to this node.
1121                  */
1122                 if (rttarg != NULL &&
1123                     (rttarg->rt_flags & IEEE80211_MESHRT_FLAGS_VALID)) {
1124                         /*
1125                          * Check if we can send an intermediate Path Reply,
1126                          * i.e., Target Only bit is not set and target is not
1127                          * the MAC broadcast address.
1128                          */
1129                         if (!(PREQ_TFLAGS(0) & IEEE80211_MESHPREQ_TFLAGS_TO) &&
1130                             !IEEE80211_ADDR_EQ(PREQ_TADDR(0), broadcastaddr)) {
1131                                 struct ieee80211_meshprep_ie prep;
1132
1133                                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1134                                     "intermediate reply for PREQ from %6D",
1135                                     preq->preq_origaddr, ":");
1136                                 prep.prep_flags = 0;
1137                                 prep.prep_hopcount = rttarg->rt_nhops;
1138                                 prep.prep_ttl = ms->ms_ttl;
1139                                 IEEE80211_ADDR_COPY(&prep.prep_targetaddr,
1140                                     PREQ_TADDR(0));
1141                                 prep.prep_targetseq = hrtarg->hr_seq;
1142                                 prep.prep_lifetime = preq->preq_lifetime;
1143                                 prep.prep_metric =rttarg->rt_metric;
1144                                 IEEE80211_ADDR_COPY(&prep.prep_origaddr,
1145                                     preq->preq_origaddr);
1146                                 prep.prep_origseq = hrorig->hr_seq;
1147                                 hwmp_send_prep(ni, vap->iv_myaddr,
1148                                     rtorig->rt_nexthop, &prep);
1149
1150                                 /*
1151                                  * Set TO and unset RF bits because we have
1152                                  * sent a PREP.
1153                                  */
1154                                 ppreq.preq_targets[0].target_flags |=
1155                                     IEEE80211_MESHPREQ_TFLAGS_TO;
1156                         }
1157                 }
1158
1159                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1160                     "forward PREQ from %6D",
1161                     preq->preq_origaddr, ":");
1162                 ppreq.preq_hopcount += 1;
1163                 ppreq.preq_ttl -= 1;
1164                 ppreq.preq_metric += ms->ms_pmetric->mpm_metric(ni);
1165
1166                 /* don't do PREQ ratecheck when we propagate */
1167                 hwmp_send_preq(ni, vap->iv_myaddr, broadcastaddr,
1168                         &ppreq, NULL, NULL);
1169         }
1170 }
1171 #undef  PREQ_TFLAGS
1172 #undef  PREQ_TADDR
1173 #undef  PREQ_TSEQ
1174
1175 static int
1176 hwmp_send_preq(struct ieee80211_node *ni,
1177     const uint8_t sa[IEEE80211_ADDR_LEN],
1178     const uint8_t da[IEEE80211_ADDR_LEN],
1179     struct ieee80211_meshpreq_ie *preq,
1180     struct timeval *last, struct timeval *minint)
1181 {
1182
1183         /*
1184          * Enforce PREQ interval.
1185          * NB: Proactive ROOT PREQs rate is handled by cb task.
1186          */
1187         if (last != NULL && minint != NULL) {
1188                 if (ratecheck(last, minint) == 0)
1189                         return EALREADY; /* XXX: we should postpone */
1190                 getmicrouptime(last);
1191         }
1192
1193         /*
1194          * mesh preq action frame format
1195          *     [6] da
1196          *     [6] sa
1197          *     [6] addr3 = sa
1198          *     [1] action
1199          *     [1] category
1200          *     [tlv] mesh path request
1201          */
1202         preq->preq_ie = IEEE80211_ELEMID_MESHPREQ;
1203         preq->preq_len = (preq->preq_flags & IEEE80211_MESHPREQ_FLAGS_AE ?
1204             IEEE80211_MESHPREQ_BASE_SZ_AE : IEEE80211_MESHPREQ_BASE_SZ) +
1205             preq->preq_tcount * IEEE80211_MESHPREQ_TRGT_SZ;
1206         return hwmp_send_action(ni, sa, da, (uint8_t *)preq, preq->preq_len+2);
1207 }
1208
1209 static void
1210 hwmp_recv_prep(struct ieee80211vap *vap, struct ieee80211_node *ni,
1211     const struct ieee80211_frame *wh, const struct ieee80211_meshprep_ie *prep)
1212 {
1213 #define IS_PROXY(rt)    (rt->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY)
1214 #define PROXIED_BY_US(rt)               \
1215     (IEEE80211_ADDR_EQ(vap->iv_myaddr, rt->rt_mesh_gate))
1216         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1217         struct ieee80211_hwmp_state *hs = vap->iv_hwmp;
1218         struct ieee80211_mesh_route *rt = NULL;
1219         struct ieee80211_mesh_route *rtorig = NULL;
1220         struct ieee80211_mesh_route *rtext = NULL;
1221         struct ieee80211_hwmp_route *hr;
1222         struct ieee80211com *ic = vap->iv_ic;
1223         struct ifnet *ifp = vap->iv_ifp;
1224         struct mbuf *m, *next;
1225         uint32_t metric = 0;
1226         const uint8_t *addr;
1227
1228         if (ni == vap->iv_bss ||
1229             ni->ni_mlstate != IEEE80211_NODE_MESH_ESTABLISHED)
1230                 return;
1231
1232         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1233             "received PREP, orig %6D, targ %6D", prep->prep_origaddr, ":",
1234             prep->prep_targetaddr, ":");
1235
1236         /*
1237          * Acceptance criteria: (If the corresponding PREP was not generated
1238          * by us OR not generated by an external mac that is not proxied by us)
1239          * AND forwarding is disabled, discard this PREP.
1240          */
1241         rtorig = ieee80211_mesh_rt_find(vap, prep->prep_origaddr);
1242         if ((!IEEE80211_ADDR_EQ(vap->iv_myaddr, prep->prep_origaddr) ||
1243             (rtorig != NULL && IS_PROXY(rtorig) && !PROXIED_BY_US(rtorig))) &&
1244             !(ms->ms_flags & IEEE80211_MESHFLAGS_FWD)){
1245                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1246                     "discard PREP, orig(%6D) not proxied or generated by us",
1247                     prep->prep_origaddr, ":");
1248                 return;
1249         }
1250
1251         /* PREP ACCEPTED */
1252
1253         /*
1254          * If accepted shall create or update the active forwarding information
1255          * it maintains for the target mesh STA of the PREP (according to the
1256          * rules defined in 13.10.8.4). If the conditions for creating or
1257          * updating the forwarding information have not been met in those
1258          * rules, no further steps are applied to the PREP.
1259          * [OPTIONAL]: update forwarding information to TA if metric improves.
1260          */
1261         rt = ieee80211_mesh_rt_find(vap, prep->prep_targetaddr);
1262         if (rt == NULL) {
1263                 rt = ieee80211_mesh_rt_add(vap, prep->prep_targetaddr);
1264                 if (rt == NULL) {
1265                         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1266                             "unable to add PREP path to %6D",
1267                             prep->prep_targetaddr, ":");
1268                         vap->iv_stats.is_mesh_rtaddfailed++;
1269                         return;
1270                 }
1271                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1272                     "adding target %6D", prep->prep_targetaddr, ":");
1273         }
1274         hr = IEEE80211_MESH_ROUTE_PRIV(rt, struct ieee80211_hwmp_route);
1275         /* update path metric */
1276         metric = prep->prep_metric + ms->ms_pmetric->mpm_metric(ni);
1277         if ((rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID)) {
1278                 if (HWMP_SEQ_LT(prep->prep_targetseq, hr->hr_seq)) {
1279                         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1280                             "discard PREP from %6D, old seq no %u < %u",
1281                             prep->prep_targetaddr, ":",
1282                             prep->prep_targetseq, hr->hr_seq);
1283                         return;
1284                 } else if (HWMP_SEQ_LEQ(prep->prep_targetseq, hr->hr_seq) &&
1285                     metric > rt->rt_metric) {
1286                         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1287                             "discard PREP from %6D, new metric %u > %u",
1288                             prep->prep_targetaddr, ":",
1289                             prep->prep_metric, rt->rt_metric);
1290                         return;
1291                 }
1292         }
1293
1294         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1295             "%s path to %6D, hopcount %d:%d metric %d:%d",
1296             rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID ?
1297             "prefer" : "update",
1298             prep->prep_targetaddr, ":",
1299             rt->rt_nhops, prep->prep_hopcount,
1300             rt->rt_metric, metric);
1301
1302         hr->hr_seq = prep->prep_targetseq;
1303         hr->hr_preqretries = 0;
1304         IEEE80211_ADDR_COPY(rt->rt_nexthop, ni->ni_macaddr);
1305         rt->rt_metric = metric;
1306         rt->rt_nhops = prep->prep_hopcount + 1;
1307         ieee80211_mesh_rt_update(rt, prep->prep_lifetime);
1308         if (rt->rt_flags & IEEE80211_MESHRT_FLAGS_DISCOVER) {
1309                 /* discovery complete */
1310                 rt->rt_flags &= ~IEEE80211_MESHRT_FLAGS_DISCOVER;
1311         }
1312         rt->rt_flags |= IEEE80211_MESHRT_FLAGS_VALID; /* mark valid */
1313
1314         /*
1315          * If it's NOT for us, propagate the PREP
1316          */
1317         if (!IEEE80211_ADDR_EQ(vap->iv_myaddr, prep->prep_origaddr) &&
1318             prep->prep_ttl > 1 &&
1319             prep->prep_hopcount < hs->hs_maxhops) {
1320                 struct ieee80211_meshprep_ie pprep; /* propagated PREP */
1321                 /*
1322                  * NB: We should already have setup the path to orig
1323                  * mesh STA when we propagated PREQ to target mesh STA,
1324                  * no PREP is generated without a corresponding PREQ.
1325                  * XXX: for now just ignore.
1326                  */
1327                 if (rtorig == NULL) {
1328                         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1329                             "received PREP for an unknown orig(%6D)",
1330                             prep->prep_origaddr, ":");
1331                         return;
1332                 }
1333
1334                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1335                     "propagate PREP from %6D",
1336                     prep->prep_targetaddr, ":");
1337
1338                 memcpy(&pprep, prep, sizeof(pprep));
1339                 pprep.prep_hopcount += 1;
1340                 pprep.prep_ttl -= 1;
1341                 pprep.prep_metric += ms->ms_pmetric->mpm_metric(ni);
1342                 hwmp_send_prep(ni, vap->iv_myaddr, rtorig->rt_nexthop, &pprep);
1343
1344                 /* precursor list for the Target Mesh STA Address is updated */
1345         }
1346
1347         /*
1348          * Check if we received a PREP w/ AE and store target external address.
1349          * We may store target external address if recevied PREP w/ AE
1350          * and we are not final destination
1351          */
1352         if (prep->prep_flags & IEEE80211_MESHPREP_FLAGS_AE) {
1353                 rtext = ieee80211_mesh_rt_find(vap,
1354                         prep->prep_target_ext_addr);
1355                 if (rtext == NULL) {
1356                         rtext = ieee80211_mesh_rt_add(vap,
1357                                 prep->prep_target_ext_addr);
1358                         if (rtext == NULL) {
1359                                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1360                                     "unable to add PREP path to proxy %6D",
1361                                     prep->prep_targetaddr, ":");
1362                                 vap->iv_stats.is_mesh_rtaddfailed++;
1363                                 return;
1364                         }
1365                 }
1366                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1367                     "%s path to %6D, hopcount %d:%d metric %d:%d",
1368                     rtext->rt_flags & IEEE80211_MESHRT_FLAGS_VALID ?
1369                     "prefer" : "update",
1370                     prep->prep_target_ext_addr, ":",
1371                     rtext->rt_nhops, prep->prep_hopcount,
1372                     rtext->rt_metric, metric);
1373
1374                 rtext->rt_flags = IEEE80211_MESHRT_FLAGS_PROXY |
1375                         IEEE80211_MESHRT_FLAGS_VALID;
1376                 IEEE80211_ADDR_COPY(rtext->rt_dest,
1377                     prep->prep_target_ext_addr);
1378                 IEEE80211_ADDR_COPY(rtext->rt_mesh_gate,
1379                     prep->prep_targetaddr);
1380                 IEEE80211_ADDR_COPY(rtext->rt_nexthop, wh->i_addr2);
1381                 rtext->rt_metric = metric;
1382                 rtext->rt_lifetime = prep->prep_lifetime;
1383                 rtext->rt_nhops = prep->prep_hopcount + 1;
1384                 rtext->rt_ext_seq = prep->prep_origseq; /* new proxy seq */
1385                 /*
1386                  * XXX: proxy entries have no HWMP priv data,
1387                  * nullify them to be sure?
1388                  */
1389         }
1390         /*
1391          * Check for frames queued awaiting path discovery.
1392          * XXX probably can tell exactly and avoid remove call
1393          * NB: hash may have false matches, if so they will get
1394          *     stuck back on the stageq because there won't be
1395          *     a path.
1396          */
1397         addr = prep->prep_flags & IEEE80211_MESHPREP_FLAGS_AE ?
1398             prep->prep_target_ext_addr : prep->prep_targetaddr;
1399         m = ieee80211_ageq_remove(&ic->ic_stageq,
1400             (struct ieee80211_node *)(uintptr_t)
1401             ieee80211_mac_hash(ic, addr)); /* either dest or ext_dest */
1402         for (; m != NULL; m = next) {
1403                 next = m->m_nextpkt;
1404                 m->m_nextpkt = NULL;
1405                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1406                     "flush queued frame %p len %d", m, m->m_pkthdr.len);
1407                 ifp->if_transmit(ifp, m);
1408         }
1409 #undef  IS_PROXY
1410 #undef  PROXIED_BY_US
1411 }
1412
1413 static int
1414 hwmp_send_prep(struct ieee80211_node *ni,
1415     const uint8_t sa[IEEE80211_ADDR_LEN],
1416     const uint8_t da[IEEE80211_ADDR_LEN],
1417     struct ieee80211_meshprep_ie *prep)
1418 {
1419         /* NB: there's no PREP minimum interval. */
1420
1421         /*
1422          * mesh prep action frame format
1423          *     [6] da
1424          *     [6] sa
1425          *     [6] addr3 = sa
1426          *     [1] action
1427          *     [1] category
1428          *     [tlv] mesh path reply
1429          */
1430         prep->prep_ie = IEEE80211_ELEMID_MESHPREP;
1431         prep->prep_len = prep->prep_flags & IEEE80211_MESHPREP_FLAGS_AE ?
1432             IEEE80211_MESHPREP_BASE_SZ_AE : IEEE80211_MESHPREP_BASE_SZ;
1433         return hwmp_send_action(ni, sa, da, (uint8_t *)prep,
1434             prep->prep_len + 2);
1435 }
1436
1437 #define PERR_DFLAGS(n)  perr.perr_dests[n].dest_flags
1438 #define PERR_DADDR(n)   perr.perr_dests[n].dest_addr
1439 #define PERR_DSEQ(n)    perr.perr_dests[n].dest_seq
1440 #define PERR_DRCODE(n)  perr.perr_dests[n].dest_rcode
1441 static void
1442 hwmp_peerdown(struct ieee80211_node *ni)
1443 {
1444         struct ieee80211vap *vap = ni->ni_vap;
1445         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1446         struct ieee80211_meshperr_ie perr;
1447         struct ieee80211_mesh_route *rt;
1448         struct ieee80211_hwmp_route *hr;
1449
1450         rt = ieee80211_mesh_rt_find(vap, ni->ni_macaddr);
1451         if (rt == NULL)
1452                 return;
1453         hr = IEEE80211_MESH_ROUTE_PRIV(rt, struct ieee80211_hwmp_route);
1454         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1455             "%s", "delete route entry");
1456         perr.perr_ttl = ms->ms_ttl;
1457         perr.perr_ndests = 1;
1458         PERR_DFLAGS(0) = 0;
1459         if (hr->hr_seq == 0)
1460                 PERR_DFLAGS(0) |= IEEE80211_MESHPERR_DFLAGS_USN;
1461         PERR_DFLAGS(0) |= IEEE80211_MESHPERR_DFLAGS_RC;
1462         IEEE80211_ADDR_COPY(PERR_DADDR(0), rt->rt_dest);
1463         PERR_DSEQ(0) = ++hr->hr_seq;
1464         PERR_DRCODE(0) = IEEE80211_REASON_MESH_PERR_DEST_UNREACH;
1465         /* NB: flush everything passing through peer */
1466         ieee80211_mesh_rt_flush_peer(vap, ni->ni_macaddr);
1467         hwmp_send_perr(vap->iv_bss, vap->iv_myaddr, broadcastaddr, &perr);
1468 }
1469 #undef  PERR_DFLAGS
1470 #undef  PERR_DADDR
1471 #undef  PERR_DSEQ
1472 #undef  PERR_DRCODE
1473
1474 #define PERR_DFLAGS(n)          perr->perr_dests[n].dest_flags
1475 #define PERR_DADDR(n)           perr->perr_dests[n].dest_addr
1476 #define PERR_DSEQ(n)            perr->perr_dests[n].dest_seq
1477 #define PERR_DEXTADDR(n)        perr->perr_dests[n].dest_ext_addr
1478 #define PERR_DRCODE(n)          perr->perr_dests[n].dest_rcode
1479 static void
1480 hwmp_recv_perr(struct ieee80211vap *vap, struct ieee80211_node *ni,
1481     const struct ieee80211_frame *wh, const struct ieee80211_meshperr_ie *perr)
1482 {
1483         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1484         struct ieee80211_mesh_route *rt = NULL;
1485         struct ieee80211_mesh_route *rt_ext = NULL;
1486         struct ieee80211_hwmp_route *hr;
1487         struct ieee80211_meshperr_ie *pperr = NULL;
1488         int i, j = 0, forward = 0;
1489
1490         if (ni == vap->iv_bss ||
1491             ni->ni_mlstate != IEEE80211_NODE_MESH_ESTABLISHED)
1492                 return;
1493
1494         IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1495             "received PERR from %6D", wh->i_addr2, ":");
1496
1497         /*
1498          * if forwarding is true, prepare pperr
1499          */
1500         if (ms->ms_flags & IEEE80211_MESHFLAGS_FWD) {
1501                 forward = 1;
1502                 pperr = malloc(sizeof(*perr) + 31*sizeof(*perr->perr_dests),
1503                     M_80211_MESH_PERR, M_NOWAIT); /* XXX: magic number, 32 err dests */
1504         }
1505
1506         /*
1507          * Acceptance criteria: check if we have forwarding information
1508          * stored about destination, and that nexthop == TA of this PERR.
1509          * NB: we also build a new PERR to propagate in case we should forward.
1510          */
1511         for (i = 0; i < perr->perr_ndests; i++) {
1512                 rt = ieee80211_mesh_rt_find(vap, PERR_DADDR(i));
1513                 if (rt == NULL || rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID)
1514                         continue;
1515                 if (!IEEE80211_ADDR_EQ(rt->rt_nexthop, wh->i_addr2))
1516                         continue;
1517
1518                 /* found and accepted a PERR ndest element, process it... */
1519                 if (forward)
1520                         memcpy(&pperr->perr_dests[j], &perr->perr_dests[i],
1521                             sizeof(*perr->perr_dests));
1522                 hr = IEEE80211_MESH_ROUTE_PRIV(rt, struct ieee80211_hwmp_route);
1523                 switch(PERR_DFLAGS(i)) {
1524                 case (IEEE80211_REASON_MESH_PERR_NO_FI):
1525                         if (PERR_DSEQ(i) == 0) {
1526                                 hr->hr_seq++;
1527                                 if (forward) {
1528                                         pperr->perr_dests[j].dest_seq =
1529                                             hr->hr_seq;
1530                                 }
1531                         } else {
1532                                 hr->hr_seq = PERR_DSEQ(i);
1533                         }
1534                         rt->rt_flags &= ~IEEE80211_MESHRT_FLAGS_VALID;
1535                         j++;
1536                         break;
1537                 case (IEEE80211_REASON_MESH_PERR_DEST_UNREACH):
1538                         if(HWMP_SEQ_GT(PERR_DSEQ(i), hr->hr_seq)) {
1539                                 hr->hr_seq = PERR_DSEQ(i);
1540                                 rt->rt_flags &= ~IEEE80211_MESHRT_FLAGS_VALID;
1541                                 j++;
1542                         }
1543                         break;
1544                 case (IEEE80211_REASON_MESH_PERR_NO_PROXY):
1545                         rt_ext = ieee80211_mesh_rt_find(vap, PERR_DEXTADDR(i));
1546                         if (rt_ext != NULL) {
1547                                 rt_ext->rt_flags &=
1548                                     ~IEEE80211_MESHRT_FLAGS_VALID;
1549                                 j++;
1550                         }
1551                         break;
1552                 default:
1553                         IEEE80211_DISCARD(vap, IEEE80211_MSG_HWMP, wh, NULL,
1554                             "PERR, unknown reason code %u\n", PERR_DFLAGS(i));
1555                         goto done; /* XXX: stats?? */
1556                 }
1557                 ieee80211_mesh_rt_flush_peer(vap, rt->rt_dest);
1558                 KASSERT(j < 32, ("PERR, error ndest >= 32 (%u)", j));
1559         }
1560         if (j == 0) {
1561                 IEEE80211_DISCARD(vap, IEEE80211_MSG_HWMP, wh, NULL, "%s",
1562                     "PERR not accepted");
1563                 goto done; /* XXX: stats?? */
1564         }
1565
1566         /*
1567          * Propagate the PERR if we previously found it on our routing table.
1568          */
1569         if (forward && perr->perr_ttl > 1) {
1570                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP, ni,
1571                     "propagate PERR from %6D", wh->i_addr2, ":");
1572                 pperr->perr_ndests = j;
1573                 pperr->perr_ttl--;
1574                 hwmp_send_perr(vap->iv_bss, vap->iv_myaddr, broadcastaddr,
1575                     pperr);
1576         }
1577 done:
1578         if (pperr != NULL)
1579                 free(pperr, M_80211_MESH_PERR);
1580 }
1581 #undef  PERR_DFLAGS
1582 #undef  PERR_DADDR
1583 #undef  PERR_DSEQ
1584 #undef  PERR_DEXTADDR
1585 #undef  PERR_DRCODE
1586
1587 static int
1588 hwmp_send_perr(struct ieee80211_node *ni,
1589     const uint8_t sa[IEEE80211_ADDR_LEN],
1590     const uint8_t da[IEEE80211_ADDR_LEN],
1591     struct ieee80211_meshperr_ie *perr)
1592 {
1593         struct ieee80211_hwmp_state *hs = ni->ni_vap->iv_hwmp;
1594         int i;
1595         uint8_t length = 0;
1596
1597         /*
1598          * Enforce PERR interval.
1599          */
1600         if (ratecheck(&hs->hs_lastperr, &ieee80211_hwmp_perrminint) == 0)
1601                 return EALREADY;
1602         getmicrouptime(&hs->hs_lastperr);
1603
1604         /*
1605          * mesh perr action frame format
1606          *     [6] da
1607          *     [6] sa
1608          *     [6] addr3 = sa
1609          *     [1] action
1610          *     [1] category
1611          *     [tlv] mesh path error
1612          */
1613         perr->perr_ie = IEEE80211_ELEMID_MESHPERR;
1614         length = IEEE80211_MESHPERR_BASE_SZ;
1615         for (i = 0; i<perr->perr_ndests; i++) {
1616                 if (perr->perr_dests[i].dest_flags &
1617                     IEEE80211_MESHPERR_FLAGS_AE) {
1618                         length += IEEE80211_MESHPERR_DEST_SZ_AE;
1619                         continue ;
1620                 }
1621                 length += IEEE80211_MESHPERR_DEST_SZ;
1622         }
1623         perr->perr_len =length;
1624         return hwmp_send_action(ni, sa, da, (uint8_t *)perr, perr->perr_len+2);
1625 }
1626
1627 /*
1628  * Called from the rest of the net80211 code (mesh code for example).
1629  * NB: IEEE80211_REASON_MESH_PERR_DEST_UNREACH can be trigger by the fact that
1630  * a mesh STA is unable to forward an MSDU/MMPDU to a next-hop mesh STA.
1631  */
1632 #define PERR_DFLAGS(n)          perr.perr_dests[n].dest_flags
1633 #define PERR_DADDR(n)           perr.perr_dests[n].dest_addr
1634 #define PERR_DSEQ(n)            perr.perr_dests[n].dest_seq
1635 #define PERR_DEXTADDR(n)        perr.perr_dests[n].dest_ext_addr
1636 #define PERR_DRCODE(n)          perr.perr_dests[n].dest_rcode
1637 static void
1638 hwmp_senderror(struct ieee80211vap *vap,
1639     const uint8_t addr[IEEE80211_ADDR_LEN],
1640     struct ieee80211_mesh_route *rt, int rcode)
1641 {
1642         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1643         struct ieee80211_hwmp_route *hr = NULL;
1644         struct ieee80211_meshperr_ie perr;
1645
1646         if (rt != NULL)
1647                 hr = IEEE80211_MESH_ROUTE_PRIV(rt,
1648                     struct ieee80211_hwmp_route);
1649
1650         perr.perr_ndests = 1;
1651         perr.perr_ttl = ms->ms_ttl;
1652         PERR_DFLAGS(0) = 0;
1653         PERR_DRCODE(0) = rcode;
1654
1655         switch (rcode) {
1656         case IEEE80211_REASON_MESH_PERR_NO_FI:
1657                 IEEE80211_ADDR_COPY(PERR_DADDR(0), addr);
1658                 PERR_DSEQ(0) = 0; /* reserved */
1659                 break;
1660         case IEEE80211_REASON_MESH_PERR_NO_PROXY:
1661                 KASSERT(rt != NULL, ("no proxy info for sending PERR"));
1662                 KASSERT(rt->rt_flags & IEEE80211_MESHRT_FLAGS_PROXY,
1663                     ("route is not marked proxy"));
1664                 PERR_DFLAGS(0) |= IEEE80211_MESHPERR_FLAGS_AE;
1665                 IEEE80211_ADDR_COPY(PERR_DADDR(0), vap->iv_myaddr);
1666                 PERR_DSEQ(0) = rt->rt_ext_seq;
1667                 IEEE80211_ADDR_COPY(PERR_DEXTADDR(0), addr);
1668                 break;
1669         case IEEE80211_REASON_MESH_PERR_DEST_UNREACH:
1670                 KASSERT(rt != NULL, ("no route info for sending PERR"));
1671                 IEEE80211_ADDR_COPY(PERR_DADDR(0), addr);
1672                 PERR_DSEQ(0) = hr->hr_seq;
1673                 break;
1674         default:
1675                 KASSERT(0, ("unknown reason code for HWMP PERR (%u)", rcode));
1676         }
1677         hwmp_send_perr(vap->iv_bss, vap->iv_myaddr, broadcastaddr, &perr);
1678 }
1679 #undef  PERR_DFLAGS
1680 #undef  PEER_DADDR
1681 #undef  PERR_DSEQ
1682 #undef  PERR_DEXTADDR
1683 #undef  PERR_DRCODE
1684
1685 static void
1686 hwmp_recv_rann(struct ieee80211vap *vap, struct ieee80211_node *ni,
1687     const struct ieee80211_frame *wh, const struct ieee80211_meshrann_ie *rann)
1688 {
1689         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1690         struct ieee80211_hwmp_state *hs = vap->iv_hwmp;
1691         struct ieee80211_mesh_route *rt = NULL;
1692         struct ieee80211_hwmp_route *hr;
1693         struct ieee80211_meshpreq_ie preq;
1694         struct ieee80211_meshrann_ie prann;
1695         uint32_t metric = 0;
1696
1697         if (ni == vap->iv_bss ||
1698             ni->ni_mlstate != IEEE80211_NODE_MESH_ESTABLISHED ||
1699             IEEE80211_ADDR_EQ(rann->rann_addr, vap->iv_myaddr))
1700                 return;
1701
1702         rt = ieee80211_mesh_rt_find(vap, rann->rann_addr);
1703         if (rt != NULL && rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) {
1704                 hr = IEEE80211_MESH_ROUTE_PRIV(rt, struct ieee80211_hwmp_route);
1705
1706                 /* Acceptance criteria: if RANN.seq < stored seq, discard RANN */
1707                 if (HWMP_SEQ_LT(rann->rann_seq, hr->hr_seq)) {
1708                         IEEE80211_DISCARD(vap, IEEE80211_MSG_HWMP, wh, NULL,
1709                         "RANN seq %u < %u", rann->rann_seq, hr->hr_seq);
1710                         return;
1711                 }
1712
1713                 /* Acceptance criteria: if RANN.seq == stored seq AND
1714                 * RANN.metric > stored metric, discard RANN */
1715                 if (HWMP_SEQ_EQ(rann->rann_seq, hr->hr_seq) &&
1716                 rann->rann_metric > rt->rt_metric) {
1717                         IEEE80211_DISCARD(vap, IEEE80211_MSG_HWMP, wh, NULL,
1718                         "RANN metric %u > %u", rann->rann_metric, rt->rt_metric);
1719                         return;
1720                 }
1721         }
1722
1723         /* RANN ACCEPTED */
1724
1725         ieee80211_hwmp_rannint = rann->rann_interval; /* XXX: mtx lock? */
1726         metric = rann->rann_metric + ms->ms_pmetric->mpm_metric(ni);
1727
1728         if (rt == NULL) {
1729                 rt = ieee80211_mesh_rt_add(vap, rann->rann_addr);
1730                 if (rt == NULL) {
1731                         IEEE80211_DISCARD(vap, IEEE80211_MSG_HWMP, wh, NULL,
1732                             "unable to add mac for RANN root %6D",
1733                             rann->rann_addr, ":");
1734                             vap->iv_stats.is_mesh_rtaddfailed++;
1735                         return;
1736                 }
1737         }
1738         hr = IEEE80211_MESH_ROUTE_PRIV(rt, struct ieee80211_hwmp_route);
1739         /* discovery timeout */
1740         ieee80211_mesh_rt_update(rt,
1741             ticks_to_msecs(ieee80211_hwmp_roottimeout));
1742
1743         preq.preq_flags = IEEE80211_MESHPREQ_FLAGS_AM;
1744         preq.preq_hopcount = 0;
1745         preq.preq_ttl = ms->ms_ttl;
1746         preq.preq_id = 0; /* reserved */
1747         IEEE80211_ADDR_COPY(preq.preq_origaddr, vap->iv_myaddr);
1748         preq.preq_origseq = ++hs->hs_seq;
1749         preq.preq_lifetime = ieee80211_hwmp_roottimeout;
1750         preq.preq_metric = IEEE80211_MESHLMETRIC_INITIALVAL;
1751         preq.preq_tcount = 1;
1752         preq.preq_targets[0].target_flags = IEEE80211_MESHPREQ_TFLAGS_TO;
1753         /* NB: IEEE80211_MESHPREQ_TFLAGS_USN = 0 implicitly implied */
1754         IEEE80211_ADDR_COPY(preq.preq_targets[0].target_addr, rann->rann_addr);
1755         preq.preq_targets[0].target_seq = rann->rann_seq;
1756         /* XXX: if rootconfint have not passed, we built this preq in vain */
1757         hwmp_send_preq(vap->iv_bss, vap->iv_myaddr, wh->i_addr2, &preq,
1758             &hr->hr_lastrootconf, &ieee80211_hwmp_rootconfint);
1759
1760         /* propagate a RANN */
1761         if (rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID &&
1762             rann->rann_ttl > 1 &&
1763             ms->ms_flags & IEEE80211_MESHFLAGS_FWD) {
1764                 hr->hr_seq = rann->rann_seq;
1765                 memcpy(&prann, rann, sizeof(prann));
1766                 prann.rann_hopcount += 1;
1767                 prann.rann_ttl -= 1;
1768                 prann.rann_metric += ms->ms_pmetric->mpm_metric(ni);
1769                 hwmp_send_rann(vap->iv_bss, vap->iv_myaddr,
1770                     broadcastaddr, &prann);
1771         }
1772 }
1773
1774 static int
1775 hwmp_send_rann(struct ieee80211_node *ni,
1776     const uint8_t sa[IEEE80211_ADDR_LEN],
1777     const uint8_t da[IEEE80211_ADDR_LEN],
1778     struct ieee80211_meshrann_ie *rann)
1779 {
1780         /*
1781          * mesh rann action frame format
1782          *     [6] da
1783          *     [6] sa
1784          *     [6] addr3 = sa
1785          *     [1] action
1786          *     [1] category
1787          *     [tlv] root annoucement
1788          */
1789         rann->rann_ie = IEEE80211_ELEMID_MESHRANN;
1790         rann->rann_len = IEEE80211_MESHRANN_BASE_SZ;
1791         return hwmp_send_action(ni, sa, da, (uint8_t *)rann,
1792             rann->rann_len + 2);
1793 }
1794
1795 #define PREQ_TFLAGS(n)  preq.preq_targets[n].target_flags
1796 #define PREQ_TADDR(n)   preq.preq_targets[n].target_addr
1797 #define PREQ_TSEQ(n)    preq.preq_targets[n].target_seq
1798 static void
1799 hwmp_rediscover_cb(void *arg)
1800 {
1801         struct ieee80211_mesh_route *rt = arg;
1802         struct ieee80211vap *vap = rt->rt_vap;
1803         struct ieee80211_hwmp_state *hs = vap->iv_hwmp;
1804         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1805         struct ieee80211_hwmp_route *hr;
1806         struct ieee80211_meshpreq_ie preq; /* Optimize: storing first preq? */
1807
1808         if ((rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID))
1809                 return ; /* nothing to do */
1810
1811         hr = IEEE80211_MESH_ROUTE_PRIV(rt, struct ieee80211_hwmp_route);
1812         if (hr->hr_preqretries >=
1813                 ieee80211_hwmp_maxpreq_retries) {
1814                 IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
1815                         rt->rt_dest, NULL, "%s",
1816                         "no valid path , max number of discovery, send GATE");
1817                 /* TODO: send to known gates */
1818                 vap->iv_stats.is_mesh_fwd_nopath++;
1819                 rt->rt_flags = 0; /* Mark invalid */
1820                 return ; /* XXX: flush queue? */
1821         }
1822
1823         hr->hr_preqretries++;
1824
1825
1826         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_HWMP, rt->rt_dest,
1827             "start path rediscovery , target seq %u", hr->hr_seq);
1828         /*
1829          * Try to discover the path for this node.
1830          * Group addressed PREQ Case A
1831          */
1832         preq.preq_flags = 0;
1833         preq.preq_hopcount = 0;
1834         preq.preq_ttl = ms->ms_ttl;
1835         preq.preq_id = ++hs->hs_preqid;
1836         IEEE80211_ADDR_COPY(preq.preq_origaddr, vap->iv_myaddr);
1837         preq.preq_origseq = hr->hr_origseq;
1838         preq.preq_lifetime = ticks_to_msecs(ieee80211_hwmp_pathtimeout);
1839         preq.preq_metric = IEEE80211_MESHLMETRIC_INITIALVAL;
1840         preq.preq_tcount = 1;
1841         IEEE80211_ADDR_COPY(PREQ_TADDR(0), rt->rt_dest);
1842         PREQ_TFLAGS(0) = 0;
1843         if (ieee80211_hwmp_targetonly)
1844                 PREQ_TFLAGS(0) |= IEEE80211_MESHPREQ_TFLAGS_TO;
1845         PREQ_TFLAGS(0) |= IEEE80211_MESHPREQ_TFLAGS_USN;
1846         PREQ_TSEQ(0) = 0; /* RESERVED when USN flag is set */
1847         /* XXX check return value */
1848         hwmp_send_preq(vap->iv_bss, vap->iv_myaddr,
1849                 broadcastaddr, &preq, &hr->hr_lastpreq,
1850                 &ieee80211_hwmp_preqminint);
1851         callout_reset(&rt->rt_discovery,
1852                 ieee80211_hwmp_net_diameter_traversaltime * 2,
1853                 hwmp_rediscover_cb, rt);
1854 }
1855
1856 static struct ieee80211_node *
1857 hwmp_discover(struct ieee80211vap *vap,
1858     const uint8_t dest[IEEE80211_ADDR_LEN], struct mbuf *m)
1859 {
1860         struct ieee80211_hwmp_state *hs = vap->iv_hwmp;
1861         struct ieee80211_mesh_state *ms = vap->iv_mesh;
1862         struct ieee80211_mesh_route *rt = NULL;
1863         struct ieee80211_hwmp_route *hr;
1864         struct ieee80211_meshpreq_ie preq;
1865         struct ieee80211_node *ni;
1866         int sendpreq = 0;
1867
1868         KASSERT(vap->iv_opmode == IEEE80211_M_MBSS,
1869             ("not a mesh vap, opmode %d", vap->iv_opmode));
1870
1871         KASSERT(!IEEE80211_ADDR_EQ(vap->iv_myaddr, dest),
1872             ("%s: discovering self!", __func__));
1873
1874         ni = NULL;
1875         if (!IEEE80211_IS_MULTICAST(dest)) {
1876                 rt = ieee80211_mesh_rt_find(vap, dest);
1877                 if (rt == NULL) {
1878                         rt = ieee80211_mesh_rt_add(vap, dest);
1879                         if (rt == NULL) {
1880                                 IEEE80211_NOTE(vap, IEEE80211_MSG_HWMP,
1881                                     ni, "unable to add discovery path to %6D",
1882                                     dest, ":");
1883                                 vap->iv_stats.is_mesh_rtaddfailed++;
1884                                 goto done;
1885                         }
1886                 }
1887                 hr = IEEE80211_MESH_ROUTE_PRIV(rt,
1888                     struct ieee80211_hwmp_route);
1889                 if ((rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID) == 0) {
1890                         if (hr->hr_lastdiscovery != 0 &&
1891                             (ticks - hr->hr_lastdiscovery <
1892                             (ieee80211_hwmp_net_diameter_traversaltime * 2))) {
1893                                 IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
1894                                     dest, NULL, "%s",
1895                                     "too frequent discovery requeust");
1896                                 /* XXX: stats? */
1897                                 goto done;
1898                         }
1899                         hr->hr_lastdiscovery = ticks;
1900                         if (hr->hr_preqretries >=
1901                             ieee80211_hwmp_maxpreq_retries) {
1902                                 IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_ANY,
1903                                     dest, NULL, "%s",
1904                                     "no valid path , max number of discovery");
1905                                 vap->iv_stats.is_mesh_fwd_nopath++;
1906                                 goto done;
1907                         }
1908                         rt->rt_flags = IEEE80211_MESHRT_FLAGS_DISCOVER;
1909                         hr->hr_preqretries++;
1910                         if (hr->hr_origseq == 0)
1911                                 hr->hr_origseq = ++hs->hs_seq;
1912                         rt->rt_metric = IEEE80211_MESHLMETRIC_INITIALVAL;
1913                         sendpreq = 1;
1914                         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_HWMP, dest,
1915                             "start path discovery (src %s), target seq %u",
1916                             m == NULL ? "<none>" : ether_sprintf(
1917                             mtod(m, struct ether_header *)->ether_shost),
1918                             hr->hr_seq);
1919                         /*
1920                          * Try to discover the path for this node.
1921                          * Group addressed PREQ Case A
1922                          */
1923                         preq.preq_flags = 0;
1924                         preq.preq_hopcount = 0;
1925                         preq.preq_ttl = ms->ms_ttl;
1926                         preq.preq_id = ++hs->hs_preqid;
1927                         IEEE80211_ADDR_COPY(preq.preq_origaddr, vap->iv_myaddr);
1928                         preq.preq_origseq = hr->hr_origseq;
1929                         preq.preq_lifetime =
1930                             ticks_to_msecs(ieee80211_hwmp_pathtimeout);
1931                         preq.preq_metric = IEEE80211_MESHLMETRIC_INITIALVAL;
1932                         preq.preq_tcount = 1;
1933                         IEEE80211_ADDR_COPY(PREQ_TADDR(0), dest);
1934                         PREQ_TFLAGS(0) = 0;
1935                         if (ieee80211_hwmp_targetonly)
1936                                 PREQ_TFLAGS(0) |= IEEE80211_MESHPREQ_TFLAGS_TO;
1937                         PREQ_TFLAGS(0) |= IEEE80211_MESHPREQ_TFLAGS_USN;
1938                         PREQ_TSEQ(0) = 0; /* RESERVED when USN flag is set */
1939                         /* XXX check return value */
1940                         hwmp_send_preq(vap->iv_bss, vap->iv_myaddr,
1941                             broadcastaddr, &preq, &hr->hr_lastpreq,
1942                             &ieee80211_hwmp_preqminint);
1943                         callout_reset(&rt->rt_discovery,
1944                             ieee80211_hwmp_net_diameter_traversaltime * 2,
1945                             hwmp_rediscover_cb, rt);
1946                 }
1947                 if (rt->rt_flags & IEEE80211_MESHRT_FLAGS_VALID)
1948                         ni = ieee80211_find_txnode(vap, rt->rt_nexthop);
1949         } else {
1950                 ni = ieee80211_find_txnode(vap, dest);
1951                 /* NB: if null then we leak mbuf */
1952                 KASSERT(ni != NULL, ("leak mcast frame"));
1953                 return ni;
1954         }
1955 done:
1956         if (ni == NULL && m != NULL) {
1957                 if (sendpreq) {
1958                         struct ieee80211com *ic = vap->iv_ic;
1959                         /*
1960                          * Queue packet for transmit when path discovery
1961                          * completes.  If discovery never completes the
1962                          * frame will be flushed by way of the aging timer.
1963                          */
1964                         IEEE80211_NOTE_MAC(vap, IEEE80211_MSG_HWMP, dest,
1965                             "%s", "queue frame until path found");
1966                         m->m_pkthdr.rcvif = (void *)(uintptr_t)
1967                             ieee80211_mac_hash(ic, dest);
1968                         /* XXX age chosen randomly */
1969                         ieee80211_ageq_append(&ic->ic_stageq, m,
1970                             IEEE80211_INACT_WAIT);
1971                 } else {
1972                         IEEE80211_DISCARD_MAC(vap, IEEE80211_MSG_HWMP,
1973                             dest, NULL, "%s", "no valid path to this node");
1974                         m_freem(m);
1975                 }
1976         }
1977         return ni;
1978 }
1979 #undef  PREQ_TFLAGS
1980 #undef  PREQ_TADDR
1981 #undef  PREQ_TSEQ
1982
1983 static int
1984 hwmp_ioctl_get80211(struct ieee80211vap *vap, struct ieee80211req *ireq)
1985 {
1986         struct ieee80211_hwmp_state *hs = vap->iv_hwmp;
1987         int error;
1988
1989         if (vap->iv_opmode != IEEE80211_M_MBSS)
1990                 return ENOSYS;
1991         error = 0;
1992         switch (ireq->i_type) {
1993         case IEEE80211_IOC_HWMP_ROOTMODE:
1994                 ireq->i_val = hs->hs_rootmode;
1995                 break;
1996         case IEEE80211_IOC_HWMP_MAXHOPS:
1997                 ireq->i_val = hs->hs_maxhops;
1998                 break;
1999         default:
2000                 return ENOSYS;
2001         }
2002         return error;
2003 }
2004 IEEE80211_IOCTL_GET(hwmp, hwmp_ioctl_get80211);
2005
2006 static int
2007 hwmp_ioctl_set80211(struct ieee80211vap *vap, struct ieee80211req *ireq)
2008 {
2009         struct ieee80211_hwmp_state *hs = vap->iv_hwmp;
2010         int error;
2011
2012         if (vap->iv_opmode != IEEE80211_M_MBSS)
2013                 return ENOSYS;
2014         error = 0;
2015         switch (ireq->i_type) {
2016         case IEEE80211_IOC_HWMP_ROOTMODE:
2017                 if (ireq->i_val < 0 || ireq->i_val > 3)
2018                         return EINVAL;
2019                 hs->hs_rootmode = ireq->i_val;
2020                 hwmp_rootmode_setup(vap);
2021                 break;
2022         case IEEE80211_IOC_HWMP_MAXHOPS:
2023                 if (ireq->i_val <= 0 || ireq->i_val > 255)
2024                         return EINVAL;
2025                 hs->hs_maxhops = ireq->i_val;
2026                 break;
2027         default:
2028                 return ENOSYS;
2029         }
2030         return error;
2031 }
2032 IEEE80211_IOCTL_SET(hwmp, hwmp_ioctl_set80211);