f07e514777bdf186861e963718b9be0e39d2adcd
[dragonfly.git] / sys / netproto / 802_11 / wlan / ieee80211_regdomain.c
1 /*-
2  * Copyright (c) 2005-2008 Sam Leffler, Errno Consulting
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
15  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
16  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
17  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
18  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
19  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
20  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
21  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
22  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
23  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24  */
25
26 #include <sys/cdefs.h>
27 __FBSDID("$FreeBSD$");
28
29 /*
30  * IEEE 802.11 regdomain support.
31  */
32 #include "opt_wlan.h"
33
34 #include <sys/param.h>
35 #include <sys/systm.h> 
36 #include <sys/kernel.h>
37 #include <sys/malloc.h>
38  
39 #include <sys/socket.h>
40
41 #include <net/if.h>
42 #include <net/if_var.h>
43 #include <net/if_media.h>
44 #include <net/ethernet.h>
45
46 #include <netproto/802_11/ieee80211_var.h>
47 #include <netproto/802_11/ieee80211_regdomain.h>
48
49 static void
50 null_getradiocaps(struct ieee80211com *ic, int maxchan,
51         int *n, struct ieee80211_channel *c)
52 {
53         /* just feed back the current channel list */
54         if (maxchan > ic->ic_nchans)
55                 maxchan = ic->ic_nchans;
56         memcpy(c, ic->ic_channels, maxchan*sizeof(struct ieee80211_channel));
57         *n = maxchan;
58 }
59
60 static int
61 null_setregdomain(struct ieee80211com *ic,
62         struct ieee80211_regdomain *rd,
63         int nchans, struct ieee80211_channel chans[])
64 {
65         return 0;               /* accept anything */
66 }
67
68 void
69 ieee80211_regdomain_attach(struct ieee80211com *ic)
70 {
71         if (ic->ic_regdomain.regdomain == 0 &&
72             ic->ic_regdomain.country == CTRY_DEFAULT) {
73                 ic->ic_regdomain.country = CTRY_UNITED_STATES;  /* XXX */
74                 ic->ic_regdomain.location = ' ';                /* both */
75                 ic->ic_regdomain.isocc[0] = 'U';                /* XXX */
76                 ic->ic_regdomain.isocc[1] = 'S';                /* XXX */
77                 /* NB: driver calls ieee80211_init_channels or similar */
78         }
79         ic->ic_getradiocaps = null_getradiocaps;
80         ic->ic_setregdomain = null_setregdomain;
81 }
82
83 void
84 ieee80211_regdomain_detach(struct ieee80211com *ic)
85 {
86         if (ic->ic_countryie != NULL) {
87                 kfree(ic->ic_countryie, M_80211_NODE_IE);
88                 ic->ic_countryie = NULL;
89         }
90 }
91
92 void
93 ieee80211_regdomain_vattach(struct ieee80211vap *vap)
94 {
95 }
96
97 void
98 ieee80211_regdomain_vdetach(struct ieee80211vap *vap)
99 {
100 }
101
102 static void
103 addchan(struct ieee80211com *ic, int ieee, int flags)
104 {
105         struct ieee80211_channel *c;
106
107         c = &ic->ic_channels[ic->ic_nchans++];
108         c->ic_freq = ieee80211_ieee2mhz(ieee, flags);
109         c->ic_ieee = ieee;
110         c->ic_flags = flags;
111         if (flags & IEEE80211_CHAN_HT40U)
112                 c->ic_extieee = ieee + 4;
113         else if (flags & IEEE80211_CHAN_HT40D)
114                 c->ic_extieee = ieee - 4;
115         else
116                 c->ic_extieee = 0;
117 }
118
119 /*
120  * Setup the channel list for the specified regulatory domain,
121  * country code, and operating modes.  This interface is used
122  * when a driver does not obtain the channel list from another
123  * source (such as firmware).
124  */
125 int
126 ieee80211_init_channels(struct ieee80211com *ic,
127         const struct ieee80211_regdomain *rd, const uint8_t bands[])
128 {
129         int i;
130
131         /* XXX just do something for now */
132         ic->ic_nchans = 0;
133         if (isset(bands, IEEE80211_MODE_11B) ||
134             isset(bands, IEEE80211_MODE_11G) ||
135             isset(bands, IEEE80211_MODE_11NG)) {
136                 int maxchan = 11;
137                 if (rd != NULL && rd->ecm)
138                         maxchan = 14;
139                 for (i = 1; i <= maxchan; i++) {
140                         if (isset(bands, IEEE80211_MODE_11B))
141                                 addchan(ic, i, IEEE80211_CHAN_B);
142                         if (isset(bands, IEEE80211_MODE_11G))
143                                 addchan(ic, i, IEEE80211_CHAN_G);
144                         if (isset(bands, IEEE80211_MODE_11NG)) {
145                                 addchan(ic, i,
146                                     IEEE80211_CHAN_G | IEEE80211_CHAN_HT20);
147                         }
148                         if ((ic->ic_htcaps & IEEE80211_HTCAP_CHWIDTH40) == 0)
149                                 continue;
150                         if (i <= 7) {
151                                 addchan(ic, i,
152                                     IEEE80211_CHAN_G | IEEE80211_CHAN_HT40U);
153                                 addchan(ic, i + 4,
154                                     IEEE80211_CHAN_G | IEEE80211_CHAN_HT40D);
155                         }
156                 }
157         }
158         if (isset(bands, IEEE80211_MODE_11A) ||
159             isset(bands, IEEE80211_MODE_11NA)) {
160                 for (i = 36; i <= 64; i += 4) {
161                         addchan(ic, i, IEEE80211_CHAN_A);
162                         if (isset(bands, IEEE80211_MODE_11NA)) {
163                                 addchan(ic, i,
164                                     IEEE80211_CHAN_A | IEEE80211_CHAN_HT20);
165                         }
166                         if ((ic->ic_htcaps & IEEE80211_HTCAP_CHWIDTH40) == 0)
167                                 continue;
168                         if ((i % 8) == 4) {
169                                 addchan(ic, i,
170                                     IEEE80211_CHAN_A | IEEE80211_CHAN_HT40U);
171                                 addchan(ic, i + 4,
172                                     IEEE80211_CHAN_A | IEEE80211_CHAN_HT40D);
173                         }
174                 }
175                 for (i = 100; i <= 140; i += 4) {
176                         addchan(ic, i, IEEE80211_CHAN_A);
177                         if (isset(bands, IEEE80211_MODE_11NA)) {
178                                 addchan(ic, i,
179                                     IEEE80211_CHAN_A | IEEE80211_CHAN_HT20);
180                         }
181                         if ((ic->ic_htcaps & IEEE80211_HTCAP_CHWIDTH40) == 0)
182                                 continue;
183                         if ((i % 8) == 4 && i != 140) {
184                                 addchan(ic, i,
185                                     IEEE80211_CHAN_A | IEEE80211_CHAN_HT40U);
186                                 addchan(ic, i + 4,
187                                     IEEE80211_CHAN_A | IEEE80211_CHAN_HT40D);
188                         }
189                 }
190                 for (i = 149; i <= 161; i += 4) {
191                         addchan(ic, i, IEEE80211_CHAN_A);
192                         if (isset(bands, IEEE80211_MODE_11NA)) {
193                                 addchan(ic, i,
194                                     IEEE80211_CHAN_A | IEEE80211_CHAN_HT20);
195                         }
196                         if ((ic->ic_htcaps & IEEE80211_HTCAP_CHWIDTH40) == 0)
197                                 continue;
198                         if ((i % 8) == 5) {
199                                 addchan(ic, i,
200                                     IEEE80211_CHAN_A | IEEE80211_CHAN_HT40U);
201                                 addchan(ic, i + 4,
202                                     IEEE80211_CHAN_A | IEEE80211_CHAN_HT40D);
203                         }
204                 }
205         }
206         if (rd != NULL)
207                 ic->ic_regdomain = *rd;
208
209         return 0;
210 }
211
212 static __inline int
213 chancompar(const void *a, const void *b)
214 {
215         const struct ieee80211_channel *ca = a;
216         const struct ieee80211_channel *cb = b;
217
218         return (ca->ic_freq == cb->ic_freq) ?
219                 (ca->ic_flags & IEEE80211_CHAN_ALL) -
220                     (cb->ic_flags & IEEE80211_CHAN_ALL) :
221                 ca->ic_freq - cb->ic_freq;
222 }
223
224 /*
225  * Insertion sort.
226  */
227 #define swap(_a, _b, _size) {                   \
228         uint8_t *s = _b;                        \
229         int i = _size;                          \
230         do {                                    \
231                 uint8_t tmp = *_a;              \
232                 *_a++ = *s;                     \
233                 *s++ = tmp;                     \
234         } while (--i);                          \
235         _a -= _size;                            \
236 }
237
238 static void
239 sort_channels(void *a, size_t n, size_t size)
240 {
241         uint8_t *aa = a;
242         uint8_t *ai, *t;
243
244         KASSERT(n > 0, ("no channels"));
245         for (ai = aa+size; --n >= 1; ai += size)
246                 for (t = ai; t > aa; t -= size) {
247                         uint8_t *u = t - size;
248                         if (chancompar(u, t) <= 0)
249                                 break;
250                         swap(u, t, size);
251                 }
252 }
253 #undef swap
254
255 /*
256  * Order channels w/ the same frequency so that
257  * b < g < htg and a < hta.  This is used to optimize
258  * channel table lookups and some user applications
259  * may also depend on it (though they should not).
260  */
261 void
262 ieee80211_sort_channels(struct ieee80211_channel chans[], int nchans)
263 {
264         if (nchans > 0)
265                 sort_channels(chans, nchans, sizeof(struct ieee80211_channel));
266 }
267
268 /*
269  * Allocate and construct a Country Information IE.
270  */
271 struct ieee80211_appie *
272 ieee80211_alloc_countryie(struct ieee80211com *ic)
273 {
274 #define CHAN_UNINTERESTING \
275     (IEEE80211_CHAN_TURBO | IEEE80211_CHAN_STURBO | \
276      IEEE80211_CHAN_HALF | IEEE80211_CHAN_QUARTER)
277         /* XXX what about auto? */
278         /* flag set of channels to be excluded (band added below) */
279         static const int skipflags[IEEE80211_MODE_MAX] = {
280             [IEEE80211_MODE_AUTO]       = CHAN_UNINTERESTING,
281             [IEEE80211_MODE_11A]        = CHAN_UNINTERESTING,
282             [IEEE80211_MODE_11B]        = CHAN_UNINTERESTING,
283             [IEEE80211_MODE_11G]        = CHAN_UNINTERESTING,
284             [IEEE80211_MODE_FH]         = CHAN_UNINTERESTING
285                                         | IEEE80211_CHAN_OFDM
286                                         | IEEE80211_CHAN_CCK
287                                         | IEEE80211_CHAN_DYN,
288             [IEEE80211_MODE_TURBO_A]    = CHAN_UNINTERESTING,
289             [IEEE80211_MODE_TURBO_G]    = CHAN_UNINTERESTING,
290             [IEEE80211_MODE_STURBO_A]   = CHAN_UNINTERESTING,
291             [IEEE80211_MODE_HALF]       = IEEE80211_CHAN_TURBO
292                                         | IEEE80211_CHAN_STURBO,
293             [IEEE80211_MODE_QUARTER]    = IEEE80211_CHAN_TURBO
294                                         | IEEE80211_CHAN_STURBO,
295             [IEEE80211_MODE_11NA]       = CHAN_UNINTERESTING,
296             [IEEE80211_MODE_11NG]       = CHAN_UNINTERESTING,
297         };
298         const struct ieee80211_regdomain *rd = &ic->ic_regdomain;
299         uint8_t nextchan, chans[IEEE80211_CHAN_BYTES], *frm;
300         struct ieee80211_appie *aie;
301         struct ieee80211_country_ie *ie;
302         int i, skip, nruns;
303
304         aie = kmalloc(IEEE80211_COUNTRY_MAX_SIZE, M_80211_NODE_IE,
305             M_INTWAIT | M_ZERO);
306         if (aie == NULL) {
307                 if_printf(ic->ic_ifp,
308                     "%s: unable to allocate memory for country ie\n", __func__);
309                 /* XXX stat */
310                 return NULL;
311         }
312         ie = (struct ieee80211_country_ie *) aie->ie_data;
313         ie->ie = IEEE80211_ELEMID_COUNTRY;
314         if (rd->isocc[0] == '\0') {
315                 if_printf(ic->ic_ifp, "no ISO country string for cc %d; "
316                         "using blanks\n", rd->country);
317                 ie->cc[0] = ie->cc[1] = ' ';
318         } else {
319                 ie->cc[0] = rd->isocc[0];
320                 ie->cc[1] = rd->isocc[1];
321         }
322         /* 
323          * Indoor/Outdoor portion of country string:
324          *     'I' indoor only
325          *     'O' outdoor only
326          *     ' ' all enviroments
327          */
328         ie->cc[2] = (rd->location == 'I' ? 'I' :
329                      rd->location == 'O' ? 'O' : ' ');
330         /* 
331          * Run-length encoded channel+max tx power info.
332          */
333         frm = (uint8_t *)&ie->band[0];
334         nextchan = 0;                   /* NB: impossible channel # */
335         nruns = 0;
336         memset(chans, 0, sizeof(chans));
337         skip = skipflags[ieee80211_chan2mode(ic->ic_bsschan)];
338         if (IEEE80211_IS_CHAN_5GHZ(ic->ic_bsschan))
339                 skip |= IEEE80211_CHAN_2GHZ;
340         else if (IEEE80211_IS_CHAN_2GHZ(ic->ic_bsschan))
341                 skip |= IEEE80211_CHAN_5GHZ;
342         for (i = 0; i < ic->ic_nchans; i++) {
343                 const struct ieee80211_channel *c = &ic->ic_channels[i];
344
345                 if (isset(chans, c->ic_ieee))           /* suppress dup's */
346                         continue;
347                 if (c->ic_flags & skip)                 /* skip band, etc. */
348                         continue;
349                 setbit(chans, c->ic_ieee);
350                 if (c->ic_ieee != nextchan ||
351                     c->ic_maxregpower != frm[-1]) {     /* new run */
352                         if (nruns == IEEE80211_COUNTRY_MAX_BANDS) {
353                                 if_printf(ic->ic_ifp, "%s: country ie too big, "
354                                     "runs > max %d, truncating\n",
355                                     __func__, IEEE80211_COUNTRY_MAX_BANDS);
356                                 /* XXX stat? fail? */
357                                 break;
358                         }
359                         frm[0] = c->ic_ieee;            /* starting channel # */
360                         frm[1] = 1;                     /* # channels in run */
361                         frm[2] = c->ic_maxregpower;     /* tx power cap */
362                         frm += 3;
363                         nextchan = c->ic_ieee + 1;      /* overflow? */
364                         nruns++;
365                 } else {                                /* extend run */
366                         frm[-2]++;
367                         nextchan++;
368                 }
369         }
370         ie->len = frm - ie->cc;
371         if (ie->len & 1) {              /* Zero pad to multiple of 2 */
372                 ie->len++;
373                 *frm++ = 0;
374         }
375         aie->ie_len = frm - aie->ie_data;
376
377         return aie;
378 #undef CHAN_UNINTERESTING
379 }
380
381 static int
382 allvapsdown(struct ieee80211com *ic)
383 {
384         struct ieee80211vap *vap;
385
386         IEEE80211_LOCK_ASSERT(ic);
387         TAILQ_FOREACH(vap, &ic->ic_vaps, iv_next)
388                 if (vap->iv_state != IEEE80211_S_INIT)
389                         return 0;
390         return 1;
391 }
392
393 int
394 ieee80211_setregdomain(struct ieee80211vap *vap,
395     struct ieee80211_regdomain_req *reg)
396 {
397         struct ieee80211com *ic = vap->iv_ic;
398         struct ieee80211_channel *c;
399         int desfreq = 0, desflags = 0;          /* XXX silence gcc complaint */
400         int error, i;
401
402         if (reg->rd.location != 'I' && reg->rd.location != 'O' &&
403             reg->rd.location != ' ') {
404                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_IOCTL,
405                     "%s: invalid location 0x%x\n", __func__, reg->rd.location);
406                 return EINVAL;
407         }
408         if (reg->rd.isocc[0] == '\0' || reg->rd.isocc[1] == '\0') {
409                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_IOCTL,
410                     "%s: invalid iso cc 0x%x:0x%x\n", __func__,
411                     reg->rd.isocc[0], reg->rd.isocc[1]);
412                 return EINVAL;
413         }
414         if (reg->chaninfo.ic_nchans > IEEE80211_CHAN_MAX) {
415                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_IOCTL,
416                     "%s: too many channels %u, max %u\n", __func__,
417                     reg->chaninfo.ic_nchans, IEEE80211_CHAN_MAX);
418                 return EINVAL;
419         }
420         /*
421          * Calculate freq<->IEEE mapping and default max tx power
422          * for channels not setup.  The driver can override these
423          * setting to reflect device properties/requirements.
424          */
425         for (i = 0; i < reg->chaninfo.ic_nchans; i++) {
426                 c = &reg->chaninfo.ic_chans[i];
427                 if (c->ic_freq == 0 || c->ic_flags == 0) {
428                         IEEE80211_DPRINTF(vap, IEEE80211_MSG_IOCTL,
429                             "%s: invalid channel spec at [%u]\n", __func__, i);
430                         return EINVAL;
431                 }
432                 if (c->ic_maxregpower == 0) {
433                         IEEE80211_DPRINTF(vap, IEEE80211_MSG_IOCTL,
434                             "%s: invalid channel spec, zero maxregpower, "
435                             "freq %u flags 0x%x\n", __func__,
436                             c->ic_freq, c->ic_flags);
437                         return EINVAL;
438                 }
439                 if (c->ic_ieee == 0)
440                         c->ic_ieee = ieee80211_mhz2ieee(c->ic_freq,c->ic_flags);
441                 if (IEEE80211_IS_CHAN_HT40(c) && c->ic_extieee == 0)
442                         c->ic_extieee = ieee80211_mhz2ieee(c->ic_freq +
443                             (IEEE80211_IS_CHAN_HT40U(c) ? 20 : -20),
444                             c->ic_flags);
445                 if (c->ic_maxpower == 0)
446                         c->ic_maxpower = 2*c->ic_maxregpower;
447         }
448         IEEE80211_LOCK(ic);
449         /* XXX bandaid; a running vap will likely crash */
450         if (!allvapsdown(ic)) {
451                 IEEE80211_UNLOCK(ic);
452                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_IOCTL,
453                     "%s: reject: vaps are running\n", __func__);
454                 return EBUSY;
455         }
456         error = ic->ic_setregdomain(ic, &reg->rd,
457             reg->chaninfo.ic_nchans, reg->chaninfo.ic_chans);
458         if (error != 0) {
459                 IEEE80211_UNLOCK(ic);
460                 IEEE80211_DPRINTF(vap, IEEE80211_MSG_IOCTL,
461                     "%s: driver rejected request, error %u\n", __func__, error);
462                 return error;
463         }
464         /*
465          * Commit: copy in new channel table and reset media state.
466          * On return the state machines will be clocked so all vaps
467          * will reset their state.
468          *
469          * XXX ic_bsschan is marked undefined, must have vap's in
470          *     INIT state or we blow up forcing stations off
471          */
472         /*
473          * Save any desired channel for restore below.  Note this
474          * needs to be done for all vaps but for now we only do
475          * the one where the ioctl is issued.
476          */
477         if (vap->iv_des_chan != IEEE80211_CHAN_ANYC) {
478                 desfreq = vap->iv_des_chan->ic_freq;
479                 desflags = vap->iv_des_chan->ic_flags;
480         }
481         /* regdomain parameters */
482         memcpy(&ic->ic_regdomain, &reg->rd, sizeof(reg->rd));
483         /* channel table */
484         memcpy(ic->ic_channels, reg->chaninfo.ic_chans,
485             reg->chaninfo.ic_nchans * sizeof(struct ieee80211_channel));
486         ic->ic_nchans = reg->chaninfo.ic_nchans;
487         memset(&ic->ic_channels[ic->ic_nchans], 0,
488             (IEEE80211_CHAN_MAX - ic->ic_nchans) *
489                sizeof(struct ieee80211_channel));
490         ieee80211_media_init(ic);
491
492         /*
493          * Invalidate channel-related state.
494          */
495         if (ic->ic_countryie != NULL) {
496                 kfree(ic->ic_countryie, M_80211_NODE_IE);
497                 ic->ic_countryie = NULL;
498         }
499         ieee80211_scan_flush(vap);
500         ieee80211_dfs_reset(ic);
501         if (vap->iv_des_chan != IEEE80211_CHAN_ANYC) {
502                 c = ieee80211_find_channel(ic, desfreq, desflags);
503                 /* NB: may be NULL if not present in new channel list */
504                 vap->iv_des_chan = (c != NULL) ? c : IEEE80211_CHAN_ANYC;
505         }
506         IEEE80211_UNLOCK(ic);
507
508         return 0;
509 }