1c3f342f4cd5f9f29bf7e6f301bc4471fd591634
[dragonfly.git] / sys / dev / netif / ath / ath_rate / amrr / amrr.c
1 /*-
2  * Copyright (c) 2004 INRIA
3  * Copyright (c) 2002-2005 Sam Leffler, Errno Consulting
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer,
11  *    without modification.
12  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
13  *    similar to the "NO WARRANTY" disclaimer below ("Disclaimer") and any
14  *    redistribution must be conditioned upon including a substantially
15  *    similar Disclaimer requirement for further binary redistribution.
16  * 3. Neither the names of the above-listed copyright holders nor the names
17  *    of any contributors may be used to endorse or promote products derived
18  *    from this software without specific prior written permission.
19  *
20  * Alternatively, this software may be distributed under the terms of the
21  * GNU General Public License ("GPL") version 2 as published by the Free
22  * Software Foundation.
23  *
24  * NO WARRANTY
25  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
26  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
27  * LIMITED TO, THE IMPLIED WARRANTIES OF NONINFRINGEMENT, MERCHANTIBILITY
28  * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL
29  * THE COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY,
30  * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
31  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
32  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
33  * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
34  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
35  * THE POSSIBILITY OF SUCH DAMAGES.
36  *
37  */
38
39 #include <sys/cdefs.h>
40
41 /*
42  * AMRR rate control. See:
43  * http://www-sop.inria.fr/rapports/sophia/RR-5208.html
44  * "IEEE 802.11 Rate Adaptation: A Practical Approach" by
45  *    Mathieu Lacage, Hossein Manshaei, Thierry Turletti
46  */
47 #include "opt_ath.h"
48 #include "opt_inet.h"
49 #include "opt_wlan.h"
50
51 #include <sys/param.h>
52 #include <sys/systm.h> 
53 #include <sys/sysctl.h>
54 #include <sys/kernel.h>
55 #include <sys/lock.h>
56 #include <sys/mutex.h>
57 #include <sys/errno.h>
58 #include <sys/bus.h>
59 #include <sys/socket.h>
60  
61 #include <net/if.h>
62 #include <net/if_media.h>
63 #include <net/if_arp.h>
64
65 #include <netproto/802_11/ieee80211_var.h>
66
67 #include <net/bpf.h>
68
69 #ifdef INET
70 #include <netinet/in.h> 
71 #include <netinet/if_ether.h>
72 #endif
73
74 #include <machine/resource.h>
75
76 #include <dev/netif/ath/ath/if_athvar.h>
77 #include <dev/netif/ath/ath_rate/amrr/amrr.h>
78 #include <dev/netif/ath/ath_hal/ah_desc.h>
79
80 static  int ath_rateinterval = 1000;            /* rate ctl interval (ms)  */
81 static  int ath_rate_max_success_threshold = 10;
82 static  int ath_rate_min_success_threshold = 1;
83
84 static void     ath_rate_update(struct ath_softc *, struct ieee80211_node *,
85                         int rate);
86 static void     ath_rate_ctl_start(struct ath_softc *, struct ieee80211_node *);
87 static void     ath_rate_ctl(void *, struct ieee80211_node *);
88
89 void
90 ath_rate_node_init(struct ath_softc *sc, struct ath_node *an)
91 {
92         /* NB: assumed to be zero'd by caller */
93 }
94
95 void
96 ath_rate_node_cleanup(struct ath_softc *sc, struct ath_node *an)
97 {
98 }
99
100 void
101 ath_rate_findrate(struct ath_softc *sc, struct ath_node *an,
102         int shortPreamble, size_t frameLen,
103         u_int8_t *rix, int *try0, u_int8_t *txrate)
104 {
105         struct amrr_node *amn = ATH_NODE_AMRR(an);
106
107         *rix = amn->amn_tx_rix0;
108         *try0 = amn->amn_tx_try0;
109         if (shortPreamble)
110                 *txrate = amn->amn_tx_rate0sp;
111         else
112                 *txrate = amn->amn_tx_rate0;
113 }
114
115 /*
116  * Get the TX rates.
117  *
118  * The short preamble bits aren't set here; the caller should augment
119  * the returned rate with the relevant preamble rate flag.
120  */
121 void
122 ath_rate_getxtxrates(struct ath_softc *sc, struct ath_node *an,
123     uint8_t rix0, struct ath_rc_series *rc)
124 {
125         struct amrr_node *amn = ATH_NODE_AMRR(an);
126
127         rc[0].flags = rc[1].flags = rc[2].flags = rc[3].flags = 0;
128
129         rc[0].rix = amn->amn_tx_rate0;
130         rc[1].rix = amn->amn_tx_rate1;
131         rc[2].rix = amn->amn_tx_rate2;
132         rc[3].rix = amn->amn_tx_rate3;
133
134         rc[0].tries = amn->amn_tx_try0;
135         rc[1].tries = amn->amn_tx_try1;
136         rc[2].tries = amn->amn_tx_try2;
137         rc[3].tries = amn->amn_tx_try3;
138 }
139
140
141 void
142 ath_rate_setupxtxdesc(struct ath_softc *sc, struct ath_node *an,
143         struct ath_desc *ds, int shortPreamble, u_int8_t rix)
144 {
145         struct amrr_node *amn = ATH_NODE_AMRR(an);
146
147         ath_hal_setupxtxdesc(sc->sc_ah, ds
148                 , amn->amn_tx_rate1sp, amn->amn_tx_try1 /* series 1 */
149                 , amn->amn_tx_rate2sp, amn->amn_tx_try2 /* series 2 */
150                 , amn->amn_tx_rate3sp, amn->amn_tx_try3 /* series 3 */
151         );
152 }
153
154 void
155 ath_rate_tx_complete(struct ath_softc *sc, struct ath_node *an,
156         const struct ath_rc_series *rc, const struct ath_tx_status *ts,
157         int frame_size, int nframes, int nbad)
158 {
159         struct amrr_node *amn = ATH_NODE_AMRR(an);
160         int sr = ts->ts_shortretry;
161         int lr = ts->ts_longretry;
162         int retry_count = sr + lr;
163
164         amn->amn_tx_try0_cnt++;
165         if (retry_count == 1) {
166                 amn->amn_tx_try1_cnt++;
167         } else if (retry_count == 2) {
168                 amn->amn_tx_try1_cnt++;
169                 amn->amn_tx_try2_cnt++;
170         } else if (retry_count == 3) {
171                 amn->amn_tx_try1_cnt++;
172                 amn->amn_tx_try2_cnt++;
173                 amn->amn_tx_try3_cnt++;
174         } else if (retry_count > 3) {
175                 amn->amn_tx_try1_cnt++;
176                 amn->amn_tx_try2_cnt++;
177                 amn->amn_tx_try3_cnt++;
178                 amn->amn_tx_failure_cnt++;
179         }
180         if (amn->amn_interval != 0 &&
181             ticks - amn->amn_ticks > amn->amn_interval) {
182                 ath_rate_ctl(sc, &an->an_node);
183                 amn->amn_ticks = ticks;
184         }
185 }
186
187 void
188 ath_rate_newassoc(struct ath_softc *sc, struct ath_node *an, int isnew)
189 {
190         if (isnew)
191                 ath_rate_ctl_start(sc, &an->an_node);
192 }
193
194 static void 
195 node_reset(struct amrr_node *amn)
196 {
197         amn->amn_tx_try0_cnt = 0;
198         amn->amn_tx_try1_cnt = 0;
199         amn->amn_tx_try2_cnt = 0;
200         amn->amn_tx_try3_cnt = 0;
201         amn->amn_tx_failure_cnt = 0;
202         amn->amn_success = 0;
203         amn->amn_recovery = 0;
204         amn->amn_success_threshold = ath_rate_min_success_threshold;
205 }
206
207
208 /**
209  * The code below assumes that we are dealing with hardware multi rate retry
210  * I have no idea what will happen if you try to use this module with another
211  * type of hardware. Your machine might catch fire or it might work with
212  * horrible performance...
213  */
214 static void
215 ath_rate_update(struct ath_softc *sc, struct ieee80211_node *ni, int rate)
216 {
217         struct ath_node *an = ATH_NODE(ni);
218         struct amrr_node *amn = ATH_NODE_AMRR(an);
219         struct ieee80211vap *vap = ni->ni_vap;
220         const HAL_RATE_TABLE *rt = sc->sc_currates;
221         u_int8_t rix;
222
223         KASSERT(rt != NULL, ("no rate table, mode %u", sc->sc_curmode));
224
225         IEEE80211_NOTE(vap, IEEE80211_MSG_RATECTL, ni,
226             "%s: set xmit rate to %dM", __func__, 
227             ni->ni_rates.rs_nrates > 0 ?
228                 (ni->ni_rates.rs_rates[rate] & IEEE80211_RATE_VAL) / 2 : 0);
229
230         amn->amn_rix = rate;
231         /*
232          * Before associating a node has no rate set setup
233          * so we can't calculate any transmit codes to use.
234          * This is ok since we should never be sending anything
235          * but management frames and those always go at the
236          * lowest hardware rate.
237          */
238         if (ni->ni_rates.rs_nrates > 0) {
239                 ni->ni_txrate = ni->ni_rates.rs_rates[rate] & IEEE80211_RATE_VAL;
240                 amn->amn_tx_rix0 = sc->sc_rixmap[ni->ni_txrate];
241                 amn->amn_tx_rate0 = rt->info[amn->amn_tx_rix0].rateCode;
242                 amn->amn_tx_rate0sp = amn->amn_tx_rate0 |
243                         rt->info[amn->amn_tx_rix0].shortPreamble;
244                 if (sc->sc_mrretry) {
245                         amn->amn_tx_try0 = 1;
246                         amn->amn_tx_try1 = 1;
247                         amn->amn_tx_try2 = 1;
248                         amn->amn_tx_try3 = 1;
249                         if (--rate >= 0) {
250                                 rix = sc->sc_rixmap[
251                                                     ni->ni_rates.rs_rates[rate]&IEEE80211_RATE_VAL];
252                                 amn->amn_tx_rate1 = rt->info[rix].rateCode;
253                                 amn->amn_tx_rate1sp = amn->amn_tx_rate1 |
254                                         rt->info[rix].shortPreamble;
255                         } else {
256                                 amn->amn_tx_rate1 = amn->amn_tx_rate1sp = 0;
257                         }
258                         if (--rate >= 0) {
259                                 rix = sc->sc_rixmap[
260                                                     ni->ni_rates.rs_rates[rate]&IEEE80211_RATE_VAL];
261                                 amn->amn_tx_rate2 = rt->info[rix].rateCode;
262                                 amn->amn_tx_rate2sp = amn->amn_tx_rate2 |
263                                         rt->info[rix].shortPreamble;
264                         } else {
265                                 amn->amn_tx_rate2 = amn->amn_tx_rate2sp = 0;
266                         }
267                         if (rate > 0) {
268                                 /* NB: only do this if we didn't already do it above */
269                                 amn->amn_tx_rate3 = rt->info[0].rateCode;
270                                 amn->amn_tx_rate3sp =
271                                         amn->amn_tx_rate3 | rt->info[0].shortPreamble;
272                         } else {
273                                 amn->amn_tx_rate3 = amn->amn_tx_rate3sp = 0;
274                         }
275                 } else {
276                         amn->amn_tx_try0 = ATH_TXMAXTRY;
277                         /* theorically, these statements are useless because
278                          *  the code which uses them tests for an_tx_try0 == ATH_TXMAXTRY
279                          */
280                         amn->amn_tx_try1 = 0;
281                         amn->amn_tx_try2 = 0;
282                         amn->amn_tx_try3 = 0;
283                         amn->amn_tx_rate1 = amn->amn_tx_rate1sp = 0;
284                         amn->amn_tx_rate2 = amn->amn_tx_rate2sp = 0;
285                         amn->amn_tx_rate3 = amn->amn_tx_rate3sp = 0;
286                 }
287         }
288         node_reset(amn);
289
290         amn->amn_interval = ath_rateinterval;
291         if (vap->iv_opmode == IEEE80211_M_STA)
292                 amn->amn_interval /= 2;
293         amn->amn_interval = (amn->amn_interval * hz) / 1000;
294 }
295
296 /*
297  * Set the starting transmit rate for a node.
298  */
299 static void
300 ath_rate_ctl_start(struct ath_softc *sc, struct ieee80211_node *ni)
301 {
302 #define RATE(_ix)       (ni->ni_rates.rs_rates[(_ix)] & IEEE80211_RATE_VAL)
303         const struct ieee80211_txparam *tp = ni->ni_txparms;
304         int srate;
305
306         KASSERT(ni->ni_rates.rs_nrates > 0, ("no rates"));
307         if (tp == NULL || tp->ucastrate == IEEE80211_FIXED_RATE_NONE) {
308                 /*
309                  * No fixed rate is requested. For 11b start with
310                  * the highest negotiated rate; otherwise, for 11g
311                  * and 11a, we start "in the middle" at 24Mb or 36Mb.
312                  */
313                 srate = ni->ni_rates.rs_nrates - 1;
314                 if (sc->sc_curmode != IEEE80211_MODE_11B) {
315                         /*
316                          * Scan the negotiated rate set to find the
317                          * closest rate.
318                          */
319                         /* NB: the rate set is assumed sorted */
320                         for (; srate >= 0 && RATE(srate) > 72; srate--)
321                                 ;
322                 }
323         } else {
324                 /*
325                  * A fixed rate is to be used; ic_fixed_rate is the
326                  * IEEE code for this rate (sans basic bit).  Convert this
327                  * to the index into the negotiated rate set for
328                  * the node.  We know the rate is there because the
329                  * rate set is checked when the station associates.
330                  */
331                 /* NB: the rate set is assumed sorted */
332                 srate = ni->ni_rates.rs_nrates - 1;
333                 for (; srate >= 0 && RATE(srate) != tp->ucastrate; srate--)
334                         ;
335         }
336         /*
337          * The selected rate may not be available due to races
338          * and mode settings.  Also orphaned nodes created in
339          * adhoc mode may not have any rate set so this lookup
340          * can fail.  This is not fatal.
341          */
342         ath_rate_update(sc, ni, srate < 0 ? 0 : srate);
343 #undef RATE
344 }
345
346 /* 
347  * Examine and potentially adjust the transmit rate.
348  */
349 static void
350 ath_rate_ctl(void *arg, struct ieee80211_node *ni)
351 {
352         struct ath_softc *sc = arg;
353         struct amrr_node *amn = ATH_NODE_AMRR(ATH_NODE (ni));
354         int rix;
355
356 #define is_success(amn) \
357 (amn->amn_tx_try1_cnt  < (amn->amn_tx_try0_cnt/10))
358 #define is_enough(amn) \
359 (amn->amn_tx_try0_cnt > 10)
360 #define is_failure(amn) \
361 (amn->amn_tx_try1_cnt > (amn->amn_tx_try0_cnt/3))
362
363         rix = amn->amn_rix;
364   
365         IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_RATECTL, ni,
366             "cnt0: %d cnt1: %d cnt2: %d cnt3: %d -- threshold: %d",
367             amn->amn_tx_try0_cnt, amn->amn_tx_try1_cnt, amn->amn_tx_try2_cnt,
368             amn->amn_tx_try3_cnt, amn->amn_success_threshold);
369         if (is_success (amn) && is_enough (amn)) {
370                 amn->amn_success++;
371                 if (amn->amn_success == amn->amn_success_threshold &&
372                     rix + 1 < ni->ni_rates.rs_nrates) {
373                         amn->amn_recovery = 1;
374                         amn->amn_success = 0;
375                         rix++;
376                         IEEE80211_NOTE(ni->ni_vap, IEEE80211_MSG_RATECTL, ni,
377                             "increase rate to %d", rix);
378                 } else {
379                         amn->amn_recovery = 0;
380                 }
381         } else if (is_failure (amn)) {
382                 amn->amn_success = 0;
383                 if (rix > 0) {
384                         if (amn->amn_recovery) {
385                                 /* recovery failure. */
386                                 amn->amn_success_threshold *= 2;
387                                 amn->amn_success_threshold = min (amn->amn_success_threshold,
388                                                                   (u_int)ath_rate_max_success_threshold);
389                                 IEEE80211_NOTE(ni->ni_vap,
390                                     IEEE80211_MSG_RATECTL, ni,
391                                     "decrease rate recovery thr: %d",
392                                     amn->amn_success_threshold);
393                         } else {
394                                 /* simple failure. */
395                                 amn->amn_success_threshold = ath_rate_min_success_threshold;
396                                 IEEE80211_NOTE(ni->ni_vap,
397                                     IEEE80211_MSG_RATECTL, ni,
398                                     "decrease rate normal thr: %d",
399                                     amn->amn_success_threshold);
400                         }
401                         amn->amn_recovery = 0;
402                         rix--;
403                 } else {
404                         amn->amn_recovery = 0;
405                 }
406
407         }
408         if (is_enough (amn) || rix != amn->amn_rix) {
409                 /* reset counters. */
410                 amn->amn_tx_try0_cnt = 0;
411                 amn->amn_tx_try1_cnt = 0;
412                 amn->amn_tx_try2_cnt = 0;
413                 amn->amn_tx_try3_cnt = 0;
414                 amn->amn_tx_failure_cnt = 0;
415         }
416         if (rix != amn->amn_rix) {
417                 ath_rate_update(sc, ni, rix);
418         }
419 }
420
421 static int
422 ath_rate_fetch_node_stats(struct ath_softc *sc, struct ath_node *an,
423     struct ath_rateioctl *re)
424 {
425
426         return (EINVAL);
427 }
428
429 static void
430 ath_rate_sysctlattach(struct ath_softc *sc)
431 {
432         struct sysctl_ctx_list *ctx = device_get_sysctl_ctx(sc->sc_dev);
433         struct sysctl_oid *tree = device_get_sysctl_tree(sc->sc_dev);
434
435         SYSCTL_ADD_INT(ctx, SYSCTL_CHILDREN(tree), OID_AUTO,
436                 "rate_interval", CTLFLAG_RW, &ath_rateinterval, 0,
437                 "rate control: operation interval (ms)");
438         /* XXX bounds check values */
439         SYSCTL_ADD_INT(ctx, SYSCTL_CHILDREN(tree), OID_AUTO,
440                 "max_sucess_threshold", CTLFLAG_RW,
441                 &ath_rate_max_success_threshold, 0, "");
442         SYSCTL_ADD_INT(ctx, SYSCTL_CHILDREN(tree), OID_AUTO,
443                 "min_sucess_threshold", CTLFLAG_RW,
444                 &ath_rate_min_success_threshold, 0, "");
445 }
446
447 struct ath_ratectrl *
448 ath_rate_attach(struct ath_softc *sc)
449 {
450         struct amrr_softc *asc;
451
452         asc = malloc(sizeof(struct amrr_softc), M_DEVBUF, M_NOWAIT|M_ZERO);
453         if (asc == NULL)
454                 return NULL;
455         asc->arc.arc_space = sizeof(struct amrr_node);
456         ath_rate_sysctlattach(sc);
457
458         return &asc->arc;
459 }
460
461 void
462 ath_rate_detach(struct ath_ratectrl *arc)
463 {
464         struct amrr_softc *asc = (struct amrr_softc *) arc;
465
466         free(asc, M_DEVBUF);
467 }