63479f2b6fa6b5dfefed9f9d2037d7b52d230dbd
[dragonfly.git] / sys / dev / netif / iwn / if_iwn.c
1 /*-
2  * Copyright (c) 2007-2009
3  *      Damien Bergamini <damien.bergamini@free.fr>
4  * Copyright (c) 2008
5  *      Benjamin Close <benjsc@FreeBSD.org>
6  * Copyright (c) 2008 Sam Leffler, Errno Consulting
7  *
8  * Permission to use, copy, modify, and distribute this software for any
9  * purpose with or without fee is hereby granted, provided that the above
10  * copyright notice and this permission notice appear in all copies.
11  *
12  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
13  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
14  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
15  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
16  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
17  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
18  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
19  */
20
21 /*
22  * Driver for Intel WiFi Link 4965 and 1000/5000/6000 Series 802.11 network
23  * adapters.
24  */
25
26 /* $FreeBSD$ */
27
28 #include <sys/param.h>
29 #include <sys/sockio.h>
30 #include <sys/sysctl.h>
31 #include <sys/mbuf.h>
32 #include <sys/kernel.h>
33 #include <sys/socket.h>
34 #include <sys/systm.h>
35 #include <sys/malloc.h>
36 #include <sys/bus.h>
37 #include <sys/rman.h>
38 #include <sys/endian.h>
39 #include <sys/firmware.h>
40 #include <sys/limits.h>
41 #include <sys/module.h>
42 #include <sys/queue.h>
43 #include <sys/taskqueue.h>
44 #include <sys/libkern.h>
45
46 #include <sys/bus.h>
47 #include <sys/resource.h>
48 #include <machine/clock.h>
49
50 #include <bus/pci/pcireg.h>
51 #include <bus/pci/pcivar.h>
52
53 #include <net/bpf.h>
54 #include <net/if.h>
55 #include <net/if_arp.h>
56 #include <net/ifq_var.h>
57 #include <net/ethernet.h>
58 #include <net/if_dl.h>
59 #include <net/if_media.h>
60 #include <net/if_types.h>
61
62 #include <netinet/in.h>
63 #include <netinet/in_systm.h>
64 #include <netinet/in_var.h>
65 #include <netinet/if_ether.h>
66 #include <netinet/ip.h>
67
68 #include <netproto/802_11/ieee80211_var.h>
69 #include <netproto/802_11/ieee80211_radiotap.h>
70 #include <netproto/802_11/ieee80211_regdomain.h>
71 #include <netproto/802_11/ieee80211_ratectl.h>
72
73 #include "if_iwnreg.h"
74 #include "if_iwnvar.h"
75
76 static int      iwn_probe(device_t);
77 static int      iwn_attach(device_t);
78 static const struct iwn_hal *iwn_hal_attach(struct iwn_softc *);
79 static void     iwn_radiotap_attach(struct iwn_softc *);
80 static struct ieee80211vap *iwn_vap_create(struct ieee80211com *,
81                     const char name[IFNAMSIZ], int unit, int opmode,
82                     int flags, const uint8_t bssid[IEEE80211_ADDR_LEN],
83                     const uint8_t mac[IEEE80211_ADDR_LEN]);
84 static void     iwn_vap_delete(struct ieee80211vap *);
85 static int      iwn_cleanup(device_t);
86 static int      iwn_detach(device_t);
87 static int      iwn_nic_lock(struct iwn_softc *);
88 static int      iwn_eeprom_lock(struct iwn_softc *);
89 static int      iwn_init_otprom(struct iwn_softc *);
90 static int      iwn_read_prom_data(struct iwn_softc *, uint32_t, void *, int);
91 static void     iwn_dma_map_addr(void *, bus_dma_segment_t *, int, int);
92 static int      iwn_dma_contig_alloc(struct iwn_softc *, struct iwn_dma_info *,
93                     void **, bus_size_t, bus_size_t, int);
94 static void     iwn_dma_contig_free(struct iwn_dma_info *);
95 static int      iwn_alloc_sched(struct iwn_softc *);
96 static void     iwn_free_sched(struct iwn_softc *);
97 static int      iwn_alloc_kw(struct iwn_softc *);
98 static void     iwn_free_kw(struct iwn_softc *);
99 static int      iwn_alloc_ict(struct iwn_softc *);
100 static void     iwn_free_ict(struct iwn_softc *);
101 static int      iwn_alloc_fwmem(struct iwn_softc *);
102 static void     iwn_free_fwmem(struct iwn_softc *);
103 static int      iwn_alloc_rx_ring(struct iwn_softc *, struct iwn_rx_ring *);
104 static void     iwn_reset_rx_ring(struct iwn_softc *, struct iwn_rx_ring *);
105 static void     iwn_free_rx_ring(struct iwn_softc *, struct iwn_rx_ring *);
106 static int      iwn_alloc_tx_ring(struct iwn_softc *, struct iwn_tx_ring *,
107                     int);
108 static void     iwn_reset_tx_ring(struct iwn_softc *, struct iwn_tx_ring *);
109 static void     iwn_free_tx_ring(struct iwn_softc *, struct iwn_tx_ring *);
110 static void     iwn5000_ict_reset(struct iwn_softc *);
111 static int      iwn_read_eeprom(struct iwn_softc *,
112                     uint8_t macaddr[IEEE80211_ADDR_LEN]);
113 static void     iwn4965_read_eeprom(struct iwn_softc *);
114 static void     iwn4965_print_power_group(struct iwn_softc *, int);
115 static void     iwn5000_read_eeprom(struct iwn_softc *);
116 static uint32_t iwn_eeprom_channel_flags(struct iwn_eeprom_chan *);
117 static void     iwn_read_eeprom_band(struct iwn_softc *, int);
118 #if 0   /* HT */
119 static void     iwn_read_eeprom_ht40(struct iwn_softc *, int);
120 #endif
121 static void     iwn_read_eeprom_channels(struct iwn_softc *, int,
122                     uint32_t);
123 static void     iwn_read_eeprom_enhinfo(struct iwn_softc *);
124 static struct ieee80211_node *iwn_node_alloc(struct ieee80211vap *,
125                     const uint8_t mac[IEEE80211_ADDR_LEN]);
126 static void     iwn_newassoc(struct ieee80211_node *, int);
127 static int      iwn_media_change(struct ifnet *);
128 static int      iwn_newstate(struct ieee80211vap *, enum ieee80211_state, int);
129 static void     iwn_rx_phy(struct iwn_softc *, struct iwn_rx_desc *,
130                     struct iwn_rx_data *);
131 static void     iwn_timer_timeout(void *);
132 static void     iwn_calib_reset(struct iwn_softc *);
133 static void     iwn_rx_done(struct iwn_softc *, struct iwn_rx_desc *,
134                     struct iwn_rx_data *);
135 #if 0   /* HT */
136 static void     iwn_rx_compressed_ba(struct iwn_softc *, struct iwn_rx_desc *,
137                     struct iwn_rx_data *);
138 #endif
139 static void     iwn5000_rx_calib_results(struct iwn_softc *,
140                     struct iwn_rx_desc *, struct iwn_rx_data *);
141 static void     iwn_rx_statistics(struct iwn_softc *, struct iwn_rx_desc *,
142                     struct iwn_rx_data *);
143 static void     iwn4965_tx_done(struct iwn_softc *, struct iwn_rx_desc *,
144                     struct iwn_rx_data *);
145 static void     iwn5000_tx_done(struct iwn_softc *, struct iwn_rx_desc *,
146                     struct iwn_rx_data *);
147 static void     iwn_tx_done(struct iwn_softc *, struct iwn_rx_desc *, int,
148                     uint8_t);
149 static void     iwn_cmd_done(struct iwn_softc *, struct iwn_rx_desc *);
150 static void     iwn_notif_intr(struct iwn_softc *);
151 static void     iwn_wakeup_intr(struct iwn_softc *);
152 static void     iwn_rftoggle_intr(struct iwn_softc *);
153 static void     iwn_fatal_intr(struct iwn_softc *);
154 static void     iwn_intr(void *);
155 static void     iwn4965_update_sched(struct iwn_softc *, int, int, uint8_t,
156                     uint16_t);
157 static void     iwn5000_update_sched(struct iwn_softc *, int, int, uint8_t,
158                     uint16_t);
159 #ifdef notyet
160 static void     iwn5000_reset_sched(struct iwn_softc *, int, int);
161 #endif
162 static uint8_t  iwn_plcp_signal(int);
163 static int      iwn_tx_data(struct iwn_softc *, struct mbuf *,
164                     struct ieee80211_node *, struct iwn_tx_ring *);
165 static int      iwn_raw_xmit(struct ieee80211_node *, struct mbuf *,
166                     const struct ieee80211_bpf_params *);
167 static void     iwn_start(struct ifnet *);
168 static void     iwn_start_locked(struct ifnet *);
169 static void     iwn_watchdog(struct iwn_softc *sc);
170 static int      iwn_ioctl(struct ifnet *, u_long, caddr_t, struct ucred *);
171 static int      iwn_cmd(struct iwn_softc *, int, const void *, int, int);
172 static int      iwn4965_add_node(struct iwn_softc *, struct iwn_node_info *,
173                     int);
174 static int      iwn5000_add_node(struct iwn_softc *, struct iwn_node_info *,
175                     int);
176 static int      iwn_set_link_quality(struct iwn_softc *, uint8_t, int);
177 static int      iwn_add_broadcast_node(struct iwn_softc *, int);
178 static int      iwn_wme_update(struct ieee80211com *);
179 static void     iwn_update_mcast(struct ifnet *);
180 static void     iwn_set_led(struct iwn_softc *, uint8_t, uint8_t, uint8_t);
181 static int      iwn_set_critical_temp(struct iwn_softc *);
182 static int      iwn_set_timing(struct iwn_softc *, struct ieee80211_node *);
183 static void     iwn4965_power_calibration(struct iwn_softc *, int);
184 static int      iwn4965_set_txpower(struct iwn_softc *,
185                     struct ieee80211_channel *, int);
186 static int      iwn5000_set_txpower(struct iwn_softc *,
187                     struct ieee80211_channel *, int);
188 static int      iwn4965_get_rssi(struct iwn_softc *, struct iwn_rx_stat *);
189 static int      iwn5000_get_rssi(struct iwn_softc *, struct iwn_rx_stat *);
190 static int      iwn_get_noise(const struct iwn_rx_general_stats *);
191 static int      iwn4965_get_temperature(struct iwn_softc *);
192 static int      iwn5000_get_temperature(struct iwn_softc *);
193 static int      iwn_init_sensitivity(struct iwn_softc *);
194 static void     iwn_collect_noise(struct iwn_softc *,
195                     const struct iwn_rx_general_stats *);
196 static int      iwn4965_init_gains(struct iwn_softc *);
197 static int      iwn5000_init_gains(struct iwn_softc *);
198 static int      iwn4965_set_gains(struct iwn_softc *);
199 static int      iwn5000_set_gains(struct iwn_softc *);
200 static void     iwn_tune_sensitivity(struct iwn_softc *,
201                     const struct iwn_rx_stats *);
202 static int      iwn_send_sensitivity(struct iwn_softc *);
203 static int      iwn_set_pslevel(struct iwn_softc *, int, int, int);
204 static int      iwn_config(struct iwn_softc *);
205 static int      iwn_scan(struct iwn_softc *);
206 static int      iwn_auth(struct iwn_softc *, struct ieee80211vap *vap);
207 static int      iwn_run(struct iwn_softc *, struct ieee80211vap *vap);
208 #if 0   /* HT */
209 static int      iwn_ampdu_rx_start(struct ieee80211com *,
210                     struct ieee80211_node *, uint8_t);
211 static void     iwn_ampdu_rx_stop(struct ieee80211com *,
212                     struct ieee80211_node *, uint8_t);
213 static int      iwn_ampdu_tx_start(struct ieee80211com *,
214                     struct ieee80211_node *, uint8_t);
215 static void     iwn_ampdu_tx_stop(struct ieee80211com *,
216                     struct ieee80211_node *, uint8_t);
217 static void     iwn4965_ampdu_tx_start(struct iwn_softc *,
218                     struct ieee80211_node *, uint8_t, uint16_t);
219 static void     iwn4965_ampdu_tx_stop(struct iwn_softc *, uint8_t, uint16_t);
220 static void     iwn5000_ampdu_tx_start(struct iwn_softc *,
221                     struct ieee80211_node *, uint8_t, uint16_t);
222 static void     iwn5000_ampdu_tx_stop(struct iwn_softc *, uint8_t, uint16_t);
223 #endif
224 static int      iwn5000_query_calibration(struct iwn_softc *);
225 static int      iwn5000_send_calibration(struct iwn_softc *);
226 static int      iwn5000_send_wimax_coex(struct iwn_softc *);
227 static int      iwn4965_post_alive(struct iwn_softc *);
228 static int      iwn5000_post_alive(struct iwn_softc *);
229 static int      iwn4965_load_bootcode(struct iwn_softc *, const uint8_t *,
230                     int);
231 static int      iwn4965_load_firmware(struct iwn_softc *);
232 static int      iwn5000_load_firmware_section(struct iwn_softc *, uint32_t,
233                     const uint8_t *, int);
234 static int      iwn5000_load_firmware(struct iwn_softc *);
235 static int      iwn_read_firmware(struct iwn_softc *);
236 static int      iwn_clock_wait(struct iwn_softc *);
237 static int      iwn_apm_init(struct iwn_softc *);
238 static void     iwn_apm_stop_master(struct iwn_softc *);
239 static void     iwn_apm_stop(struct iwn_softc *);
240 static int      iwn4965_nic_config(struct iwn_softc *);
241 static int      iwn5000_nic_config(struct iwn_softc *);
242 static int      iwn_hw_prepare(struct iwn_softc *);
243 static int      iwn_hw_init(struct iwn_softc *);
244 static void     iwn_hw_stop(struct iwn_softc *);
245 static void     iwn_init_locked(struct iwn_softc *);
246 static void     iwn_init(void *);
247 static void     iwn_stop_locked(struct iwn_softc *);
248 static void     iwn_stop(struct iwn_softc *);
249 static void     iwn_scan_start(struct ieee80211com *);
250 static void     iwn_scan_end(struct ieee80211com *);
251 static void     iwn_set_channel(struct ieee80211com *);
252 static void     iwn_scan_curchan(struct ieee80211_scan_state *, unsigned long);
253 static void     iwn_scan_mindwell(struct ieee80211_scan_state *);
254 static struct iwn_eeprom_chan *iwn_find_eeprom_channel(struct iwn_softc *,
255                     struct ieee80211_channel *);
256 static int      iwn_setregdomain(struct ieee80211com *,
257                     struct ieee80211_regdomain *, int,
258                     struct ieee80211_channel []);
259 static void     iwn_hw_reset(void *, int);
260 static void     iwn_radio_on(void *, int);
261 static void     iwn_radio_off(void *, int);
262 static void     iwn_sysctlattach(struct iwn_softc *);
263 static int      iwn_shutdown(device_t);
264 static int      iwn_suspend(device_t);
265 static int      iwn_resume(device_t);
266
267 #define IWN_DEBUG
268 #ifdef IWN_DEBUG
269 enum {
270         IWN_DEBUG_XMIT          = 0x00000001,   /* basic xmit operation */
271         IWN_DEBUG_RECV          = 0x00000002,   /* basic recv operation */
272         IWN_DEBUG_STATE         = 0x00000004,   /* 802.11 state transitions */
273         IWN_DEBUG_TXPOW         = 0x00000008,   /* tx power processing */
274         IWN_DEBUG_RESET         = 0x00000010,   /* reset processing */
275         IWN_DEBUG_OPS           = 0x00000020,   /* iwn_ops processing */
276         IWN_DEBUG_BEACON        = 0x00000040,   /* beacon handling */
277         IWN_DEBUG_WATCHDOG      = 0x00000080,   /* watchdog timeout */
278         IWN_DEBUG_INTR          = 0x00000100,   /* ISR */
279         IWN_DEBUG_CALIBRATE     = 0x00000200,   /* periodic calibration */
280         IWN_DEBUG_NODE          = 0x00000400,   /* node management */
281         IWN_DEBUG_LED           = 0x00000800,   /* led management */
282         IWN_DEBUG_CMD           = 0x00001000,   /* cmd submission */
283         IWN_DEBUG_FATAL         = 0x80000000,   /* fatal errors */
284         IWN_DEBUG_ANY           = 0xffffffff
285 };
286
287 #define DPRINTF(sc, m, fmt, ...) do {                   \
288         if (sc->sc_debug & (m))                         \
289                 kprintf(fmt, __VA_ARGS__);              \
290 } while (0)
291
292 static const char *iwn_intr_str(uint8_t);
293 #else
294 #define DPRINTF(sc, m, fmt, ...) do { (void) sc; } while (0)
295 #endif
296
297 struct iwn_ident {
298         uint16_t        vendor;
299         uint16_t        device;
300         const char      *name;
301 };
302
303 static const struct iwn_ident iwn_ident_table [] = {
304         { 0x8086, 0x4229, "Intel(R) PRO/Wireless 4965BGN" },
305         { 0x8086, 0x422D, "Intel(R) PRO/Wireless 4965BGN" },
306         { 0x8086, 0x4230, "Intel(R) PRO/Wireless 4965BGN" },
307         { 0x8086, 0x4233, "Intel(R) PRO/Wireless 4965BGN" },
308         { 0x8086, 0x4232, "Intel(R) PRO/Wireless 5100" },
309         { 0x8086, 0x4237, "Intel(R) PRO/Wireless 5100" },
310         { 0x8086, 0x423C, "Intel(R) PRO/Wireless 5150" },
311         { 0x8086, 0x423D, "Intel(R) PRO/Wireless 5150" },
312         { 0x8086, 0x4235, "Intel(R) PRO/Wireless 5300" },
313         { 0x8086, 0x4236, "Intel(R) PRO/Wireless 5300" },
314         { 0x8086, 0x4236, "Intel(R) PRO/Wireless 5350" },
315         { 0x8086, 0x423A, "Intel(R) PRO/Wireless 5350" },
316         { 0x8086, 0x423B, "Intel(R) PRO/Wireless 5350" },
317         { 0x8086, 0x0083, "Intel(R) PRO/Wireless 1000" },
318         { 0x8086, 0x0084, "Intel(R) PRO/Wireless 1000" },
319         { 0x8086, 0x008D, "Intel(R) PRO/Wireless 6000" },
320         { 0x8086, 0x008E, "Intel(R) PRO/Wireless 6000" },
321         { 0x8086, 0x4238, "Intel(R) PRO/Wireless 6000" },
322         { 0x8086, 0x4239, "Intel(R) PRO/Wireless 6000" },
323         { 0x8086, 0x422B, "Intel(R) PRO/Wireless 6000" },
324         { 0x8086, 0x422C, "Intel(R) PRO/Wireless 6000" },
325         { 0x8086, 0x0086, "Intel(R) PRO/Wireless 6050" },
326         { 0x8086, 0x0087, "Intel(R) PRO/Wireless 6050" },
327         { 0, 0, NULL }
328 };
329
330 static const struct iwn_hal iwn4965_hal = {
331         iwn4965_load_firmware,
332         iwn4965_read_eeprom,
333         iwn4965_post_alive,
334         iwn4965_nic_config,
335         iwn4965_update_sched,
336         iwn4965_get_temperature,
337         iwn4965_get_rssi,
338         iwn4965_set_txpower,
339         iwn4965_init_gains,
340         iwn4965_set_gains,
341         iwn4965_add_node,
342         iwn4965_tx_done,
343 #if 0   /* HT */
344         iwn4965_ampdu_tx_start,
345         iwn4965_ampdu_tx_stop,
346 #endif
347         IWN4965_NTXQUEUES,
348         IWN4965_NDMACHNLS,
349         IWN4965_ID_BROADCAST,
350         IWN4965_RXONSZ,
351         IWN4965_SCHEDSZ,
352         IWN4965_FW_TEXT_MAXSZ,
353         IWN4965_FW_DATA_MAXSZ,
354         IWN4965_FWSZ,
355         IWN4965_SCHED_TXFACT
356 };
357
358 static const struct iwn_hal iwn5000_hal = {
359         iwn5000_load_firmware,
360         iwn5000_read_eeprom,
361         iwn5000_post_alive,
362         iwn5000_nic_config,
363         iwn5000_update_sched,
364         iwn5000_get_temperature,
365         iwn5000_get_rssi,
366         iwn5000_set_txpower,
367         iwn5000_init_gains,
368         iwn5000_set_gains,
369         iwn5000_add_node,
370         iwn5000_tx_done,
371 #if 0   /* HT */
372         iwn5000_ampdu_tx_start,
373         iwn5000_ampdu_tx_stop,
374 #endif
375         IWN5000_NTXQUEUES,
376         IWN5000_NDMACHNLS,
377         IWN5000_ID_BROADCAST,
378         IWN5000_RXONSZ,
379         IWN5000_SCHEDSZ,
380         IWN5000_FW_TEXT_MAXSZ,
381         IWN5000_FW_DATA_MAXSZ,
382         IWN5000_FWSZ,
383         IWN5000_SCHED_TXFACT
384 };
385
386 static int
387 iwn_probe(device_t dev)
388 {
389         const struct iwn_ident *ident;
390
391         for (ident = iwn_ident_table; ident->name != NULL; ident++) {
392                 if (pci_get_vendor(dev) == ident->vendor &&
393                     pci_get_device(dev) == ident->device) {
394                         device_set_desc(dev, ident->name);
395                         return 0;
396                 }
397         }
398         return ENXIO;
399 }
400
401 static int
402 iwn_attach(device_t dev)
403 {
404         struct iwn_softc *sc = (struct iwn_softc *)device_get_softc(dev);
405         struct ieee80211com *ic;
406         struct ifnet *ifp;
407         const struct iwn_hal *hal;
408         uint32_t tmp;
409         int i, error, result;
410         uint8_t macaddr[IEEE80211_ADDR_LEN];
411
412         sc->sc_dev = dev;
413         sc->sc_dmat = NULL;
414
415         if (bus_dma_tag_create(sc->sc_dmat,
416                         1, 0,
417                         BUS_SPACE_MAXADDR_32BIT,
418                         BUS_SPACE_MAXADDR,
419                         NULL, NULL,
420                         BUS_SPACE_MAXSIZE,
421                         IWN_MAX_SCATTER,
422                         BUS_SPACE_MAXSIZE,
423                         BUS_DMA_ALLOCNOW,
424                         &sc->sc_dmat)) {
425                 device_printf(dev, "cannot allocate DMA tag\n");
426                 error = ENOMEM;
427                 goto fail;
428         }
429
430
431
432         /* prepare sysctl tree for use in sub modules */
433         sysctl_ctx_init(&sc->sc_sysctl_ctx);
434         sc->sc_sysctl_tree = SYSCTL_ADD_NODE(&sc->sc_sysctl_ctx,
435                 SYSCTL_STATIC_CHILDREN(_hw),
436                 OID_AUTO,
437                 device_get_nameunit(sc->sc_dev),
438                 CTLFLAG_RD, 0, "");
439
440         /*
441          * Get the offset of the PCI Express Capability Structure in PCI
442          * Configuration Space.
443          */
444         error = pci_find_extcap(dev, PCIY_EXPRESS, &sc->sc_cap_off);
445         if (error != 0) {
446                 device_printf(dev, "PCIe capability structure not found!\n");
447                 return error;
448         }
449
450         /* Clear device-specific "PCI retry timeout" register (41h). */
451         pci_write_config(dev, 0x41, 0, 1);
452
453         /* Hardware bug workaround. */
454         tmp = pci_read_config(dev, PCIR_COMMAND, 1);
455         if (tmp & PCIM_CMD_INTxDIS) {
456                 DPRINTF(sc, IWN_DEBUG_RESET, "%s: PCIe INTx Disable set\n",
457                     __func__);
458                 tmp &= ~PCIM_CMD_INTxDIS;
459                 pci_write_config(dev, PCIR_COMMAND, tmp, 1);
460         }
461
462         /* Enable bus-mastering. */
463         pci_enable_busmaster(dev);
464
465         sc->mem_rid = PCIR_BAR(0);
466         sc->mem = bus_alloc_resource_any(dev, SYS_RES_MEMORY, &sc->mem_rid,
467             RF_ACTIVE);
468         if (sc->mem == NULL ) {
469                 device_printf(dev, "could not allocate memory resources\n");
470                 error = ENOMEM;
471                 return error;
472         }
473
474         sc->sc_st = rman_get_bustag(sc->mem);
475         sc->sc_sh = rman_get_bushandle(sc->mem);
476         sc->irq_rid = 0;
477         if ((result = pci_msi_count(dev)) == 1 &&
478             pci_alloc_msi(dev, &result) == 0)
479                 sc->irq_rid = 1;
480         sc->irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &sc->irq_rid,
481             RF_ACTIVE | RF_SHAREABLE);
482         if (sc->irq == NULL) {
483                 device_printf(dev, "could not allocate interrupt resource\n");
484                 error = ENOMEM;
485                 goto fail;
486         }
487
488         IWN_LOCK_INIT(sc);
489         callout_init(&sc->sc_timer_to);
490         TASK_INIT(&sc->sc_reinit_task, 0, iwn_hw_reset, sc );
491         TASK_INIT(&sc->sc_radioon_task, 0, iwn_radio_on, sc );
492         TASK_INIT(&sc->sc_radiooff_task, 0, iwn_radio_off, sc );
493
494         /* Attach Hardware Abstraction Layer. */
495         hal = iwn_hal_attach(sc);
496         if (hal == NULL) {
497                 error = ENXIO;  /* XXX: Wrong error code? */
498                 goto fail;
499         }
500
501         error = iwn_hw_prepare(sc);
502         if (error != 0) {
503                 device_printf(dev, "hardware not ready, error %d\n", error);
504                 goto fail;
505         }
506
507         /* Allocate DMA memory for firmware transfers. */
508         error = iwn_alloc_fwmem(sc);
509         if (error != 0) {
510                 device_printf(dev,
511                     "could not allocate memory for firmware, error %d\n",
512                     error);
513                 goto fail;
514         }
515
516         /* Allocate "Keep Warm" page. */
517         error = iwn_alloc_kw(sc);
518         if (error != 0) {
519                 device_printf(dev,
520                     "could not allocate \"Keep Warm\" page, error %d\n", error);
521                 goto fail;
522         }
523
524         /* Allocate ICT table for 5000 Series. */
525         if (sc->hw_type != IWN_HW_REV_TYPE_4965 &&
526             (error = iwn_alloc_ict(sc)) != 0) {
527                 device_printf(dev,
528                     "%s: could not allocate ICT table, error %d\n",
529                     __func__, error);
530                 goto fail;
531         }
532
533         /* Allocate TX scheduler "rings". */
534         error = iwn_alloc_sched(sc);
535         if (error != 0) {
536                 device_printf(dev,
537                     "could not allocate TX scheduler rings, error %d\n",
538                     error);
539                 goto fail;
540         }
541
542         /* Allocate TX rings (16 on 4965AGN, 20 on 5000). */
543         for (i = 0; i < hal->ntxqs; i++) {
544                 error = iwn_alloc_tx_ring(sc, &sc->txq[i], i);
545                 if (error != 0) {
546                         device_printf(dev,
547                             "could not allocate Tx ring %d, error %d\n",
548                             i, error);
549                         goto fail;
550                 }
551         }
552
553         /* Allocate RX ring. */
554         error = iwn_alloc_rx_ring(sc, &sc->rxq);
555         if (error != 0 ){
556                 device_printf(dev,
557                     "could not allocate Rx ring, error %d\n", error);
558                 goto fail;
559         }
560
561         /* Clear pending interrupts. */
562         IWN_WRITE(sc, IWN_INT, 0xffffffff);
563
564         /* Count the number of available chains. */
565         sc->ntxchains =
566             ((sc->txchainmask >> 2) & 1) +
567             ((sc->txchainmask >> 1) & 1) +
568             ((sc->txchainmask >> 0) & 1);
569         sc->nrxchains =
570             ((sc->rxchainmask >> 2) & 1) +
571             ((sc->rxchainmask >> 1) & 1) +
572             ((sc->rxchainmask >> 0) & 1);
573
574         ifp = sc->sc_ifp = if_alloc(IFT_IEEE80211);
575         if (ifp == NULL) {
576                 device_printf(dev, "can not allocate ifnet structure\n");
577                 goto fail;
578         }
579         ic = ifp->if_l2com;
580
581         ic->ic_ifp = ifp;
582         ic->ic_phytype = IEEE80211_T_OFDM;      /* not only, but not used */
583         ic->ic_opmode = IEEE80211_M_STA;        /* default to BSS mode */
584
585         /* Set device capabilities. */
586         ic->ic_caps =
587                   IEEE80211_C_STA               /* station mode supported */
588                 | IEEE80211_C_MONITOR           /* monitor mode supported */
589                 | IEEE80211_C_TXPMGT            /* tx power management */
590                 | IEEE80211_C_SHSLOT            /* short slot time supported */
591                 | IEEE80211_C_WPA
592                 | IEEE80211_C_SHPREAMBLE        /* short preamble supported */
593                 | IEEE80211_C_BGSCAN            /* background scanning */
594 #if 0
595                 | IEEE80211_C_IBSS              /* ibss/adhoc mode */
596 #endif
597                 | IEEE80211_C_WME               /* WME */
598                 ;
599 #if 0   /* HT */
600         /* XXX disable until HT channel setup works */
601         ic->ic_htcaps =
602                   IEEE80211_HTCAP_SMPS_ENA      /* SM PS mode enabled */
603                 | IEEE80211_HTCAP_CHWIDTH40     /* 40MHz channel width */
604                 | IEEE80211_HTCAP_SHORTGI20     /* short GI in 20MHz */
605                 | IEEE80211_HTCAP_SHORTGI40     /* short GI in 40MHz */
606                 | IEEE80211_HTCAP_RXSTBC_2STREAM/* 1-2 spatial streams */
607                 | IEEE80211_HTCAP_MAXAMSDU_3839 /* max A-MSDU length */
608                 /* s/w capabilities */
609                 | IEEE80211_HTC_HT              /* HT operation */
610                 | IEEE80211_HTC_AMPDU           /* tx A-MPDU */
611                 | IEEE80211_HTC_AMSDU           /* tx A-MSDU */
612                 ;
613
614         /* Set HT capabilities. */
615         ic->ic_htcaps =
616 #if IWN_RBUF_SIZE == 8192
617             IEEE80211_HTCAP_AMSDU7935 |
618 #endif
619             IEEE80211_HTCAP_CBW20_40 |
620             IEEE80211_HTCAP_SGI20 |
621             IEEE80211_HTCAP_SGI40;
622         if (sc->hw_type != IWN_HW_REV_TYPE_4965)
623                 ic->ic_htcaps |= IEEE80211_HTCAP_GF;
624         if (sc->hw_type == IWN_HW_REV_TYPE_6050)
625                 ic->ic_htcaps |= IEEE80211_HTCAP_SMPS_DYN;
626         else
627                 ic->ic_htcaps |= IEEE80211_HTCAP_SMPS_DIS;
628 #endif
629
630         /* Read MAC address, channels, etc from EEPROM. */
631         error = iwn_read_eeprom(sc, macaddr);
632         if (error != 0) {
633                 device_printf(dev, "could not read EEPROM, error %d\n",
634                     error);
635                 goto fail;
636         }
637
638         device_printf(sc->sc_dev, "MIMO %dT%dR, %.4s, address %6D\n",
639             sc->ntxchains, sc->nrxchains, sc->eeprom_domain,
640             macaddr, ":");
641
642 #if 0   /* HT */
643         /* Set supported HT rates. */
644         ic->ic_sup_mcs[0] = 0xff;
645         if (sc->nrxchains > 1)
646                 ic->ic_sup_mcs[1] = 0xff;
647         if (sc->nrxchains > 2)
648                 ic->ic_sup_mcs[2] = 0xff;
649 #endif
650
651         if_initname(ifp, device_get_name(dev), device_get_unit(dev));
652         ifp->if_softc = sc;
653         ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
654         ifp->if_init = iwn_init;
655         ifp->if_ioctl = iwn_ioctl;
656         ifp->if_start = iwn_start;
657         ifq_set_maxlen(&ifp->if_snd, IFQ_MAXLEN);
658         ifq_set_ready(&ifp->if_snd);
659
660         ieee80211_ifattach(ic, macaddr);
661         ic->ic_vap_create = iwn_vap_create;
662         ic->ic_vap_delete = iwn_vap_delete;
663         ic->ic_raw_xmit = iwn_raw_xmit;
664         ic->ic_node_alloc = iwn_node_alloc;
665         ic->ic_newassoc = iwn_newassoc;
666         ic->ic_wme.wme_update = iwn_wme_update;
667         ic->ic_update_mcast = iwn_update_mcast;
668         ic->ic_scan_start = iwn_scan_start;
669         ic->ic_scan_end = iwn_scan_end;
670         ic->ic_set_channel = iwn_set_channel;
671         ic->ic_scan_curchan = iwn_scan_curchan;
672         ic->ic_scan_mindwell = iwn_scan_mindwell;
673         ic->ic_setregdomain = iwn_setregdomain;
674 #if 0   /* HT */
675         ic->ic_ampdu_rx_start = iwn_ampdu_rx_start;
676         ic->ic_ampdu_rx_stop = iwn_ampdu_rx_stop;
677         ic->ic_ampdu_tx_start = iwn_ampdu_tx_start;
678         ic->ic_ampdu_tx_stop = iwn_ampdu_tx_stop;
679 #endif
680
681         iwn_radiotap_attach(sc);
682         iwn_sysctlattach(sc);
683
684         /*
685          * Hook our interrupt after all initialization is complete.
686          */
687         error = bus_setup_intr(dev, sc->irq, INTR_MPSAFE,
688             iwn_intr, sc, &sc->sc_ih, ifp->if_serializer);
689         if (error != 0) {
690                 device_printf(dev, "could not set up interrupt, error %d\n",
691                     error);
692                 goto fail;
693         }
694
695         ieee80211_announce(ic);
696         return 0;
697 fail:
698         iwn_cleanup(dev);
699         return error;
700 }
701
702 static const struct iwn_hal *
703 iwn_hal_attach(struct iwn_softc *sc)
704 {
705         sc->hw_type = (IWN_READ(sc, IWN_HW_REV) >> 4) & 0xf;
706
707         switch (sc->hw_type) {
708         case IWN_HW_REV_TYPE_4965:
709                 sc->sc_hal = &iwn4965_hal;
710                 sc->limits = &iwn4965_sensitivity_limits;
711                 sc->fwname = "iwn4965fw";
712                 sc->txchainmask = IWN_ANT_AB;
713                 sc->rxchainmask = IWN_ANT_ABC;
714                 break;
715         case IWN_HW_REV_TYPE_5100:
716                 sc->sc_hal = &iwn5000_hal;
717                 sc->limits = &iwn5000_sensitivity_limits;
718                 sc->fwname = "iwn5000fw";
719                 sc->txchainmask = IWN_ANT_B;
720                 sc->rxchainmask = IWN_ANT_AB;
721                 break;
722         case IWN_HW_REV_TYPE_5150:
723                 sc->sc_hal = &iwn5000_hal;
724                 sc->limits = &iwn5150_sensitivity_limits;
725                 sc->fwname = "iwn5150fw";
726                 sc->txchainmask = IWN_ANT_A;
727                 sc->rxchainmask = IWN_ANT_AB;
728                 break;
729         case IWN_HW_REV_TYPE_5300:
730         case IWN_HW_REV_TYPE_5350:
731                 sc->sc_hal = &iwn5000_hal;
732                 sc->limits = &iwn5000_sensitivity_limits;
733                 sc->fwname = "iwn5000fw";
734                 sc->txchainmask = IWN_ANT_ABC;
735                 sc->rxchainmask = IWN_ANT_ABC;
736                 break;
737         case IWN_HW_REV_TYPE_1000:
738                 sc->sc_hal = &iwn5000_hal;
739                 sc->limits = &iwn1000_sensitivity_limits;
740                 sc->fwname = "iwn1000fw";
741                 sc->txchainmask = IWN_ANT_A;
742                 sc->rxchainmask = IWN_ANT_AB;
743                 break;
744         case IWN_HW_REV_TYPE_6000:
745                 sc->sc_hal = &iwn5000_hal;
746                 sc->limits = &iwn6000_sensitivity_limits;
747                 sc->fwname = "iwn6000fw";
748                 switch (pci_get_device(sc->sc_dev)) {
749                 case 0x422C:
750                 case 0x4239:
751                         sc->sc_flags |= IWN_FLAG_INTERNAL_PA;
752                         sc->txchainmask = IWN_ANT_BC;
753                         sc->rxchainmask = IWN_ANT_BC;
754                         break;
755                 default:
756                         sc->txchainmask = IWN_ANT_ABC;
757                         sc->rxchainmask = IWN_ANT_ABC;
758                         break;
759                 }
760                 break;
761         case IWN_HW_REV_TYPE_6050:
762                 sc->sc_hal = &iwn5000_hal;
763                 sc->limits = &iwn6000_sensitivity_limits;
764                 sc->fwname = "iwn6000fw";
765                 sc->txchainmask = IWN_ANT_AB;
766                 sc->rxchainmask = IWN_ANT_AB;
767                 break;
768         default:
769                 device_printf(sc->sc_dev, "adapter type %d not supported\n",
770                     sc->hw_type);
771                 return NULL;
772         }
773         return sc->sc_hal;
774 }
775
776 /*
777  * Attach the interface to 802.11 radiotap.
778  */
779 static void
780 iwn_radiotap_attach(struct iwn_softc *sc)
781 {
782         struct ifnet *ifp = sc->sc_ifp;
783         struct ieee80211com *ic = ifp->if_l2com;
784
785         ieee80211_radiotap_attach(ic,
786             &sc->sc_txtap.wt_ihdr, sizeof(sc->sc_txtap),
787                 IWN_TX_RADIOTAP_PRESENT,
788             &sc->sc_rxtap.wr_ihdr, sizeof(sc->sc_rxtap),
789                 IWN_RX_RADIOTAP_PRESENT);
790 }
791
792 static struct ieee80211vap *
793 iwn_vap_create(struct ieee80211com *ic,
794         const char name[IFNAMSIZ], int unit, int opmode, int flags,
795         const uint8_t bssid[IEEE80211_ADDR_LEN],
796         const uint8_t mac[IEEE80211_ADDR_LEN])
797 {
798         struct iwn_vap *ivp;
799         struct ieee80211vap *vap;
800
801         if (!TAILQ_EMPTY(&ic->ic_vaps))         /* only one at a time */
802                 return NULL;
803         ivp = (struct iwn_vap *) kmalloc(sizeof(struct iwn_vap),
804             M_80211_VAP, M_INTWAIT | M_ZERO);
805         if (ivp == NULL)
806                 return NULL;
807         vap = &ivp->iv_vap;
808         ieee80211_vap_setup(ic, vap, name, unit, opmode, flags, bssid, mac);
809         vap->iv_bmissthreshold = 10;            /* override default */
810         /* Override with driver methods. */
811         ivp->iv_newstate = vap->iv_newstate;
812         vap->iv_newstate = iwn_newstate;
813
814         ieee80211_ratectl_init(vap);
815         /* Complete setup. */
816         ieee80211_vap_attach(vap, iwn_media_change, ieee80211_media_status);
817         ic->ic_opmode = opmode;
818         return vap;
819 }
820
821 static void
822 iwn_vap_delete(struct ieee80211vap *vap)
823 {
824         struct iwn_vap *ivp = IWN_VAP(vap);
825
826         ieee80211_ratectl_deinit(vap);
827         ieee80211_vap_detach(vap);
828         kfree(ivp, M_80211_VAP);
829 }
830
831 static int
832 iwn_cleanup(device_t dev)
833 {
834         struct iwn_softc *sc = device_get_softc(dev);
835         struct ifnet *ifp = sc->sc_ifp;
836         struct ieee80211com *ic;
837         int i;
838
839         if (ifp != NULL) {
840                 ic = ifp->if_l2com;
841
842                 ieee80211_draintask(ic, &sc->sc_reinit_task);
843                 ieee80211_draintask(ic, &sc->sc_radioon_task);
844                 ieee80211_draintask(ic, &sc->sc_radiooff_task);
845
846                 iwn_stop(sc);
847                 callout_stop(&sc->sc_timer_to);
848                 ieee80211_ifdetach(ic);
849         }
850
851         /* Free DMA resources. */
852         iwn_free_rx_ring(sc, &sc->rxq);
853         if (sc->sc_hal != NULL)
854                 for (i = 0; i < sc->sc_hal->ntxqs; i++)
855                         iwn_free_tx_ring(sc, &sc->txq[i]);
856         iwn_free_sched(sc);
857         iwn_free_kw(sc);
858         if (sc->ict != NULL)
859                 iwn_free_ict(sc);
860         iwn_free_fwmem(sc);
861
862         if (sc->irq != NULL) {
863                 bus_teardown_intr(dev, sc->irq, sc->sc_ih);
864                 bus_release_resource(dev, SYS_RES_IRQ, sc->irq_rid, sc->irq);
865                 if (sc->irq_rid == 1)
866                         pci_release_msi(dev);
867         }
868
869         if (sc->mem != NULL)
870                 bus_release_resource(dev, SYS_RES_MEMORY, sc->mem_rid, sc->mem);
871
872         if (ifp != NULL)
873                 if_free(ifp);
874
875         IWN_LOCK_DESTROY(sc);
876         return 0;
877 }
878
879 static int
880 iwn_detach(device_t dev)
881 {
882         struct iwn_softc *sc = (struct iwn_softc *)device_get_softc(dev);
883
884         iwn_cleanup(dev);
885         bus_dma_tag_destroy(sc->sc_dmat);
886         return 0;
887 }
888
889 static int
890 iwn_nic_lock(struct iwn_softc *sc)
891 {
892         int ntries;
893
894         /* Request exclusive access to NIC. */
895         IWN_SETBITS(sc, IWN_GP_CNTRL, IWN_GP_CNTRL_MAC_ACCESS_REQ);
896
897         /* Spin until we actually get the lock. */
898         for (ntries = 0; ntries < 1000; ntries++) {
899                 if ((IWN_READ(sc, IWN_GP_CNTRL) &
900                     (IWN_GP_CNTRL_MAC_ACCESS_ENA | IWN_GP_CNTRL_SLEEP)) ==
901                     IWN_GP_CNTRL_MAC_ACCESS_ENA)
902                         return 0;
903                 DELAY(10);
904         }
905         return ETIMEDOUT;
906 }
907
908 static __inline void
909 iwn_nic_unlock(struct iwn_softc *sc)
910 {
911         IWN_CLRBITS(sc, IWN_GP_CNTRL, IWN_GP_CNTRL_MAC_ACCESS_REQ);
912 }
913
914 static __inline uint32_t
915 iwn_prph_read(struct iwn_softc *sc, uint32_t addr)
916 {
917         IWN_WRITE(sc, IWN_PRPH_RADDR, IWN_PRPH_DWORD | addr);
918         IWN_BARRIER_READ_WRITE(sc);
919         return IWN_READ(sc, IWN_PRPH_RDATA);
920 }
921
922 static __inline void
923 iwn_prph_write(struct iwn_softc *sc, uint32_t addr, uint32_t data)
924 {
925         IWN_WRITE(sc, IWN_PRPH_WADDR, IWN_PRPH_DWORD | addr);
926         IWN_BARRIER_WRITE(sc);
927         IWN_WRITE(sc, IWN_PRPH_WDATA, data);
928 }
929
930 static __inline void
931 iwn_prph_setbits(struct iwn_softc *sc, uint32_t addr, uint32_t mask)
932 {
933         iwn_prph_write(sc, addr, iwn_prph_read(sc, addr) | mask);
934 }
935
936 static __inline void
937 iwn_prph_clrbits(struct iwn_softc *sc, uint32_t addr, uint32_t mask)
938 {
939         iwn_prph_write(sc, addr, iwn_prph_read(sc, addr) & ~mask);
940 }
941
942 static __inline void
943 iwn_prph_write_region_4(struct iwn_softc *sc, uint32_t addr,
944     const uint32_t *data, int count)
945 {
946         for (; count > 0; count--, data++, addr += 4)
947                 iwn_prph_write(sc, addr, *data);
948 }
949
950 static __inline uint32_t
951 iwn_mem_read(struct iwn_softc *sc, uint32_t addr)
952 {
953         IWN_WRITE(sc, IWN_MEM_RADDR, addr);
954         IWN_BARRIER_READ_WRITE(sc);
955         return IWN_READ(sc, IWN_MEM_RDATA);
956 }
957
958 static __inline void
959 iwn_mem_write(struct iwn_softc *sc, uint32_t addr, uint32_t data)
960 {
961         IWN_WRITE(sc, IWN_MEM_WADDR, addr);
962         IWN_BARRIER_WRITE(sc);
963         IWN_WRITE(sc, IWN_MEM_WDATA, data);
964 }
965
966 static __inline void
967 iwn_mem_write_2(struct iwn_softc *sc, uint32_t addr, uint16_t data)
968 {
969         uint32_t tmp;
970
971         tmp = iwn_mem_read(sc, addr & ~3);
972         if (addr & 3)
973                 tmp = (tmp & 0x0000ffff) | data << 16;
974         else
975                 tmp = (tmp & 0xffff0000) | data;
976         iwn_mem_write(sc, addr & ~3, tmp);
977 }
978
979 static __inline void
980 iwn_mem_read_region_4(struct iwn_softc *sc, uint32_t addr, uint32_t *data,
981     int count)
982 {
983         for (; count > 0; count--, addr += 4)
984                 *data++ = iwn_mem_read(sc, addr);
985 }
986
987 static __inline void
988 iwn_mem_set_region_4(struct iwn_softc *sc, uint32_t addr, uint32_t val,
989     int count)
990 {
991         for (; count > 0; count--, addr += 4)
992                 iwn_mem_write(sc, addr, val);
993 }
994
995 static int
996 iwn_eeprom_lock(struct iwn_softc *sc)
997 {
998         int i, ntries;
999
1000         for (i = 0; i < 100; i++) {
1001                 /* Request exclusive access to EEPROM. */
1002                 IWN_SETBITS(sc, IWN_HW_IF_CONFIG,
1003                     IWN_HW_IF_CONFIG_EEPROM_LOCKED);
1004
1005                 /* Spin until we actually get the lock. */
1006                 for (ntries = 0; ntries < 100; ntries++) {
1007                         if (IWN_READ(sc, IWN_HW_IF_CONFIG) &
1008                             IWN_HW_IF_CONFIG_EEPROM_LOCKED)
1009                                 return 0;
1010                         DELAY(10);
1011                 }
1012         }
1013         return ETIMEDOUT;
1014 }
1015
1016 static __inline void
1017 iwn_eeprom_unlock(struct iwn_softc *sc)
1018 {
1019         IWN_CLRBITS(sc, IWN_HW_IF_CONFIG, IWN_HW_IF_CONFIG_EEPROM_LOCKED);
1020 }
1021
1022 /*
1023  * Initialize access by host to One Time Programmable ROM.
1024  * NB: This kind of ROM can be found on 1000 or 6000 Series only.
1025  */
1026 static int
1027 iwn_init_otprom(struct iwn_softc *sc)
1028 {
1029         uint16_t prev, base, next;
1030         int count, error;
1031
1032         /* Wait for clock stabilization before accessing prph. */
1033         error = iwn_clock_wait(sc);
1034         if (error != 0)
1035                 return error;
1036
1037         error = iwn_nic_lock(sc);
1038         if (error != 0)
1039                 return error;
1040         iwn_prph_setbits(sc, IWN_APMG_PS, IWN_APMG_PS_RESET_REQ);
1041         DELAY(5);
1042         iwn_prph_clrbits(sc, IWN_APMG_PS, IWN_APMG_PS_RESET_REQ);
1043         iwn_nic_unlock(sc);
1044
1045         /* Set auto clock gate disable bit for HW with OTP shadow RAM. */
1046         if (sc->hw_type != IWN_HW_REV_TYPE_1000) {
1047                 IWN_SETBITS(sc, IWN_DBG_LINK_PWR_MGMT,
1048                     IWN_RESET_LINK_PWR_MGMT_DIS);
1049         }
1050         IWN_CLRBITS(sc, IWN_EEPROM_GP, IWN_EEPROM_GP_IF_OWNER);
1051         /* Clear ECC status. */
1052         IWN_SETBITS(sc, IWN_OTP_GP,
1053             IWN_OTP_GP_ECC_CORR_STTS | IWN_OTP_GP_ECC_UNCORR_STTS);
1054
1055         /*
1056          * Find the block before last block (contains the EEPROM image)
1057          * for HW without OTP shadow RAM.
1058          */
1059         if (sc->hw_type == IWN_HW_REV_TYPE_1000) {
1060                 /* Switch to absolute addressing mode. */
1061                 IWN_CLRBITS(sc, IWN_OTP_GP, IWN_OTP_GP_RELATIVE_ACCESS);
1062                 base = prev = 0;
1063                 for (count = 0; count < IWN1000_OTP_NBLOCKS; count++) {
1064                         error = iwn_read_prom_data(sc, base, &next, 2);
1065                         if (error != 0)
1066                                 return error;
1067                         if (next == 0)  /* End of linked-list. */
1068                                 break;
1069                         prev = base;
1070                         base = le16toh(next);
1071                 }
1072                 if (count == 0 || count == IWN1000_OTP_NBLOCKS)
1073                         return EIO;
1074                 /* Skip "next" word. */
1075                 sc->prom_base = prev + 1;
1076         }
1077         return 0;
1078 }
1079
1080 static int
1081 iwn_read_prom_data(struct iwn_softc *sc, uint32_t addr, void *data, int count)
1082 {
1083         uint32_t val, tmp;
1084         int ntries;
1085         uint8_t *out = data;
1086
1087         addr += sc->prom_base;
1088         for (; count > 0; count -= 2, addr++) {
1089                 IWN_WRITE(sc, IWN_EEPROM, addr << 2);
1090                 for (ntries = 0; ntries < 10; ntries++) {
1091                         val = IWN_READ(sc, IWN_EEPROM);
1092                         if (val & IWN_EEPROM_READ_VALID)
1093                                 break;
1094                         DELAY(5);
1095                 }
1096                 if (ntries == 10) {
1097                         device_printf(sc->sc_dev,
1098                             "timeout reading ROM at 0x%x\n", addr);
1099                         return ETIMEDOUT;
1100                 }
1101                 if (sc->sc_flags & IWN_FLAG_HAS_OTPROM) {
1102                         /* OTPROM, check for ECC errors. */
1103                         tmp = IWN_READ(sc, IWN_OTP_GP);
1104                         if (tmp & IWN_OTP_GP_ECC_UNCORR_STTS) {
1105                                 device_printf(sc->sc_dev,
1106                                     "OTPROM ECC error at 0x%x\n", addr);
1107                                 return EIO;
1108                         }
1109                         if (tmp & IWN_OTP_GP_ECC_CORR_STTS) {
1110                                 /* Correctable ECC error, clear bit. */
1111                                 IWN_SETBITS(sc, IWN_OTP_GP,
1112                                     IWN_OTP_GP_ECC_CORR_STTS);
1113                         }
1114                 }
1115                 *out++ = val >> 16;
1116                 if (count > 1)
1117                         *out++ = val >> 24;
1118         }
1119         return 0;
1120 }
1121
1122 static void
1123 iwn_dma_map_addr(void *arg, bus_dma_segment_t *segs, int nsegs, int error)
1124 {
1125         if (error != 0)
1126                 return;
1127         KASSERT(nsegs == 1, ("too many DMA segments, %d should be 1", nsegs));
1128         *(bus_addr_t *)arg = segs[0].ds_addr;
1129 }
1130
1131 static int
1132 iwn_dma_contig_alloc(struct iwn_softc *sc, struct iwn_dma_info *dma,
1133         void **kvap, bus_size_t size, bus_size_t alignment, int flags)
1134 {
1135         int error;
1136
1137         dma->size = size;
1138         dma->tag = NULL;
1139
1140         error = bus_dma_tag_create(sc->sc_dmat, alignment,
1141             0, BUS_SPACE_MAXADDR_32BIT, BUS_SPACE_MAXADDR, NULL, NULL, size,
1142             1, size, flags, &dma->tag);
1143         if (error != 0) {
1144                 device_printf(sc->sc_dev,
1145                     "%s: bus_dma_tag_create failed, error %d\n",
1146                     __func__, error);
1147                 goto fail;
1148         }
1149         error = bus_dmamem_alloc(dma->tag, (void **)&dma->vaddr,
1150             flags | BUS_DMA_ZERO, &dma->map);
1151         if (error != 0) {
1152                 device_printf(sc->sc_dev,
1153                     "%s: bus_dmamem_alloc failed, error %d\n", __func__, error);
1154                 goto fail;
1155         }
1156         error = bus_dmamap_load(dma->tag, dma->map, dma->vaddr,
1157             size, iwn_dma_map_addr, &dma->paddr, flags);
1158         if (error != 0) {
1159                 device_printf(sc->sc_dev,
1160                     "%s: bus_dmamap_load failed, error %d\n", __func__, error);
1161                 goto fail;
1162         }
1163
1164         if (kvap != NULL)
1165                 *kvap = dma->vaddr;
1166         return 0;
1167 fail:
1168         iwn_dma_contig_free(dma);
1169         return error;
1170 }
1171
1172 static void
1173 iwn_dma_contig_free(struct iwn_dma_info *dma)
1174 {
1175         if (dma->tag != NULL) {
1176                 if (dma->map != NULL) {
1177                         if (dma->paddr == 0) {
1178                                 bus_dmamap_sync(dma->tag, dma->map,
1179                                     BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE);
1180                                 bus_dmamap_unload(dma->tag, dma->map);
1181                         }
1182                         bus_dmamem_free(dma->tag, &dma->vaddr, dma->map);
1183                 }
1184                 bus_dma_tag_destroy(dma->tag);
1185         }
1186 }
1187
1188 static int
1189 iwn_alloc_sched(struct iwn_softc *sc)
1190 {
1191         /* TX scheduler rings must be aligned on a 1KB boundary. */
1192         return iwn_dma_contig_alloc(sc, &sc->sched_dma,
1193             (void **)&sc->sched, sc->sc_hal->schedsz, 1024, BUS_DMA_NOWAIT);
1194 }
1195
1196 static void
1197 iwn_free_sched(struct iwn_softc *sc)
1198 {
1199         iwn_dma_contig_free(&sc->sched_dma);
1200 }
1201
1202 static int
1203 iwn_alloc_kw(struct iwn_softc *sc)
1204 {
1205         /* "Keep Warm" page must be aligned on a 4KB boundary. */
1206         return iwn_dma_contig_alloc(sc, &sc->kw_dma, NULL, 4096, 4096,
1207             BUS_DMA_NOWAIT);
1208 }
1209
1210 static void
1211 iwn_free_kw(struct iwn_softc *sc)
1212 {
1213         iwn_dma_contig_free(&sc->kw_dma);
1214 }
1215
1216 static int
1217 iwn_alloc_ict(struct iwn_softc *sc)
1218 {
1219         /* ICT table must be aligned on a 4KB boundary. */
1220         return iwn_dma_contig_alloc(sc, &sc->ict_dma,
1221             (void **)&sc->ict, IWN_ICT_SIZE, 4096, BUS_DMA_NOWAIT);
1222 }
1223
1224 static void
1225 iwn_free_ict(struct iwn_softc *sc)
1226 {
1227         iwn_dma_contig_free(&sc->ict_dma);
1228 }
1229
1230 static int
1231 iwn_alloc_fwmem(struct iwn_softc *sc)
1232 {
1233         /* Must be aligned on a 16-byte boundary. */
1234         return iwn_dma_contig_alloc(sc, &sc->fw_dma, NULL,
1235             sc->sc_hal->fwsz, 16, BUS_DMA_NOWAIT);
1236 }
1237
1238 static void
1239 iwn_free_fwmem(struct iwn_softc *sc)
1240 {
1241         iwn_dma_contig_free(&sc->fw_dma);
1242 }
1243
1244 static int
1245 iwn_alloc_rx_ring(struct iwn_softc *sc, struct iwn_rx_ring *ring)
1246 {
1247         bus_size_t size;
1248         int i, error;
1249
1250         ring->cur = 0;
1251
1252         /* Allocate RX descriptors (256-byte aligned). */
1253         size = IWN_RX_RING_COUNT * sizeof (uint32_t);
1254         error = iwn_dma_contig_alloc(sc, &ring->desc_dma,
1255             (void **)&ring->desc, size, 256, BUS_DMA_NOWAIT);
1256         if (error != 0) {
1257                 device_printf(sc->sc_dev,
1258                     "%s: could not allocate Rx ring DMA memory, error %d\n",
1259                     __func__, error);
1260                 goto fail;
1261         }
1262
1263         error = bus_dma_tag_create(sc->sc_dmat, 1, 0,
1264             BUS_SPACE_MAXADDR_32BIT,
1265             BUS_SPACE_MAXADDR, NULL, NULL, MCLBYTES, 1,
1266             MCLBYTES, BUS_DMA_NOWAIT, &ring->data_dmat);
1267         if (error != 0) {
1268                 device_printf(sc->sc_dev,
1269                     "%s: bus_dma_tag_create_failed, error %d\n",
1270                     __func__, error);
1271                 goto fail;
1272         }
1273
1274         /* Allocate RX status area (16-byte aligned). */
1275         error = iwn_dma_contig_alloc(sc, &ring->stat_dma,
1276             (void **)&ring->stat, sizeof (struct iwn_rx_status),
1277             16, BUS_DMA_NOWAIT);
1278         if (error != 0) {
1279                 device_printf(sc->sc_dev,
1280                     "%s: could not allocate Rx status DMA memory, error %d\n",
1281                     __func__, error);
1282                 goto fail;
1283         }
1284
1285         /*
1286          * Allocate and map RX buffers.
1287          */
1288         for (i = 0; i < IWN_RX_RING_COUNT; i++) {
1289                 struct iwn_rx_data *data = &ring->data[i];
1290                 bus_addr_t paddr;
1291
1292                 error = bus_dmamap_create(ring->data_dmat, 0, &data->map);
1293                 if (error != 0) {
1294                         device_printf(sc->sc_dev,
1295                             "%s: bus_dmamap_create failed, error %d\n",
1296                             __func__, error);
1297                         goto fail;
1298                 }
1299
1300                 data->m = m_getcl(MB_DONTWAIT, MT_DATA, M_PKTHDR);
1301                 if (data->m == NULL) {
1302                         device_printf(sc->sc_dev,
1303                             "%s: could not allocate rx mbuf\n", __func__);
1304                         error = ENOMEM;
1305                         goto fail;
1306                 }
1307
1308                 /* Map page. */
1309                 error = bus_dmamap_load(ring->data_dmat, data->map,
1310                     mtod(data->m, caddr_t), MCLBYTES,
1311                     iwn_dma_map_addr, &paddr, BUS_DMA_NOWAIT);
1312                 if (error != 0 && error != EFBIG) {
1313                         device_printf(sc->sc_dev,
1314                             "%s: bus_dmamap_load failed, error %d\n",
1315                             __func__, error);
1316                         m_freem(data->m);
1317                         error = ENOMEM; /* XXX unique code */
1318                         goto fail;
1319                 }
1320                 bus_dmamap_sync(ring->data_dmat, data->map,
1321                     BUS_DMASYNC_PREWRITE);
1322
1323                 /* Set physical address of RX buffer (256-byte aligned). */
1324                 ring->desc[i] = htole32(paddr >> 8);
1325         }
1326         bus_dmamap_sync(ring->desc_dma.tag, ring->desc_dma.map,
1327             BUS_DMASYNC_PREWRITE);
1328         return 0;
1329 fail:
1330         iwn_free_rx_ring(sc, ring);
1331         return error;
1332 }
1333
1334 static void
1335 iwn_reset_rx_ring(struct iwn_softc *sc, struct iwn_rx_ring *ring)
1336 {
1337         int ntries;
1338
1339         if (iwn_nic_lock(sc) == 0) {
1340                 IWN_WRITE(sc, IWN_FH_RX_CONFIG, 0);
1341                 for (ntries = 0; ntries < 1000; ntries++) {
1342                         if (IWN_READ(sc, IWN_FH_RX_STATUS) &
1343                             IWN_FH_RX_STATUS_IDLE)
1344                                 break;
1345                         DELAY(10);
1346                 }
1347                 iwn_nic_unlock(sc);
1348 #ifdef IWN_DEBUG
1349                 if (ntries == 1000)
1350                         DPRINTF(sc, IWN_DEBUG_ANY, "%s\n",
1351                             "timeout resetting Rx ring");
1352 #endif
1353         }
1354         ring->cur = 0;
1355         sc->last_rx_valid = 0;
1356 }
1357
1358 static void
1359 iwn_free_rx_ring(struct iwn_softc *sc, struct iwn_rx_ring *ring)
1360 {
1361         int i;
1362
1363         iwn_dma_contig_free(&ring->desc_dma);
1364         iwn_dma_contig_free(&ring->stat_dma);
1365
1366         for (i = 0; i < IWN_RX_RING_COUNT; i++) {
1367                 struct iwn_rx_data *data = &ring->data[i];
1368
1369                 if (data->m != NULL) {
1370                         bus_dmamap_sync(ring->data_dmat, data->map,
1371                             BUS_DMASYNC_POSTREAD);
1372                         bus_dmamap_unload(ring->data_dmat, data->map);
1373                         m_freem(data->m);
1374                 }
1375                 if (data->map != NULL)
1376                         bus_dmamap_destroy(ring->data_dmat, data->map);
1377         }
1378 }
1379
1380 static int
1381 iwn_alloc_tx_ring(struct iwn_softc *sc, struct iwn_tx_ring *ring, int qid)
1382 {
1383         bus_size_t size;
1384         bus_addr_t paddr;
1385         int i, error;
1386
1387         ring->qid = qid;
1388         ring->queued = 0;
1389         ring->cur = 0;
1390
1391         /* Allocate TX descriptors (256-byte aligned.) */
1392         size = IWN_TX_RING_COUNT * sizeof(struct iwn_tx_desc);
1393         error = iwn_dma_contig_alloc(sc, &ring->desc_dma,
1394             (void **)&ring->desc, size, 256, BUS_DMA_NOWAIT);
1395         if (error != 0) {
1396                 device_printf(sc->sc_dev,
1397                     "%s: could not allocate TX ring DMA memory, error %d\n",
1398                     __func__, error);
1399                 goto fail;
1400         }
1401
1402         /*
1403          * We only use rings 0 through 4 (4 EDCA + cmd) so there is no need
1404          * to allocate commands space for other rings.
1405          */
1406         if (qid > 4)
1407                 return 0;
1408
1409         size = IWN_TX_RING_COUNT * sizeof(struct iwn_tx_cmd);
1410         error = iwn_dma_contig_alloc(sc, &ring->cmd_dma,
1411             (void **)&ring->cmd, size, 4, BUS_DMA_NOWAIT);
1412         if (error != 0) {
1413                 device_printf(sc->sc_dev,
1414                     "%s: could not allocate TX cmd DMA memory, error %d\n",
1415                     __func__, error);
1416                 goto fail;
1417         }
1418
1419         error = bus_dma_tag_create(sc->sc_dmat, 1, 0,
1420             BUS_SPACE_MAXADDR_32BIT,
1421             BUS_SPACE_MAXADDR, NULL, NULL, MCLBYTES, IWN_MAX_SCATTER - 1,
1422             MCLBYTES, BUS_DMA_NOWAIT, &ring->data_dmat);
1423         if (error != 0) {
1424                 device_printf(sc->sc_dev,
1425                     "%s: bus_dma_tag_create_failed, error %d\n",
1426                     __func__, error);
1427                 goto fail;
1428         }
1429
1430         paddr = ring->cmd_dma.paddr;
1431         for (i = 0; i < IWN_TX_RING_COUNT; i++) {
1432                 struct iwn_tx_data *data = &ring->data[i];
1433
1434                 data->cmd_paddr = paddr;
1435                 data->scratch_paddr = paddr + 12;
1436                 paddr += sizeof (struct iwn_tx_cmd);
1437
1438                 error = bus_dmamap_create(ring->data_dmat, 0, &data->map);
1439                 if (error != 0) {
1440                         device_printf(sc->sc_dev,
1441                             "%s: bus_dmamap_create failed, error %d\n",
1442                             __func__, error);
1443                         goto fail;
1444                 }
1445                 bus_dmamap_sync(ring->data_dmat, data->map,
1446                     BUS_DMASYNC_PREWRITE);
1447         }
1448         return 0;
1449 fail:
1450         iwn_free_tx_ring(sc, ring);
1451         return error;
1452 }
1453
1454 static void
1455 iwn_reset_tx_ring(struct iwn_softc *sc, struct iwn_tx_ring *ring)
1456 {
1457         int i;
1458
1459         for (i = 0; i < IWN_TX_RING_COUNT; i++) {
1460                 struct iwn_tx_data *data = &ring->data[i];
1461
1462                 if (data->m != NULL) {
1463                         bus_dmamap_unload(ring->data_dmat, data->map);
1464                         m_freem(data->m);
1465                         data->m = NULL;
1466                 }
1467         }
1468         /* Clear TX descriptors. */
1469         memset(ring->desc, 0, ring->desc_dma.size);
1470         bus_dmamap_sync(ring->desc_dma.tag, ring->desc_dma.map,
1471             BUS_DMASYNC_PREWRITE);
1472         sc->qfullmsk &= ~(1 << ring->qid);
1473         ring->queued = 0;
1474         ring->cur = 0;
1475 }
1476
1477 static void
1478 iwn_free_tx_ring(struct iwn_softc *sc, struct iwn_tx_ring *ring)
1479 {
1480         int i;
1481
1482         iwn_dma_contig_free(&ring->desc_dma);
1483         iwn_dma_contig_free(&ring->cmd_dma);
1484
1485         for (i = 0; i < IWN_TX_RING_COUNT; i++) {
1486                 struct iwn_tx_data *data = &ring->data[i];
1487
1488                 if (data->m != NULL) {
1489                         bus_dmamap_sync(ring->data_dmat, data->map,
1490                             BUS_DMASYNC_POSTWRITE);
1491                         bus_dmamap_unload(ring->data_dmat, data->map);
1492                         m_freem(data->m);
1493                 }
1494                 if (data->map != NULL)
1495                         bus_dmamap_destroy(ring->data_dmat, data->map);
1496         }
1497 }
1498
1499 static void
1500 iwn5000_ict_reset(struct iwn_softc *sc)
1501 {
1502         /* Disable interrupts. */
1503         IWN_WRITE(sc, IWN_INT_MASK, 0);
1504
1505         /* Reset ICT table. */
1506         memset(sc->ict, 0, IWN_ICT_SIZE);
1507         sc->ict_cur = 0;
1508
1509         /* Set physical address of ICT table (4KB aligned.) */
1510         DPRINTF(sc, IWN_DEBUG_RESET, "%s: enabling ICT\n", __func__);
1511         IWN_WRITE(sc, IWN_DRAM_INT_TBL, IWN_DRAM_INT_TBL_ENABLE |
1512             IWN_DRAM_INT_TBL_WRAP_CHECK | sc->ict_dma.paddr >> 12);
1513
1514         /* Enable periodic RX interrupt. */
1515         sc->int_mask |= IWN_INT_RX_PERIODIC;
1516         /* Switch to ICT interrupt mode in driver. */
1517         sc->sc_flags |= IWN_FLAG_USE_ICT;
1518
1519         /* Re-enable interrupts. */
1520         IWN_WRITE(sc, IWN_INT, 0xffffffff);
1521         IWN_WRITE(sc, IWN_INT_MASK, sc->int_mask);
1522 }
1523
1524 static int
1525 iwn_read_eeprom(struct iwn_softc *sc, uint8_t macaddr[IEEE80211_ADDR_LEN])
1526 {
1527         const struct iwn_hal *hal = sc->sc_hal;
1528         int error;
1529         uint16_t val;
1530
1531         /* Check whether adapter has an EEPROM or an OTPROM. */
1532         if (sc->hw_type >= IWN_HW_REV_TYPE_1000 &&
1533             (IWN_READ(sc, IWN_OTP_GP) & IWN_OTP_GP_DEV_SEL_OTP))
1534                 sc->sc_flags |= IWN_FLAG_HAS_OTPROM;
1535         DPRINTF(sc, IWN_DEBUG_RESET, "%s found\n",
1536             (sc->sc_flags & IWN_FLAG_HAS_OTPROM) ? "OTPROM" : "EEPROM");
1537
1538         /* Adapter has to be powered on for EEPROM access to work. */
1539         error = iwn_apm_init(sc);
1540         if (error != 0) {
1541                 device_printf(sc->sc_dev,
1542                     "%s: could not power ON adapter, error %d\n",
1543                     __func__, error);
1544                 return error;
1545         }
1546
1547         if ((IWN_READ(sc, IWN_EEPROM_GP) & 0x7) == 0) {
1548                 device_printf(sc->sc_dev, "%s: bad ROM signature\n", __func__);
1549                 return EIO;
1550         }
1551         error = iwn_eeprom_lock(sc);
1552         if (error != 0) {
1553                 device_printf(sc->sc_dev,
1554                     "%s: could not lock ROM, error %d\n",
1555                     __func__, error);
1556                 return error;
1557         }
1558
1559         if (sc->sc_flags & IWN_FLAG_HAS_OTPROM) {
1560                 error = iwn_init_otprom(sc);
1561                 if (error != 0) {
1562                         device_printf(sc->sc_dev,
1563                             "%s: could not initialize OTPROM, error %d\n",
1564                             __func__, error);
1565                         return error;
1566                 }
1567         }
1568
1569         iwn_read_prom_data(sc, IWN_EEPROM_RFCFG, &val, 2);
1570         sc->rfcfg = le16toh(val);
1571         DPRINTF(sc, IWN_DEBUG_RESET, "radio config=0x%04x\n", sc->rfcfg);
1572
1573         /* Read MAC address. */
1574         iwn_read_prom_data(sc, IWN_EEPROM_MAC, macaddr, 6);
1575
1576         /* Read adapter-specific information from EEPROM. */
1577         hal->read_eeprom(sc);
1578
1579         iwn_apm_stop(sc);       /* Power OFF adapter. */
1580
1581         iwn_eeprom_unlock(sc);
1582         return 0;
1583 }
1584
1585 static void
1586 iwn4965_read_eeprom(struct iwn_softc *sc)
1587 {
1588         uint32_t addr;
1589         int i;
1590         uint16_t val;
1591
1592         /* Read regulatory domain (4 ASCII characters.) */
1593         iwn_read_prom_data(sc, IWN4965_EEPROM_DOMAIN, sc->eeprom_domain, 4);
1594
1595         /* Read the list of authorized channels (20MHz ones only.) */
1596         for (i = 0; i < 5; i++) {
1597                 addr = iwn4965_regulatory_bands[i];
1598                 iwn_read_eeprom_channels(sc, i, addr);
1599         }
1600
1601         /* Read maximum allowed TX power for 2GHz and 5GHz bands. */
1602         iwn_read_prom_data(sc, IWN4965_EEPROM_MAXPOW, &val, 2);
1603         sc->maxpwr2GHz = val & 0xff;
1604         sc->maxpwr5GHz = val >> 8;
1605         /* Check that EEPROM values are within valid range. */
1606         if (sc->maxpwr5GHz < 20 || sc->maxpwr5GHz > 50)
1607                 sc->maxpwr5GHz = 38;
1608         if (sc->maxpwr2GHz < 20 || sc->maxpwr2GHz > 50)
1609                 sc->maxpwr2GHz = 38;
1610         DPRINTF(sc, IWN_DEBUG_RESET, "maxpwr 2GHz=%d 5GHz=%d\n",
1611             sc->maxpwr2GHz, sc->maxpwr5GHz);
1612
1613         /* Read samples for each TX power group. */
1614         iwn_read_prom_data(sc, IWN4965_EEPROM_BANDS, sc->bands,
1615             sizeof sc->bands);
1616
1617         /* Read voltage at which samples were taken. */
1618         iwn_read_prom_data(sc, IWN4965_EEPROM_VOLTAGE, &val, 2);
1619         sc->eeprom_voltage = (int16_t)le16toh(val);
1620         DPRINTF(sc, IWN_DEBUG_RESET, "voltage=%d (in 0.3V)\n",
1621             sc->eeprom_voltage);
1622
1623 #ifdef IWN_DEBUG
1624         /* Print samples. */
1625         if (sc->sc_debug & IWN_DEBUG_ANY) {
1626                 for (i = 0; i < IWN_NBANDS; i++)
1627                         iwn4965_print_power_group(sc, i);
1628         }
1629 #endif
1630 }
1631
1632 #ifdef IWN_DEBUG
1633 static void
1634 iwn4965_print_power_group(struct iwn_softc *sc, int i)
1635 {
1636         struct iwn4965_eeprom_band *band = &sc->bands[i];
1637         struct iwn4965_eeprom_chan_samples *chans = band->chans;
1638         int j, c;
1639
1640         kprintf("===band %d===\n", i);
1641         kprintf("chan lo=%d, chan hi=%d\n", band->lo, band->hi);
1642         kprintf("chan1 num=%d\n", chans[0].num);
1643         for (c = 0; c < 2; c++) {
1644                 for (j = 0; j < IWN_NSAMPLES; j++) {
1645                         kprintf("chain %d, sample %d: temp=%d gain=%d "
1646                             "power=%d pa_det=%d\n", c, j,
1647                             chans[0].samples[c][j].temp,
1648                             chans[0].samples[c][j].gain,
1649                             chans[0].samples[c][j].power,
1650                             chans[0].samples[c][j].pa_det);
1651                 }
1652         }
1653         kprintf("chan2 num=%d\n", chans[1].num);
1654         for (c = 0; c < 2; c++) {
1655                 for (j = 0; j < IWN_NSAMPLES; j++) {
1656                         kprintf("chain %d, sample %d: temp=%d gain=%d "
1657                             "power=%d pa_det=%d\n", c, j,
1658                             chans[1].samples[c][j].temp,
1659                             chans[1].samples[c][j].gain,
1660                             chans[1].samples[c][j].power,
1661                             chans[1].samples[c][j].pa_det);
1662                 }
1663         }
1664 }
1665 #endif
1666
1667 static void
1668 iwn5000_read_eeprom(struct iwn_softc *sc)
1669 {
1670         struct iwn5000_eeprom_calib_hdr hdr;
1671         int32_t temp, volt;
1672         uint32_t addr, base;
1673         int i;
1674         uint16_t val;
1675
1676         /* Read regulatory domain (4 ASCII characters.) */
1677         iwn_read_prom_data(sc, IWN5000_EEPROM_REG, &val, 2);
1678         base = le16toh(val);
1679         iwn_read_prom_data(sc, base + IWN5000_EEPROM_DOMAIN,
1680             sc->eeprom_domain, 4);
1681
1682         /* Read the list of authorized channels (20MHz ones only.) */
1683         for (i = 0; i < 5; i++) {
1684                 addr = base + iwn5000_regulatory_bands[i];
1685                 iwn_read_eeprom_channels(sc, i, addr);
1686         }
1687
1688         /* Read enhanced TX power information for 6000 Series. */
1689         if (sc->hw_type >= IWN_HW_REV_TYPE_6000)
1690                 iwn_read_eeprom_enhinfo(sc);
1691
1692         iwn_read_prom_data(sc, IWN5000_EEPROM_CAL, &val, 2);
1693         base = le16toh(val);
1694         iwn_read_prom_data(sc, base, &hdr, sizeof hdr);
1695         DPRINTF(sc, IWN_DEBUG_CALIBRATE,
1696             "%s: calib version=%u pa type=%u voltage=%u\n",
1697             __func__, hdr.version, hdr.pa_type, le16toh(hdr.volt));
1698             sc->calib_ver = hdr.version;
1699
1700         if (sc->hw_type == IWN_HW_REV_TYPE_5150) {
1701                 /* Compute temperature offset. */
1702                 iwn_read_prom_data(sc, base + IWN5000_EEPROM_TEMP, &val, 2);
1703                 temp = le16toh(val);
1704                 iwn_read_prom_data(sc, base + IWN5000_EEPROM_VOLT, &val, 2);
1705                 volt = le16toh(val);
1706                 sc->temp_off = temp - (volt / -5);
1707                 DPRINTF(sc, IWN_DEBUG_CALIBRATE, "temp=%d volt=%d offset=%dK\n",
1708                     temp, volt, sc->temp_off);
1709         } else {
1710                 /* Read crystal calibration. */
1711                 iwn_read_prom_data(sc, base + IWN5000_EEPROM_CRYSTAL,
1712                     &sc->eeprom_crystal, sizeof (uint32_t));
1713                 DPRINTF(sc, IWN_DEBUG_CALIBRATE, "crystal calibration 0x%08x\n",
1714                 le32toh(sc->eeprom_crystal));
1715         }
1716 }
1717
1718 /*
1719  * Translate EEPROM flags to net80211.
1720  */
1721 static uint32_t
1722 iwn_eeprom_channel_flags(struct iwn_eeprom_chan *channel)
1723 {
1724         uint32_t nflags;
1725
1726         nflags = 0;
1727         if ((channel->flags & IWN_EEPROM_CHAN_ACTIVE) == 0)
1728                 nflags |= IEEE80211_CHAN_PASSIVE;
1729         if ((channel->flags & IWN_EEPROM_CHAN_IBSS) == 0)
1730                 nflags |= IEEE80211_CHAN_NOADHOC;
1731         if (channel->flags & IWN_EEPROM_CHAN_RADAR) {
1732                 nflags |= IEEE80211_CHAN_DFS;
1733                 /* XXX apparently IBSS may still be marked */
1734                 nflags |= IEEE80211_CHAN_NOADHOC;
1735         }
1736
1737         return nflags;
1738 }
1739
1740 static void
1741 iwn_read_eeprom_band(struct iwn_softc *sc, int n)
1742 {
1743         struct ifnet *ifp = sc->sc_ifp;
1744         struct ieee80211com *ic = ifp->if_l2com;
1745         struct iwn_eeprom_chan *channels = sc->eeprom_channels[n];
1746         const struct iwn_chan_band *band = &iwn_bands[n];
1747         struct ieee80211_channel *c;
1748         int i, chan, nflags;
1749
1750         for (i = 0; i < band->nchan; i++) {
1751                 if (!(channels[i].flags & IWN_EEPROM_CHAN_VALID)) {
1752                         DPRINTF(sc, IWN_DEBUG_RESET,
1753                             "skip chan %d flags 0x%x maxpwr %d\n",
1754                             band->chan[i], channels[i].flags,
1755                             channels[i].maxpwr);
1756                         continue;
1757                 }
1758                 chan = band->chan[i];
1759                 nflags = iwn_eeprom_channel_flags(&channels[i]);
1760
1761                 DPRINTF(sc, IWN_DEBUG_RESET,
1762                     "add chan %d flags 0x%x maxpwr %d\n",
1763                     chan, channels[i].flags, channels[i].maxpwr);
1764
1765                 c = &ic->ic_channels[ic->ic_nchans++];
1766                 c->ic_ieee = chan;
1767                 c->ic_maxregpower = channels[i].maxpwr;
1768                 c->ic_maxpower = 2*c->ic_maxregpower;
1769
1770                 /* Save maximum allowed TX power for this channel. */
1771                 sc->maxpwr[chan] = channels[i].maxpwr;
1772
1773                 if (n == 0) {   /* 2GHz band */
1774                         c->ic_freq = ieee80211_ieee2mhz(chan,
1775                             IEEE80211_CHAN_G);
1776
1777                         /* G =>'s B is supported */
1778                         c->ic_flags = IEEE80211_CHAN_B | nflags;
1779
1780                         c = &ic->ic_channels[ic->ic_nchans++];
1781                         c[0] = c[-1];
1782                         c->ic_flags = IEEE80211_CHAN_G | nflags;
1783                 } else {        /* 5GHz band */
1784                         c->ic_freq = ieee80211_ieee2mhz(chan,
1785                             IEEE80211_CHAN_A);
1786                         c->ic_flags = IEEE80211_CHAN_A | nflags;
1787                         sc->sc_flags |= IWN_FLAG_HAS_5GHZ;
1788                 }
1789 #if 0   /* HT */
1790                 /* XXX no constraints on using HT20 */
1791                 /* add HT20, HT40 added separately */
1792                 c = &ic->ic_channels[ic->ic_nchans++];
1793                 c[0] = c[-1];
1794                 c->ic_flags |= IEEE80211_CHAN_HT20;
1795                 /* XXX NARROW =>'s 1/2 and 1/4 width? */
1796 #endif
1797         }
1798 }
1799
1800 #if 0   /* HT */
1801 static void
1802 iwn_read_eeprom_ht40(struct iwn_softc *sc, int n)
1803 {
1804         struct ifnet *ifp = sc->sc_ifp;
1805         struct ieee80211com *ic = ifp->if_l2com;
1806         struct iwn_eeprom_chan *channels = sc->eeprom_channels[n];
1807         const struct iwn_chan_band *band = &iwn_bands[n];
1808         struct ieee80211_channel *c, *cent, *extc;
1809         int i;
1810
1811         for (i = 0; i < band->nchan; i++) {
1812                 if (!(channels[i].flags & IWN_EEPROM_CHAN_VALID) ||
1813                     !(channels[i].flags & IWN_EEPROM_CHAN_WIDE)) {
1814                         DPRINTF(sc, IWN_DEBUG_RESET,
1815                             "skip chan %d flags 0x%x maxpwr %d\n",
1816                             band->chan[i], channels[i].flags,
1817                             channels[i].maxpwr);
1818                         continue;
1819                 }
1820                 /*
1821                  * Each entry defines an HT40 channel pair; find the
1822                  * center channel, then the extension channel above.
1823                  */
1824                 cent = ieee80211_find_channel_byieee(ic, band->chan[i],
1825                     band->flags & ~IEEE80211_CHAN_HT);
1826                 if (cent == NULL) {     /* XXX shouldn't happen */
1827                         device_printf(sc->sc_dev,
1828                             "%s: no entry for channel %d\n",
1829                             __func__, band->chan[i]);
1830                         continue;
1831                 }
1832                 extc = ieee80211_find_channel(ic, cent->ic_freq+20,
1833                     band->flags & ~IEEE80211_CHAN_HT);
1834                 if (extc == NULL) {
1835                         DPRINTF(sc, IWN_DEBUG_RESET,
1836                             "skip chan %d, extension channel not found\n",
1837                             band->chan[i]);
1838                         continue;
1839                 }
1840
1841                 DPRINTF(sc, IWN_DEBUG_RESET,
1842                     "add ht40 chan %d flags 0x%x maxpwr %d\n",
1843                     band->chan[i], channels[i].flags, channels[i].maxpwr);
1844
1845                 c = &ic->ic_channels[ic->ic_nchans++];
1846                 c[0] = cent[0];
1847                 c->ic_extieee = extc->ic_ieee;
1848                 c->ic_flags &= ~IEEE80211_CHAN_HT;
1849                 c->ic_flags |= IEEE80211_CHAN_HT40U;
1850                 c = &ic->ic_channels[ic->ic_nchans++];
1851                 c[0] = extc[0];
1852                 c->ic_extieee = cent->ic_ieee;
1853                 c->ic_flags &= ~IEEE80211_CHAN_HT;
1854                 c->ic_flags |= IEEE80211_CHAN_HT40D;
1855         }
1856 }
1857 #endif
1858
1859 static void
1860 iwn_read_eeprom_channels(struct iwn_softc *sc, int n, uint32_t addr)
1861 {
1862         struct ifnet *ifp = sc->sc_ifp;
1863         struct ieee80211com *ic = ifp->if_l2com;
1864
1865         iwn_read_prom_data(sc, addr, &sc->eeprom_channels[n],
1866             iwn_bands[n].nchan * sizeof (struct iwn_eeprom_chan));
1867
1868         if (n < 5)
1869                 iwn_read_eeprom_band(sc, n);
1870 #if 0   /* HT */
1871         else
1872                 iwn_read_eeprom_ht40(sc, n);
1873 #endif
1874         ieee80211_sort_channels(ic->ic_channels, ic->ic_nchans);
1875 }
1876
1877 #define nitems(_a)      (sizeof((_a)) / sizeof((_a)[0]))
1878
1879 static void
1880 iwn_read_eeprom_enhinfo(struct iwn_softc *sc)
1881 {
1882         struct iwn_eeprom_enhinfo enhinfo[35];
1883         uint16_t val, base;
1884         int8_t maxpwr;
1885         int i;
1886
1887         iwn_read_prom_data(sc, IWN5000_EEPROM_REG, &val, 2);
1888         base = le16toh(val);
1889         iwn_read_prom_data(sc, base + IWN6000_EEPROM_ENHINFO,
1890             enhinfo, sizeof enhinfo);
1891
1892         memset(sc->enh_maxpwr, 0, sizeof sc->enh_maxpwr);
1893         for (i = 0; i < nitems(enhinfo); i++) {
1894                 if (enhinfo[i].chan == 0 || enhinfo[i].reserved != 0)
1895                         continue;       /* Skip invalid entries. */
1896
1897                 maxpwr = 0;
1898                 if (sc->txchainmask & IWN_ANT_A)
1899                         maxpwr = MAX(maxpwr, enhinfo[i].chain[0]);
1900                 if (sc->txchainmask & IWN_ANT_B)
1901                         maxpwr = MAX(maxpwr, enhinfo[i].chain[1]);
1902                 if (sc->txchainmask & IWN_ANT_C)
1903                         maxpwr = MAX(maxpwr, enhinfo[i].chain[2]);
1904                 if (sc->ntxchains == 2)
1905                         maxpwr = MAX(maxpwr, enhinfo[i].mimo2);
1906                 else if (sc->ntxchains == 3)
1907                         maxpwr = MAX(maxpwr, enhinfo[i].mimo3);
1908                 maxpwr /= 2;    /* Convert half-dBm to dBm. */
1909
1910                 DPRINTF(sc, IWN_DEBUG_RESET, "enhinfo %d, maxpwr=%d\n", i,
1911                     maxpwr);
1912                 sc->enh_maxpwr[i] = maxpwr;
1913         }
1914 }
1915
1916 static struct ieee80211_node *
1917 iwn_node_alloc(struct ieee80211vap *vap, const uint8_t mac[IEEE80211_ADDR_LEN])
1918 {
1919         return kmalloc(sizeof (struct iwn_node), M_80211_NODE,M_INTWAIT | M_ZERO);
1920 }
1921
1922 static void
1923 iwn_newassoc(struct ieee80211_node *ni, int isnew)
1924 {
1925         /* XXX move */
1926         //if (!isnew) {
1927                 ieee80211_ratectl_node_deinit(ni);
1928         //}
1929
1930         ieee80211_ratectl_node_init(ni);
1931 }
1932
1933 static int
1934 iwn_media_change(struct ifnet *ifp)
1935 {
1936         int error = ieee80211_media_change(ifp);
1937         /* NB: only the fixed rate can change and that doesn't need a reset */
1938         return (error == ENETRESET ? 0 : error);
1939 }
1940
1941 static int
1942 iwn_newstate(struct ieee80211vap *vap, enum ieee80211_state nstate, int arg)
1943 {
1944         struct iwn_vap *ivp = IWN_VAP(vap);
1945         struct ieee80211com *ic = vap->iv_ic;
1946         struct iwn_softc *sc = ic->ic_ifp->if_softc;
1947         int error;
1948
1949         DPRINTF(sc, IWN_DEBUG_STATE, "%s: %s -> %s\n", __func__,
1950                 ieee80211_state_name[vap->iv_state],
1951                 ieee80211_state_name[nstate]);
1952
1953         IEEE80211_UNLOCK(ic);
1954         IWN_LOCK(sc);
1955         callout_stop(&sc->sc_timer_to);
1956
1957         if (nstate == IEEE80211_S_AUTH && vap->iv_state != IEEE80211_S_AUTH) {
1958                 /* !AUTH -> AUTH requires adapter config */
1959                 /* Reset state to handle reassociations correctly. */
1960                 sc->rxon.associd = 0;
1961                 sc->rxon.filter &= ~htole32(IWN_FILTER_BSS);
1962                 iwn_calib_reset(sc);
1963                 error = iwn_auth(sc, vap);
1964         }
1965         if (nstate == IEEE80211_S_RUN && vap->iv_state != IEEE80211_S_RUN) {
1966                 /*
1967                  * !RUN -> RUN requires setting the association id
1968                  * which is done with a firmware cmd.  We also defer
1969                  * starting the timers until that work is done.
1970                  */
1971                 error = iwn_run(sc, vap);
1972         }
1973         if (nstate == IEEE80211_S_RUN) {
1974                 /*
1975                  * RUN -> RUN transition; just restart the timers.
1976                  */
1977                 iwn_calib_reset(sc);
1978         }
1979         IWN_UNLOCK(sc);
1980         IEEE80211_LOCK(ic);
1981         return ivp->iv_newstate(vap, nstate, arg);
1982 }
1983
1984 /*
1985  * Process an RX_PHY firmware notification.  This is usually immediately
1986  * followed by an MPDU_RX_DONE notification.
1987  */
1988 static void
1989 iwn_rx_phy(struct iwn_softc *sc, struct iwn_rx_desc *desc,
1990     struct iwn_rx_data *data)
1991 {
1992         struct iwn_rx_stat *stat = (struct iwn_rx_stat *)(desc + 1);
1993
1994         DPRINTF(sc, IWN_DEBUG_CALIBRATE, "%s: received PHY stats\n", __func__);
1995         bus_dmamap_sync(sc->rxq.data_dmat, data->map, BUS_DMASYNC_POSTREAD);
1996
1997         /* Save RX statistics, they will be used on MPDU_RX_DONE. */
1998         memcpy(&sc->last_rx_stat, stat, sizeof (*stat));
1999         sc->last_rx_valid = 1;
2000 }
2001
2002 static void
2003 iwn_timer_timeout(void *arg)
2004 {
2005         struct iwn_softc *sc = arg;
2006         uint32_t flags = 0;
2007
2008         IWN_LOCK_ASSERT(sc);
2009
2010         if (sc->calib_cnt && --sc->calib_cnt == 0) {
2011                 DPRINTF(sc, IWN_DEBUG_CALIBRATE, "%s\n",
2012                     "send statistics request");
2013                 (void) iwn_cmd(sc, IWN_CMD_GET_STATISTICS, &flags,
2014                     sizeof flags, 1);
2015                 sc->calib_cnt = 60;     /* do calibration every 60s */
2016         }
2017         iwn_watchdog(sc);               /* NB: piggyback tx watchdog */
2018         callout_reset(&sc->sc_timer_to, hz, iwn_timer_timeout, sc);
2019 }
2020
2021 static void
2022 iwn_calib_reset(struct iwn_softc *sc)
2023 {
2024         callout_reset(&sc->sc_timer_to, hz, iwn_timer_timeout, sc);
2025         sc->calib_cnt = 60;             /* do calibration every 60s */
2026 }
2027
2028 /*
2029  * Process an RX_DONE (4965AGN only) or MPDU_RX_DONE firmware notification.
2030  * Each MPDU_RX_DONE notification must be preceded by an RX_PHY one.
2031  */
2032 static void
2033 iwn_rx_done(struct iwn_softc *sc, struct iwn_rx_desc *desc,
2034     struct iwn_rx_data *data)
2035 {
2036         const struct iwn_hal *hal = sc->sc_hal;
2037         struct ifnet *ifp = sc->sc_ifp;
2038         struct ieee80211com *ic = ifp->if_l2com;
2039         struct iwn_rx_ring *ring = &sc->rxq;
2040         struct ieee80211_frame *wh;
2041         struct ieee80211_node *ni;
2042         struct mbuf *m, *m1;
2043         struct iwn_rx_stat *stat;
2044         caddr_t head;
2045         bus_addr_t paddr;
2046         uint32_t flags;
2047         int error, len, rssi, nf;
2048
2049         if (desc->type == IWN_MPDU_RX_DONE) {
2050                 /* Check for prior RX_PHY notification. */
2051                 if (!sc->last_rx_valid) {
2052                         DPRINTF(sc, IWN_DEBUG_ANY,
2053                             "%s: missing RX_PHY\n", __func__);
2054                         ifp->if_ierrors++;
2055                         return;
2056                 }
2057                 sc->last_rx_valid = 0;
2058                 stat = &sc->last_rx_stat;
2059         } else
2060                 stat = (struct iwn_rx_stat *)(desc + 1);
2061
2062         bus_dmamap_sync(ring->data_dmat, data->map, BUS_DMASYNC_POSTREAD);
2063
2064         if (stat->cfg_phy_len > IWN_STAT_MAXLEN) {
2065                 device_printf(sc->sc_dev,
2066                     "%s: invalid rx statistic header, len %d\n",
2067                     __func__, stat->cfg_phy_len);
2068                 ifp->if_ierrors++;
2069                 return;
2070         }
2071         if (desc->type == IWN_MPDU_RX_DONE) {
2072                 struct iwn_rx_mpdu *mpdu = (struct iwn_rx_mpdu *)(desc + 1);
2073                 head = (caddr_t)(mpdu + 1);
2074                 len = le16toh(mpdu->len);
2075         } else {
2076                 head = (caddr_t)(stat + 1) + stat->cfg_phy_len;
2077                 len = le16toh(stat->len);
2078         }
2079
2080         flags = le32toh(*(uint32_t *)(head + len));
2081
2082         /* Discard frames with a bad FCS early. */
2083         if ((flags & IWN_RX_NOERROR) != IWN_RX_NOERROR) {
2084                 DPRINTF(sc, IWN_DEBUG_RECV, "%s: rx flags error %x\n",
2085                     __func__, flags);
2086                 ifp->if_ierrors++;
2087                 return;
2088         }
2089         /* Discard frames that are too short. */
2090         if (len < sizeof (*wh)) {
2091                 DPRINTF(sc, IWN_DEBUG_RECV, "%s: frame too short: %d\n",
2092                     __func__, len);
2093                 ifp->if_ierrors++;
2094                 return;
2095         }
2096
2097         /* XXX don't need mbuf, just dma buffer */
2098         m1 = m_getcl(MB_DONTWAIT, MT_DATA, M_PKTHDR);
2099         if (m1 == NULL) {
2100                 DPRINTF(sc, IWN_DEBUG_ANY, "%s: no mbuf to restock ring\n",
2101                     __func__);
2102                 ifp->if_ierrors++;
2103                 return;
2104         }
2105         bus_dmamap_unload(ring->data_dmat, data->map);
2106
2107         error = bus_dmamap_load(ring->data_dmat, data->map,
2108             mtod(m1, caddr_t), MCLBYTES,
2109             iwn_dma_map_addr, &paddr, BUS_DMA_NOWAIT);
2110         if (error != 0 && error != EFBIG) {
2111                 device_printf(sc->sc_dev,
2112                     "%s: bus_dmamap_load failed, error %d\n", __func__, error);
2113                 m_freem(m1);
2114                 ifp->if_ierrors++;
2115                 return;
2116         }
2117
2118         m = data->m;
2119         data->m = m1;
2120         /* Update RX descriptor. */
2121         ring->desc[ring->cur] = htole32(paddr >> 8);
2122         bus_dmamap_sync(ring->desc_dma.tag, ring->desc_dma.map,
2123             BUS_DMASYNC_PREWRITE);
2124
2125         /* Finalize mbuf. */
2126         m->m_pkthdr.rcvif = ifp;
2127         m->m_data = head;
2128         m->m_pkthdr.len = m->m_len = len;
2129
2130         rssi = hal->get_rssi(sc, stat);
2131
2132         /* Grab a reference to the source node. */
2133         wh = mtod(m, struct ieee80211_frame *);
2134         ni = ieee80211_find_rxnode(ic, (struct ieee80211_frame_min *)wh);
2135         nf = (ni != NULL && ni->ni_vap->iv_state == IEEE80211_S_RUN &&
2136             (ic->ic_flags & IEEE80211_F_SCAN) == 0) ? sc->noise : -95;
2137
2138         if (ieee80211_radiotap_active(ic)) {
2139                 struct iwn_rx_radiotap_header *tap = &sc->sc_rxtap;
2140
2141                 tap->wr_tsft = htole64(stat->tstamp);
2142                 tap->wr_flags = 0;
2143                 if (stat->flags & htole16(IWN_STAT_FLAG_SHPREAMBLE))
2144                         tap->wr_flags |= IEEE80211_RADIOTAP_F_SHORTPRE;
2145                 switch (stat->rate) {
2146                 /* CCK rates. */
2147                 case  10: tap->wr_rate =   2; break;
2148                 case  20: tap->wr_rate =   4; break;
2149                 case  55: tap->wr_rate =  11; break;
2150                 case 110: tap->wr_rate =  22; break;
2151                 /* OFDM rates. */
2152                 case 0xd: tap->wr_rate =  12; break;
2153                 case 0xf: tap->wr_rate =  18; break;
2154                 case 0x5: tap->wr_rate =  24; break;
2155                 case 0x7: tap->wr_rate =  36; break;
2156                 case 0x9: tap->wr_rate =  48; break;
2157                 case 0xb: tap->wr_rate =  72; break;
2158                 case 0x1: tap->wr_rate =  96; break;
2159                 case 0x3: tap->wr_rate = 108; break;
2160                 /* Unknown rate: should not happen. */
2161                 default:  tap->wr_rate =   0;
2162                 }
2163                 tap->wr_dbm_antsignal = rssi;
2164                 tap->wr_dbm_antnoise = nf;
2165         }
2166
2167         IWN_UNLOCK(sc);
2168
2169         /* Send the frame to the 802.11 layer. */
2170         if (ni != NULL) {
2171                 (void) ieee80211_input(ni, m, rssi - nf, nf);
2172                 /* Node is no longer needed. */
2173                 ieee80211_free_node(ni);
2174         } else
2175                 (void) ieee80211_input_all(ic, m, rssi - nf, nf);
2176
2177         IWN_LOCK(sc);
2178 }
2179
2180 #if 0   /* HT */
2181 /* Process an incoming Compressed BlockAck. */
2182 static void
2183 iwn_rx_compressed_ba(struct iwn_softc *sc, struct iwn_rx_desc *desc,
2184     struct iwn_rx_data *data)
2185 {
2186         struct iwn_compressed_ba *ba = (struct iwn_compressed_ba *)(desc + 1);
2187         struct iwn_tx_ring *txq;
2188
2189         txq = &sc->txq[letoh16(ba->qid)];
2190         /* XXX TBD */
2191 }
2192 #endif
2193
2194 /*
2195  * Process a CALIBRATION_RESULT notification sent by the initialization
2196  * firmware on response to a CMD_CALIB_CONFIG command (5000 only.)
2197  */
2198 static void
2199 iwn5000_rx_calib_results(struct iwn_softc *sc, struct iwn_rx_desc *desc,
2200     struct iwn_rx_data *data)
2201 {
2202         struct iwn_phy_calib *calib = (struct iwn_phy_calib *)(desc + 1);
2203         int len, idx = -1;
2204
2205         /* Runtime firmware should not send such a notification. */
2206         if (sc->sc_flags & IWN_FLAG_CALIB_DONE)
2207                 return;
2208
2209         bus_dmamap_sync(sc->rxq.data_dmat, data->map, BUS_DMASYNC_POSTREAD);
2210         len = (le32toh(desc->len) & 0x3fff) - 4;
2211
2212         switch (calib->code) {
2213         case IWN5000_PHY_CALIB_DC:
2214                 if (sc->hw_type == IWN_HW_REV_TYPE_5150 ||
2215                     sc->hw_type == IWN_HW_REV_TYPE_6050)
2216                         idx = 0;
2217                 break;
2218         case IWN5000_PHY_CALIB_LO:
2219                 idx = 1;
2220                 break;
2221         case IWN5000_PHY_CALIB_TX_IQ:
2222                 idx = 2;
2223                 break;
2224         case IWN5000_PHY_CALIB_TX_IQ_PERIODIC:
2225                 if (sc->hw_type < IWN_HW_REV_TYPE_6000 &&
2226                     sc->hw_type != IWN_HW_REV_TYPE_5150)
2227                         idx = 3;
2228                 break;
2229         case IWN5000_PHY_CALIB_BASE_BAND:
2230                 idx = 4;
2231                 break;
2232         }
2233         if (idx == -1)  /* Ignore other results. */
2234                 return;
2235
2236         /* Save calibration result. */
2237         if (sc->calibcmd[idx].buf != NULL)
2238                 kfree(sc->calibcmd[idx].buf, M_DEVBUF);
2239         sc->calibcmd[idx].buf = kmalloc(len, M_DEVBUF, M_INTWAIT);
2240         if (sc->calibcmd[idx].buf == NULL) {
2241                 DPRINTF(sc, IWN_DEBUG_CALIBRATE,
2242                     "not enough memory for calibration result %d\n",
2243                     calib->code);
2244                 return;
2245         }
2246         DPRINTF(sc, IWN_DEBUG_CALIBRATE,
2247             "saving calibration result code=%d len=%d\n", calib->code, len);
2248         sc->calibcmd[idx].len = len;
2249         memcpy(sc->calibcmd[idx].buf, calib, len);
2250 }
2251
2252 /*
2253  * Process an RX_STATISTICS or BEACON_STATISTICS firmware notification.
2254  * The latter is sent by the firmware after each received beacon.
2255  */
2256 static void
2257 iwn_rx_statistics(struct iwn_softc *sc, struct iwn_rx_desc *desc,
2258     struct iwn_rx_data *data)
2259 {
2260         const struct iwn_hal *hal = sc->sc_hal;
2261         struct ifnet *ifp = sc->sc_ifp;
2262         struct ieee80211com *ic = ifp->if_l2com;
2263         struct ieee80211vap *vap = TAILQ_FIRST(&ic->ic_vaps);
2264         struct iwn_calib_state *calib = &sc->calib;
2265         struct iwn_stats *stats = (struct iwn_stats *)(desc + 1);
2266         int temp;
2267
2268         /* Beacon stats are meaningful only when associated and not scanning. */
2269         if (vap->iv_state != IEEE80211_S_RUN ||
2270             (ic->ic_flags & IEEE80211_F_SCAN))
2271                 return;
2272
2273         bus_dmamap_sync(sc->rxq.data_dmat, data->map, BUS_DMASYNC_POSTREAD);
2274         DPRINTF(sc, IWN_DEBUG_CALIBRATE, "%s: cmd %d\n", __func__, desc->type);
2275         iwn_calib_reset(sc);    /* Reset TX power calibration timeout. */
2276
2277         /* Test if temperature has changed. */
2278         if (stats->general.temp != sc->rawtemp) {
2279                 /* Convert "raw" temperature to degC. */
2280                 sc->rawtemp = stats->general.temp;
2281                 temp = hal->get_temperature(sc);
2282                 DPRINTF(sc, IWN_DEBUG_CALIBRATE, "%s: temperature %d\n",
2283                     __func__, temp);
2284
2285                 /* Update TX power if need be (4965AGN only.) */
2286                 if (sc->hw_type == IWN_HW_REV_TYPE_4965)
2287                         iwn4965_power_calibration(sc, temp);
2288         }
2289
2290         if (desc->type != IWN_BEACON_STATISTICS)
2291                 return; /* Reply to a statistics request. */
2292
2293         sc->noise = iwn_get_noise(&stats->rx.general);
2294         DPRINTF(sc, IWN_DEBUG_CALIBRATE, "%s: noise %d\n", __func__, sc->noise);
2295
2296         /* Test that RSSI and noise are present in stats report. */
2297         if (le32toh(stats->rx.general.flags) != 1) {
2298                 DPRINTF(sc, IWN_DEBUG_ANY, "%s\n",
2299                     "received statistics without RSSI");
2300                 return;
2301         }
2302
2303         if (calib->state == IWN_CALIB_STATE_ASSOC)
2304                 iwn_collect_noise(sc, &stats->rx.general);
2305         else if (calib->state == IWN_CALIB_STATE_RUN)
2306                 iwn_tune_sensitivity(sc, &stats->rx);
2307 }
2308
2309 /*
2310  * Process a TX_DONE firmware notification.  Unfortunately, the 4965AGN
2311  * and 5000 adapters have different incompatible TX status formats.
2312  */
2313 static void
2314 iwn4965_tx_done(struct iwn_softc *sc, struct iwn_rx_desc *desc,
2315     struct iwn_rx_data *data)
2316 {
2317         struct iwn4965_tx_stat *stat = (struct iwn4965_tx_stat *)(desc + 1);
2318         struct iwn_tx_ring *ring = &sc->txq[desc->qid & 0xf];
2319
2320         DPRINTF(sc, IWN_DEBUG_XMIT, "%s: "
2321             "qid %d idx %d retries %d nkill %d rate %x duration %d status %x\n",
2322             __func__, desc->qid, desc->idx, stat->ackfailcnt,
2323             stat->btkillcnt, stat->rate, le16toh(stat->duration),
2324             le32toh(stat->status));
2325
2326         bus_dmamap_sync(ring->data_dmat, data->map, BUS_DMASYNC_POSTREAD);
2327         iwn_tx_done(sc, desc, stat->ackfailcnt, le32toh(stat->status) & 0xff);
2328 }
2329
2330 static void
2331 iwn5000_tx_done(struct iwn_softc *sc, struct iwn_rx_desc *desc,
2332     struct iwn_rx_data *data)
2333 {
2334         struct iwn5000_tx_stat *stat = (struct iwn5000_tx_stat *)(desc + 1);
2335         struct iwn_tx_ring *ring = &sc->txq[desc->qid & 0xf];
2336
2337         DPRINTF(sc, IWN_DEBUG_XMIT, "%s: "
2338             "qid %d idx %d retries %d nkill %d rate %x duration %d status %x\n",
2339             __func__, desc->qid, desc->idx, stat->ackfailcnt,
2340             stat->btkillcnt, stat->rate, le16toh(stat->duration),
2341             le32toh(stat->status));
2342
2343 #ifdef notyet
2344         /* Reset TX scheduler slot. */
2345         iwn5000_reset_sched(sc, desc->qid & 0xf, desc->idx);
2346 #endif
2347
2348         bus_dmamap_sync(ring->data_dmat, data->map, BUS_DMASYNC_POSTREAD);
2349         iwn_tx_done(sc, desc, stat->ackfailcnt, le16toh(stat->status) & 0xff);
2350 }
2351
2352 /*
2353  * Adapter-independent backend for TX_DONE firmware notifications.
2354  */
2355 static void
2356 iwn_tx_done(struct iwn_softc *sc, struct iwn_rx_desc *desc, int ackfailcnt,
2357     uint8_t status)
2358 {
2359         struct ifnet *ifp = sc->sc_ifp;
2360         struct iwn_tx_ring *ring = &sc->txq[desc->qid & 0xf];
2361         struct iwn_tx_data *data = &ring->data[desc->idx];
2362         struct mbuf *m;
2363         struct ieee80211_node *ni;
2364         struct ieee80211vap *vap;
2365
2366         KASSERT(data->ni != NULL, ("no node"));
2367
2368         /* Unmap and free mbuf. */
2369         bus_dmamap_sync(ring->data_dmat, data->map, BUS_DMASYNC_POSTWRITE);
2370         bus_dmamap_unload(ring->data_dmat, data->map);
2371         m = data->m, data->m = NULL;
2372         ni = data->ni, data->ni = NULL;
2373         vap = ni->ni_vap;
2374
2375         if (m->m_flags & M_TXCB) {
2376                 /*
2377                  * Channels marked for "radar" require traffic to be received
2378                  * to unlock before we can transmit.  Until traffic is seen
2379                  * any attempt to transmit is returned immediately with status
2380                  * set to IWN_TX_FAIL_TX_LOCKED.  Unfortunately this can easily
2381                  * happen on first authenticate after scanning.  To workaround
2382                  * this we ignore a failure of this sort in AUTH state so the
2383                  * 802.11 layer will fall back to using a timeout to wait for
2384                  * the AUTH reply.  This allows the firmware time to see
2385                  * traffic so a subsequent retry of AUTH succeeds.  It's
2386                  * unclear why the firmware does not maintain state for
2387                  * channels recently visited as this would allow immediate
2388                  * use of the channel after a scan (where we see traffic).
2389                  */
2390                 if (status == IWN_TX_FAIL_TX_LOCKED &&
2391                     ni->ni_vap->iv_state == IEEE80211_S_AUTH)
2392                         ieee80211_process_callback(ni, m, 0);
2393                 else
2394                         ieee80211_process_callback(ni, m,
2395                             (status & IWN_TX_FAIL) != 0);
2396         }
2397
2398         /*
2399          * Update rate control statistics for the node.
2400          */
2401         if (status & 0x80) {
2402                 ifp->if_oerrors++;
2403                 ieee80211_ratectl_tx_complete(vap, ni,
2404                     IEEE80211_RATECTL_TX_FAILURE, &ackfailcnt, NULL);
2405         } else {
2406                 ieee80211_ratectl_tx_complete(vap, ni,
2407                     IEEE80211_RATECTL_TX_SUCCESS, &ackfailcnt, NULL);
2408         }
2409         m_freem(m);
2410         ieee80211_free_node(ni);
2411
2412         sc->sc_tx_timer = 0;
2413         if (--ring->queued < IWN_TX_RING_LOMARK) {
2414                 sc->qfullmsk &= ~(1 << ring->qid);
2415                 if (sc->qfullmsk == 0 &&
2416                     (ifp->if_flags & IFF_OACTIVE)) {
2417                         ifp->if_flags &= ~IFF_OACTIVE;
2418                         iwn_start_locked(ifp);
2419                 }
2420         }
2421 }
2422
2423 /*
2424  * Process a "command done" firmware notification.  This is where we wakeup
2425  * processes waiting for a synchronous command completion.
2426  */
2427 static void
2428 iwn_cmd_done(struct iwn_softc *sc, struct iwn_rx_desc *desc)
2429 {
2430         struct iwn_tx_ring *ring = &sc->txq[4];
2431         struct iwn_tx_data *data;
2432
2433         if ((desc->qid & 0xf) != 4)
2434                 return; /* Not a command ack. */
2435
2436         data = &ring->data[desc->idx];
2437
2438         /* If the command was mapped in an mbuf, free it. */
2439         if (data->m != NULL) {
2440                 bus_dmamap_unload(ring->data_dmat, data->map);
2441                 m_freem(data->m);
2442                 data->m = NULL;
2443         }
2444         wakeup(&ring->desc[desc->idx]);
2445 }
2446
2447 /*
2448  * Process an INT_FH_RX or INT_SW_RX interrupt.
2449  */
2450 static void
2451 iwn_notif_intr(struct iwn_softc *sc)
2452 {
2453         struct ifnet *ifp = sc->sc_ifp;
2454         struct ieee80211com *ic = ifp->if_l2com;
2455         struct ieee80211vap *vap = TAILQ_FIRST(&ic->ic_vaps);
2456         uint16_t hw;
2457
2458         bus_dmamap_sync(sc->rxq.stat_dma.tag, sc->rxq.stat_dma.map,
2459             BUS_DMASYNC_POSTREAD);
2460
2461         hw = le16toh(sc->rxq.stat->closed_count) & 0xfff;
2462         while (sc->rxq.cur != hw) {
2463                 struct iwn_rx_data *data = &sc->rxq.data[sc->rxq.cur];
2464                 struct iwn_rx_desc *desc;
2465
2466                 bus_dmamap_sync(sc->rxq.data_dmat, data->map,
2467                     BUS_DMASYNC_POSTREAD);
2468                 desc = mtod(data->m, struct iwn_rx_desc *);
2469
2470                 DPRINTF(sc, IWN_DEBUG_RECV,
2471                     "%s: qid %x idx %d flags %x type %d(%s) len %d\n",
2472                     __func__, desc->qid & 0xf, desc->idx, desc->flags,
2473                     desc->type, iwn_intr_str(desc->type),
2474                     le16toh(desc->len));
2475
2476                 if (!(desc->qid & 0x80))        /* Reply to a command. */
2477                         iwn_cmd_done(sc, desc);
2478
2479                 switch (desc->type) {
2480                 case IWN_RX_PHY:
2481                         iwn_rx_phy(sc, desc, data);
2482                         break;
2483
2484                 case IWN_RX_DONE:               /* 4965AGN only. */
2485                 case IWN_MPDU_RX_DONE:
2486                         /* An 802.11 frame has been received. */
2487                         iwn_rx_done(sc, desc, data);
2488                         break;
2489
2490 #if 0   /* HT */
2491                 case IWN_RX_COMPRESSED_BA:
2492                         /* A Compressed BlockAck has been received. */
2493                         iwn_rx_compressed_ba(sc, desc, data);
2494                         break;
2495 #endif
2496
2497                 case IWN_TX_DONE:
2498                         /* An 802.11 frame has been transmitted. */
2499                         sc->sc_hal->tx_done(sc, desc, data);
2500                         break;
2501
2502                 case IWN_RX_STATISTICS:
2503                 case IWN_BEACON_STATISTICS:
2504                         iwn_rx_statistics(sc, desc, data);
2505                         break;
2506
2507                 case IWN_BEACON_MISSED:
2508                 {
2509                         struct iwn_beacon_missed *miss =
2510                             (struct iwn_beacon_missed *)(desc + 1);
2511                         int misses;
2512
2513                         bus_dmamap_sync(sc->rxq.data_dmat, data->map,
2514                             BUS_DMASYNC_POSTREAD);
2515                         misses = le32toh(miss->consecutive);
2516
2517                         /* XXX not sure why we're notified w/ zero */
2518                         if (misses == 0)
2519                                 break;
2520                         DPRINTF(sc, IWN_DEBUG_STATE,
2521                             "%s: beacons missed %d/%d\n", __func__,
2522                             misses, le32toh(miss->total));
2523
2524                         /*
2525                          * If more than 5 consecutive beacons are missed,
2526                          * reinitialize the sensitivity state machine.
2527                          */
2528                         if (vap->iv_state == IEEE80211_S_RUN && misses > 5)
2529                                 (void) iwn_init_sensitivity(sc);
2530                         if (misses >= vap->iv_bmissthreshold) {
2531                                 IWN_UNLOCK(sc);
2532                                 ieee80211_beacon_miss(ic);
2533                                 IWN_LOCK(sc);
2534                         }
2535                         break;
2536                 }
2537                 case IWN_UC_READY:
2538                 {
2539                         struct iwn_ucode_info *uc =
2540                             (struct iwn_ucode_info *)(desc + 1);
2541
2542                         /* The microcontroller is ready. */
2543                         bus_dmamap_sync(sc->rxq.data_dmat, data->map,
2544                             BUS_DMASYNC_POSTREAD);
2545                         DPRINTF(sc, IWN_DEBUG_RESET,
2546                             "microcode alive notification version=%d.%d "
2547                             "subtype=%x alive=%x\n", uc->major, uc->minor,
2548                             uc->subtype, le32toh(uc->valid));
2549
2550                         if (le32toh(uc->valid) != 1) {
2551                                 device_printf(sc->sc_dev,
2552                                     "microcontroller initialization failed");
2553                                 break;
2554                         }
2555                         if (uc->subtype == IWN_UCODE_INIT) {
2556                                 /* Save microcontroller report. */
2557                                 memcpy(&sc->ucode_info, uc, sizeof (*uc));
2558                         }
2559                         /* Save the address of the error log in SRAM. */
2560                         sc->errptr = le32toh(uc->errptr);
2561                         break;
2562                 }
2563                 case IWN_STATE_CHANGED:
2564                 {
2565                         uint32_t *status = (uint32_t *)(desc + 1);
2566
2567                         /*
2568                          * State change allows hardware switch change to be
2569                          * noted. However, we handle this in iwn_intr as we
2570                          * get both the enable/disble intr.
2571                          */
2572                         bus_dmamap_sync(sc->rxq.data_dmat, data->map,
2573                             BUS_DMASYNC_POSTREAD);
2574                         DPRINTF(sc, IWN_DEBUG_INTR, "state changed to %x\n",
2575                             le32toh(*status));
2576                         break;
2577                 }
2578                 case IWN_START_SCAN:
2579                 {
2580                         struct iwn_start_scan *scan =
2581                             (struct iwn_start_scan *)(desc + 1);
2582
2583                         bus_dmamap_sync(sc->rxq.data_dmat, data->map,
2584                             BUS_DMASYNC_POSTREAD);
2585                         DPRINTF(sc, IWN_DEBUG_ANY,
2586                             "%s: scanning channel %d status %x\n",
2587                             __func__, scan->chan, le32toh(scan->status));
2588                         break;
2589                 }
2590                 case IWN_STOP_SCAN:
2591                 {
2592                         struct iwn_stop_scan *scan =
2593                             (struct iwn_stop_scan *)(desc + 1);
2594
2595                         bus_dmamap_sync(sc->rxq.data_dmat, data->map,
2596                             BUS_DMASYNC_POSTREAD);
2597                         DPRINTF(sc, IWN_DEBUG_STATE,
2598                             "scan finished nchan=%d status=%d chan=%d\n",
2599                             scan->nchan, scan->status, scan->chan);
2600
2601                         IWN_UNLOCK(sc);
2602                         ieee80211_scan_next(vap);
2603                         IWN_LOCK(sc);
2604                         break;
2605                 }
2606                 case IWN5000_CALIBRATION_RESULT:
2607                         iwn5000_rx_calib_results(sc, desc, data);
2608                         break;
2609
2610                 case IWN5000_CALIBRATION_DONE:
2611                         sc->sc_flags |= IWN_FLAG_CALIB_DONE;
2612                         wakeup(sc);
2613                         break;
2614                 }
2615
2616                 sc->rxq.cur = (sc->rxq.cur + 1) % IWN_RX_RING_COUNT;
2617         }
2618
2619         /* Tell the firmware what we have processed. */
2620         hw = (hw == 0) ? IWN_RX_RING_COUNT - 1 : hw - 1;
2621         IWN_WRITE(sc, IWN_FH_RX_WPTR, hw & ~7);
2622 }
2623
2624 /*
2625  * Process an INT_WAKEUP interrupt raised when the microcontroller wakes up
2626  * from power-down sleep mode.
2627  */
2628 static void
2629 iwn_wakeup_intr(struct iwn_softc *sc)
2630 {
2631         int qid;
2632
2633         DPRINTF(sc, IWN_DEBUG_RESET, "%s: ucode wakeup from power-down sleep\n",
2634             __func__);
2635
2636         /* Wakeup RX and TX rings. */
2637         IWN_WRITE(sc, IWN_FH_RX_WPTR, sc->rxq.cur & ~7);
2638         for (qid = 0; qid < sc->sc_hal->ntxqs; qid++) {
2639                 struct iwn_tx_ring *ring = &sc->txq[qid];
2640                 IWN_WRITE(sc, IWN_HBUS_TARG_WRPTR, qid << 8 | ring->cur);
2641         }
2642 }
2643
2644 static void
2645 iwn_rftoggle_intr(struct iwn_softc *sc)
2646 {
2647         struct ifnet *ifp = sc->sc_ifp;
2648         struct ieee80211com *ic = ifp->if_l2com;
2649         uint32_t tmp = IWN_READ(sc, IWN_GP_CNTRL);
2650
2651         IWN_LOCK_ASSERT(sc);
2652
2653         device_printf(sc->sc_dev, "RF switch: radio %s\n",
2654             (tmp & IWN_GP_CNTRL_RFKILL) ? "enabled" : "disabled");
2655         if (tmp & IWN_GP_CNTRL_RFKILL)
2656                 ieee80211_runtask(ic, &sc->sc_radioon_task);
2657         else
2658                 ieee80211_runtask(ic, &sc->sc_radiooff_task);
2659 }
2660
2661 /*
2662  * Dump the error log of the firmware when a firmware panic occurs.  Although
2663  * we can't debug the firmware because it is neither open source nor free, it
2664  * can help us to identify certain classes of problems.
2665  */
2666 static void
2667 iwn_fatal_intr(struct iwn_softc *sc)
2668 {
2669         const struct iwn_hal *hal = sc->sc_hal;
2670         struct iwn_fw_dump dump;
2671         int i;
2672
2673         IWN_LOCK_ASSERT(sc);
2674
2675         /* Force a complete recalibration on next init. */
2676         sc->sc_flags &= ~IWN_FLAG_CALIB_DONE;
2677
2678         /* Check that the error log address is valid. */
2679         if (sc->errptr < IWN_FW_DATA_BASE ||
2680             sc->errptr + sizeof (dump) >
2681             IWN_FW_DATA_BASE + hal->fw_data_maxsz) {
2682                 kprintf("%s: bad firmware error log address 0x%08x\n",
2683                     __func__, sc->errptr);
2684                 return;
2685         }
2686         if (iwn_nic_lock(sc) != 0) {
2687                 kprintf("%s: could not read firmware error log\n",
2688                     __func__);
2689                 return;
2690         }
2691         /* Read firmware error log from SRAM. */
2692         iwn_mem_read_region_4(sc, sc->errptr, (uint32_t *)&dump,
2693             sizeof (dump) / sizeof (uint32_t));
2694         iwn_nic_unlock(sc);
2695
2696         if (dump.valid == 0) {
2697                 kprintf("%s: firmware error log is empty\n",
2698                     __func__);
2699                 return;
2700         }
2701         kprintf("firmware error log:\n");
2702         kprintf("  error type      = \"%s\" (0x%08X)\n",
2703             (dump.id < nitems(iwn_fw_errmsg)) ?
2704                 iwn_fw_errmsg[dump.id] : "UNKNOWN",
2705             dump.id);
2706         kprintf("  program counter = 0x%08X\n", dump.pc);
2707         kprintf("  source line     = 0x%08X\n", dump.src_line);
2708         kprintf("  error data      = 0x%08X%08X\n",
2709             dump.error_data[0], dump.error_data[1]);
2710         kprintf("  branch link     = 0x%08X%08X\n",
2711             dump.branch_link[0], dump.branch_link[1]);
2712         kprintf("  interrupt link  = 0x%08X%08X\n",
2713             dump.interrupt_link[0], dump.interrupt_link[1]);
2714         kprintf("  time            = %u\n", dump.time[0]);
2715
2716         /* Dump driver status (TX and RX rings) while we're here. */
2717         kprintf("driver status:\n");
2718         for (i = 0; i < hal->ntxqs; i++) {
2719                 struct iwn_tx_ring *ring = &sc->txq[i];
2720                 kprintf("  tx ring %2d: qid=%-2d cur=%-3d queued=%-3d\n",
2721                     i, ring->qid, ring->cur, ring->queued);
2722         }
2723         kprintf("  rx ring: cur=%d\n", sc->rxq.cur);
2724 }
2725
2726 static void
2727 iwn_intr(void *arg)
2728 {
2729         struct iwn_softc *sc = arg;
2730         struct ifnet *ifp = sc->sc_ifp;
2731         uint32_t r1, r2, tmp;
2732
2733         /* Disable interrupts. */
2734         IWN_WRITE(sc, IWN_INT_MASK, 0);
2735
2736         /* Read interrupts from ICT (fast) or from registers (slow). */
2737         if (sc->sc_flags & IWN_FLAG_USE_ICT) {
2738                 tmp = 0;
2739                 while (sc->ict[sc->ict_cur] != 0) {
2740                         tmp |= sc->ict[sc->ict_cur];
2741                         sc->ict[sc->ict_cur] = 0;       /* Acknowledge. */
2742                         sc->ict_cur = (sc->ict_cur + 1) % IWN_ICT_COUNT;
2743                 }
2744                 tmp = le32toh(tmp);
2745                 if (tmp == 0xffffffff)  /* Shouldn't happen. */
2746                         tmp = 0;
2747                 else if (tmp & 0xc0000) /* Workaround a HW bug. */
2748                         tmp |= 0x8000;
2749                 r1 = (tmp & 0xff00) << 16 | (tmp & 0xff);
2750                 r2 = 0; /* Unused. */
2751         } else {
2752                 r1 = IWN_READ(sc, IWN_INT);
2753                 if (r1 == 0xffffffff || (r1 & 0xfffffff0) == 0xa5a5a5a0)
2754                         return; /* Hardware gone! */
2755                 r2 = IWN_READ(sc, IWN_FH_INT);
2756         }
2757
2758         DPRINTF(sc, IWN_DEBUG_INTR, "interrupt reg1=%x reg2=%x\n", r1, r2);
2759
2760         if (r1 == 0 && r2 == 0)
2761                 goto done;      /* Interrupt not for us. */
2762
2763         /* Acknowledge interrupts. */
2764         IWN_WRITE(sc, IWN_INT, r1);
2765         if (!(sc->sc_flags & IWN_FLAG_USE_ICT))
2766                 IWN_WRITE(sc, IWN_FH_INT, r2);
2767
2768         if (r1 & IWN_INT_RF_TOGGLED) {
2769                 iwn_rftoggle_intr(sc);
2770                 goto done;
2771         }
2772         if (r1 & IWN_INT_CT_REACHED) {
2773                 device_printf(sc->sc_dev, "%s: critical temperature reached!\n",
2774                     __func__);
2775         }
2776         if (r1 & (IWN_INT_SW_ERR | IWN_INT_HW_ERR)) {
2777                 iwn_fatal_intr(sc);
2778                 ifp->if_flags &= ~IFF_UP;
2779                 iwn_stop_locked(sc);
2780                 goto done;
2781         }
2782         if ((r1 & (IWN_INT_FH_RX | IWN_INT_SW_RX | IWN_INT_RX_PERIODIC)) ||
2783             (r2 & IWN_FH_INT_RX)) {
2784                 if (sc->sc_flags & IWN_FLAG_USE_ICT) {
2785                         if (r1 & (IWN_INT_FH_RX | IWN_INT_SW_RX))
2786                                 IWN_WRITE(sc, IWN_FH_INT, IWN_FH_INT_RX);
2787                         IWN_WRITE_1(sc, IWN_INT_PERIODIC,
2788                             IWN_INT_PERIODIC_DIS);
2789                         iwn_notif_intr(sc);
2790                         if (r1 & (IWN_INT_FH_RX | IWN_INT_SW_RX)) {
2791                                 IWN_WRITE_1(sc, IWN_INT_PERIODIC,
2792                                     IWN_INT_PERIODIC_ENA);
2793                         }
2794                 } else
2795                         iwn_notif_intr(sc);
2796         }
2797
2798         if ((r1 & IWN_INT_FH_TX) || (r2 & IWN_FH_INT_TX)) {
2799                 if (sc->sc_flags & IWN_FLAG_USE_ICT)
2800                         IWN_WRITE(sc, IWN_FH_INT, IWN_FH_INT_TX);
2801                 wakeup(sc);     /* FH DMA transfer completed. */
2802         }
2803
2804         if (r1 & IWN_INT_ALIVE)
2805                 wakeup(sc);     /* Firmware is alive. */
2806
2807         if (r1 & IWN_INT_WAKEUP)
2808                 iwn_wakeup_intr(sc);
2809
2810 done:
2811         /* Re-enable interrupts. */
2812         if (ifp->if_flags & IFF_UP)
2813                 IWN_WRITE(sc, IWN_INT_MASK, sc->int_mask);
2814
2815 }
2816
2817 /*
2818  * Update TX scheduler ring when transmitting an 802.11 frame (4965AGN and
2819  * 5000 adapters use a slightly different format.)
2820  */
2821 static void
2822 iwn4965_update_sched(struct iwn_softc *sc, int qid, int idx, uint8_t id,
2823     uint16_t len)
2824 {
2825         uint16_t *w = &sc->sched[qid * IWN4965_SCHED_COUNT + idx];
2826
2827         *w = htole16(len + 8);
2828         bus_dmamap_sync(sc->sched_dma.tag, sc->sched_dma.map,
2829             BUS_DMASYNC_PREWRITE);
2830         if (idx < IWN_SCHED_WINSZ) {
2831                 *(w + IWN_TX_RING_COUNT) = *w;
2832                 bus_dmamap_sync(sc->sched_dma.tag, sc->sched_dma.map,
2833                     BUS_DMASYNC_PREWRITE);
2834         }
2835 }
2836
2837 static void
2838 iwn5000_update_sched(struct iwn_softc *sc, int qid, int idx, uint8_t id,
2839     uint16_t len)
2840 {
2841         uint16_t *w = &sc->sched[qid * IWN5000_SCHED_COUNT + idx];
2842
2843         *w = htole16(id << 12 | (len + 8));
2844
2845         bus_dmamap_sync(sc->sched_dma.tag, sc->sched_dma.map,
2846             BUS_DMASYNC_PREWRITE);
2847         if (idx < IWN_SCHED_WINSZ) {
2848                 *(w + IWN_TX_RING_COUNT) = *w;
2849                 bus_dmamap_sync(sc->sched_dma.tag, sc->sched_dma.map,
2850                     BUS_DMASYNC_PREWRITE);
2851         }
2852 }
2853
2854 #ifdef notyet
2855 static void
2856 iwn5000_reset_sched(struct iwn_softc *sc, int qid, int idx)
2857 {
2858         uint16_t *w = &sc->sched[qid * IWN5000_SCHED_COUNT + idx];
2859
2860         *w = (*w & htole16(0xf000)) | htole16(1);
2861         bus_dmamap_sync(sc->sched_dma.tag, sc->sched_dma.map,
2862             BUS_DMASYNC_PREWRITE);
2863         if (idx < IWN_SCHED_WINSZ) {
2864                 *(w + IWN_TX_RING_COUNT) = *w;
2865                 bus_dmamap_sync(sc->sched_dma.tag, sc->sched_dma.map,
2866                     BUS_DMASYNC_PREWRITE);
2867         }
2868 }
2869 #endif
2870
2871 static uint8_t
2872 iwn_plcp_signal(int rate) {
2873         int i;
2874
2875         for (i = 0; i < IWN_RIDX_MAX + 1; i++) {
2876                 if (rate == iwn_rates[i].rate)
2877                         return i;
2878         }
2879
2880         return 0;
2881 }
2882
2883 static int
2884 iwn_tx_data(struct iwn_softc *sc, struct mbuf *m, struct ieee80211_node *ni,
2885     struct iwn_tx_ring *ring)
2886 {
2887         const struct iwn_hal *hal = sc->sc_hal;
2888         const struct ieee80211_txparam *tp;
2889         const struct iwn_rate *rinfo;
2890         struct ieee80211vap *vap = ni->ni_vap;
2891         struct ieee80211com *ic = ni->ni_ic;
2892         struct iwn_node *wn = (void *)ni;
2893         struct iwn_tx_desc *desc;
2894         struct iwn_tx_data *data;
2895         struct iwn_tx_cmd *cmd;
2896         struct iwn_cmd_data *tx;
2897         struct ieee80211_frame *wh;
2898         struct ieee80211_key *k = NULL;
2899         struct mbuf *mnew;
2900         bus_dma_segment_t segs[IWN_MAX_SCATTER];
2901         uint32_t flags;
2902         u_int hdrlen;
2903         int totlen, error, pad, nsegs = 0, i, rate;
2904         uint8_t ridx, type, txant;
2905
2906         IWN_LOCK_ASSERT(sc);
2907
2908         wh = mtod(m, struct ieee80211_frame *);
2909         hdrlen = ieee80211_anyhdrsize(wh);
2910         type = wh->i_fc[0] & IEEE80211_FC0_TYPE_MASK;
2911
2912         desc = &ring->desc[ring->cur];
2913         data = &ring->data[ring->cur];
2914
2915         /* Choose a TX rate index. */
2916         tp = &vap->iv_txparms[ieee80211_chan2mode(ni->ni_chan)];
2917         if (type == IEEE80211_FC0_TYPE_MGT)
2918                 rate = tp->mgmtrate;
2919         else if (IEEE80211_IS_MULTICAST(wh->i_addr1))
2920                 rate = tp->mcastrate;
2921         else if (tp->ucastrate != IEEE80211_FIXED_RATE_NONE)
2922                 rate = tp->ucastrate;
2923         else {
2924                 /* XXX pass pktlen */
2925                 ieee80211_ratectl_rate(ni, NULL, 0);
2926
2927                 rate = ni->ni_txrate;
2928         }
2929         ridx = iwn_plcp_signal(rate);
2930         rinfo = &iwn_rates[ridx];
2931
2932         /* Encrypt the frame if need be. */
2933         if (wh->i_fc[1] & IEEE80211_FC1_WEP) {
2934                 k = ieee80211_crypto_encap(ni, m);
2935                 if (k == NULL) {
2936                         m_freem(m);
2937                         return ENOBUFS;
2938                 }
2939                 /* Packet header may have moved, reset our local pointer. */
2940                 wh = mtod(m, struct ieee80211_frame *);
2941         }
2942         totlen = m->m_pkthdr.len;
2943
2944         if (ieee80211_radiotap_active_vap(vap)) {
2945                 struct iwn_tx_radiotap_header *tap = &sc->sc_txtap;
2946
2947                 tap->wt_flags = 0;
2948                 tap->wt_rate = rinfo->rate;
2949                 if (k != NULL)
2950                         tap->wt_flags |= IEEE80211_RADIOTAP_F_WEP;
2951
2952                 ieee80211_radiotap_tx(vap, m);
2953         }
2954
2955         /* Prepare TX firmware command. */
2956         cmd = &ring->cmd[ring->cur];
2957         cmd->code = IWN_CMD_TX_DATA;
2958         cmd->flags = 0;
2959         cmd->qid = ring->qid;
2960         cmd->idx = ring->cur;
2961
2962         tx = (struct iwn_cmd_data *)cmd->data;
2963         /* NB: No need to clear tx, all fields are reinitialized here. */
2964         tx->scratch = 0;        /* clear "scratch" area */
2965
2966         flags = 0;
2967         if (!IEEE80211_IS_MULTICAST(wh->i_addr1))
2968                 flags |= IWN_TX_NEED_ACK;
2969         if ((wh->i_fc[0] &
2970             (IEEE80211_FC0_TYPE_MASK | IEEE80211_FC0_SUBTYPE_MASK)) ==
2971             (IEEE80211_FC0_TYPE_CTL | IEEE80211_FC0_SUBTYPE_BAR))
2972                 flags |= IWN_TX_IMM_BA;         /* Cannot happen yet. */
2973
2974         if (wh->i_fc[1] & IEEE80211_FC1_MORE_FRAG)
2975                 flags |= IWN_TX_MORE_FRAG;      /* Cannot happen yet. */
2976
2977         /* Check if frame must be protected using RTS/CTS or CTS-to-self. */
2978         if (!IEEE80211_IS_MULTICAST(wh->i_addr1)) {
2979                 /* NB: Group frames are sent using CCK in 802.11b/g. */
2980                 if (totlen + IEEE80211_CRC_LEN > vap->iv_rtsthreshold) {
2981                         flags |= IWN_TX_NEED_RTS;
2982                 } else if ((ic->ic_flags & IEEE80211_F_USEPROT) &&
2983                     ridx >= IWN_RIDX_OFDM6) {
2984                         if (ic->ic_protmode == IEEE80211_PROT_CTSONLY)
2985                                 flags |= IWN_TX_NEED_CTS;
2986                         else if (ic->ic_protmode == IEEE80211_PROT_RTSCTS)
2987                                 flags |= IWN_TX_NEED_RTS;
2988                 }
2989                 if (flags & (IWN_TX_NEED_RTS | IWN_TX_NEED_CTS)) {
2990                         if (sc->hw_type != IWN_HW_REV_TYPE_4965) {
2991                                 /* 5000 autoselects RTS/CTS or CTS-to-self. */
2992                                 flags &= ~(IWN_TX_NEED_RTS | IWN_TX_NEED_CTS);
2993                                 flags |= IWN_TX_NEED_PROTECTION;
2994                         } else
2995                                 flags |= IWN_TX_FULL_TXOP;
2996                 }
2997         }
2998
2999         if (IEEE80211_IS_MULTICAST(wh->i_addr1) ||
3000             type != IEEE80211_FC0_TYPE_DATA)
3001                 tx->id = hal->broadcast_id;
3002         else
3003                 tx->id = wn->id;
3004
3005         if (type == IEEE80211_FC0_TYPE_MGT) {
3006                 uint8_t subtype = wh->i_fc[0] & IEEE80211_FC0_SUBTYPE_MASK;
3007
3008                 /* Tell HW to set timestamp in probe responses. */
3009                 if (subtype == IEEE80211_FC0_SUBTYPE_PROBE_RESP)
3010                         flags |= IWN_TX_INSERT_TSTAMP;
3011
3012                 if (subtype == IEEE80211_FC0_SUBTYPE_ASSOC_REQ ||
3013                     subtype == IEEE80211_FC0_SUBTYPE_REASSOC_REQ)
3014                         tx->timeout = htole16(3);
3015                 else
3016                         tx->timeout = htole16(2);
3017         } else
3018                 tx->timeout = htole16(0);
3019
3020         if (hdrlen & 3) {
3021                 /* First segment length must be a multiple of 4. */
3022                 flags |= IWN_TX_NEED_PADDING;
3023                 pad = 4 - (hdrlen & 3);
3024         } else
3025                 pad = 0;
3026
3027         tx->len = htole16(totlen);
3028         tx->tid = 0;
3029         tx->rts_ntries = 60;
3030         tx->data_ntries = 15;
3031         tx->lifetime = htole32(IWN_LIFETIME_INFINITE);
3032         tx->plcp = rinfo->plcp;
3033         tx->rflags = rinfo->flags;
3034         if (tx->id == hal->broadcast_id) {
3035                 /* Group or management frame. */
3036                 tx->linkq = 0;
3037                 /* XXX Alternate between antenna A and B? */
3038                 txant = IWN_LSB(sc->txchainmask);
3039                 tx->rflags |= IWN_RFLAG_ANT(txant);
3040         } else {
3041                 tx->linkq = 0;
3042                 flags |= IWN_TX_LINKQ;  /* enable MRR */
3043         }
3044
3045         /* Set physical address of "scratch area". */
3046         tx->loaddr = htole32(IWN_LOADDR(data->scratch_paddr));
3047         tx->hiaddr = IWN_HIADDR(data->scratch_paddr);
3048
3049         /* Copy 802.11 header in TX command. */
3050         memcpy((uint8_t *)(tx + 1), wh, hdrlen);
3051
3052         /* Trim 802.11 header. */
3053         m_adj(m, hdrlen);
3054         tx->security = 0;
3055         tx->flags = htole32(flags);
3056
3057         if (m->m_len > 0) {
3058                 error = bus_dmamap_load_mbuf_segment(ring->data_dmat, data->map,
3059                     m, segs, IWN_MAX_SCATTER - 1, &nsegs, BUS_DMA_NOWAIT);
3060                 if (error == EFBIG) {
3061                         /* too many fragments, linearize */
3062                         mnew = m_defrag(m, MB_DONTWAIT);
3063                         if (mnew == NULL) {
3064                                 device_printf(sc->sc_dev,
3065                                     "%s: could not defrag mbuf\n", __func__);
3066                                 m_freem(m);
3067                                 return ENOBUFS;
3068                         }
3069                         m = mnew;
3070                         error = bus_dmamap_load_mbuf_segment(ring->data_dmat,
3071                             data->map, m, segs, IWN_MAX_SCATTER - 1, &nsegs, BUS_DMA_NOWAIT);
3072                 }
3073                 if (error != 0) {
3074                         device_printf(sc->sc_dev,
3075                             "%s: bus_dmamap_load_mbuf_segment failed, error %d\n",
3076                             __func__, error);
3077                         m_freem(m);
3078                         return error;
3079                 }
3080         }
3081
3082         data->m = m;
3083         data->ni = ni;
3084
3085         DPRINTF(sc, IWN_DEBUG_XMIT, "%s: qid %d idx %d len %d nsegs %d\n",
3086             __func__, ring->qid, ring->cur, m->m_pkthdr.len, nsegs);
3087
3088         /* Fill TX descriptor. */
3089         desc->nsegs = 1 + nsegs;
3090         /* First DMA segment is used by the TX command. */
3091         desc->segs[0].addr = htole32(IWN_LOADDR(data->cmd_paddr));
3092         desc->segs[0].len  = htole16(IWN_HIADDR(data->cmd_paddr) |
3093             (4 + sizeof (*tx) + hdrlen + pad) << 4);
3094         /* Other DMA segments are for data payload. */
3095         for (i = 1; i <= nsegs; i++) {
3096                 desc->segs[i].addr = htole32(IWN_LOADDR(segs[i - 1].ds_addr));
3097                 desc->segs[i].len  = htole16(IWN_HIADDR(segs[i - 1].ds_addr) |
3098                     segs[i - 1].ds_len << 4);
3099         }
3100
3101         bus_dmamap_sync(ring->data_dmat, data->map, BUS_DMASYNC_PREWRITE);
3102         bus_dmamap_sync(ring->data_dmat, ring->cmd_dma.map,
3103             BUS_DMASYNC_PREWRITE);
3104         bus_dmamap_sync(ring->desc_dma.tag, ring->desc_dma.map,
3105             BUS_DMASYNC_PREWRITE);
3106
3107 #ifdef notyet
3108         /* Update TX scheduler. */
3109         hal->update_sched(sc, ring->qid, ring->cur, tx->id, totlen);
3110 #endif
3111
3112         /* Kick TX ring. */
3113         ring->cur = (ring->cur + 1) % IWN_TX_RING_COUNT;
3114         IWN_WRITE(sc, IWN_HBUS_TARG_WRPTR, ring->qid << 8 | ring->cur);
3115
3116         /* Mark TX ring as full if we reach a certain threshold. */
3117         if (++ring->queued > IWN_TX_RING_HIMARK)
3118                 sc->qfullmsk |= 1 << ring->qid;
3119
3120         return 0;
3121 }
3122
3123 static int
3124 iwn_tx_data_raw(struct iwn_softc *sc, struct mbuf *m,
3125     struct ieee80211_node *ni, struct iwn_tx_ring *ring,
3126     const struct ieee80211_bpf_params *params)
3127 {
3128         const struct iwn_hal *hal = sc->sc_hal;
3129         const struct iwn_rate *rinfo;
3130         struct ifnet *ifp = sc->sc_ifp;
3131         struct ieee80211vap *vap = ni->ni_vap;
3132         struct ieee80211com *ic = ifp->if_l2com;
3133         struct iwn_tx_cmd *cmd;
3134         struct iwn_cmd_data *tx;
3135         struct ieee80211_frame *wh;
3136         struct iwn_tx_desc *desc;
3137         struct iwn_tx_data *data;
3138         struct mbuf *mnew;
3139         bus_addr_t paddr;
3140         bus_dma_segment_t segs[IWN_MAX_SCATTER];
3141         uint32_t flags;
3142         u_int hdrlen;
3143         int totlen, error, pad, nsegs = 0, i, rate;
3144         uint8_t ridx, type, txant;
3145
3146         IWN_LOCK_ASSERT(sc);
3147
3148         wh = mtod(m, struct ieee80211_frame *);
3149         hdrlen = ieee80211_anyhdrsize(wh);
3150         type = wh->i_fc[0] & IEEE80211_FC0_TYPE_MASK;
3151
3152         desc = &ring->desc[ring->cur];
3153         data = &ring->data[ring->cur];
3154
3155         /* Choose a TX rate index. */
3156         rate = params->ibp_rate0;
3157         if (!ieee80211_isratevalid(ic->ic_rt, rate)) {
3158                 /* XXX fall back to mcast/mgmt rate? */
3159                 m_freem(m);
3160                 return EINVAL;
3161         }
3162         ridx = iwn_plcp_signal(rate);
3163         rinfo = &iwn_rates[ridx];
3164
3165         totlen = m->m_pkthdr.len;
3166
3167         /* Prepare TX firmware command. */
3168         cmd = &ring->cmd[ring->cur];
3169         cmd->code = IWN_CMD_TX_DATA;
3170         cmd->flags = 0;
3171         cmd->qid = ring->qid;
3172         cmd->idx = ring->cur;
3173
3174         tx = (struct iwn_cmd_data *)cmd->data;
3175         /* NB: No need to clear tx, all fields are reinitialized here. */
3176         tx->scratch = 0;        /* clear "scratch" area */
3177
3178         flags = 0;
3179         if ((params->ibp_flags & IEEE80211_BPF_NOACK) == 0)
3180                 flags |= IWN_TX_NEED_ACK;
3181         if (params->ibp_flags & IEEE80211_BPF_RTS) {
3182                 if (sc->hw_type != IWN_HW_REV_TYPE_4965) {
3183                         /* 5000 autoselects RTS/CTS or CTS-to-self. */
3184                         flags &= ~IWN_TX_NEED_RTS;
3185                         flags |= IWN_TX_NEED_PROTECTION;
3186                 } else
3187                         flags |= IWN_TX_NEED_RTS | IWN_TX_FULL_TXOP;
3188         }
3189         if (params->ibp_flags & IEEE80211_BPF_CTS) {
3190                 if (sc->hw_type != IWN_HW_REV_TYPE_4965) {
3191                         /* 5000 autoselects RTS/CTS or CTS-to-self. */
3192                         flags &= ~IWN_TX_NEED_CTS;
3193                         flags |= IWN_TX_NEED_PROTECTION;
3194                 } else
3195                         flags |= IWN_TX_NEED_CTS | IWN_TX_FULL_TXOP;
3196         }
3197         if (type == IEEE80211_FC0_TYPE_MGT) {
3198                 uint8_t subtype = wh->i_fc[0] & IEEE80211_FC0_SUBTYPE_MASK;
3199
3200                 if (subtype == IEEE80211_FC0_SUBTYPE_PROBE_RESP)
3201                         flags |= IWN_TX_INSERT_TSTAMP;
3202
3203                 if (subtype == IEEE80211_FC0_SUBTYPE_ASSOC_REQ ||
3204                     subtype == IEEE80211_FC0_SUBTYPE_REASSOC_REQ)
3205                         tx->timeout = htole16(3);
3206                 else
3207                         tx->timeout = htole16(2);
3208         } else
3209                 tx->timeout = htole16(0);
3210
3211         if (hdrlen & 3) {
3212                 /* First segment length must be a multiple of 4. */
3213                 flags |= IWN_TX_NEED_PADDING;
3214                 pad = 4 - (hdrlen & 3);
3215         } else
3216                 pad = 0;
3217
3218         if (ieee80211_radiotap_active_vap(vap)) {
3219                 struct iwn_tx_radiotap_header *tap = &sc->sc_txtap;
3220
3221                 tap->wt_flags = 0;
3222                 tap->wt_rate = rate;
3223
3224                 ieee80211_radiotap_tx(vap, m);
3225         }
3226
3227         tx->len = htole16(totlen);
3228         tx->tid = 0;
3229         tx->id = hal->broadcast_id;
3230         tx->rts_ntries = params->ibp_try1;
3231         tx->data_ntries = params->ibp_try0;
3232         tx->lifetime = htole32(IWN_LIFETIME_INFINITE);
3233         tx->plcp = rinfo->plcp;
3234         tx->rflags = rinfo->flags;
3235         /* Group or management frame. */
3236         tx->linkq = 0;
3237         txant = IWN_LSB(sc->txchainmask);
3238         tx->rflags |= IWN_RFLAG_ANT(txant);
3239         /* Set physical address of "scratch area". */
3240         paddr = ring->cmd_dma.paddr + ring->cur * sizeof (struct iwn_tx_cmd);
3241         tx->loaddr = htole32(IWN_LOADDR(paddr));
3242         tx->hiaddr = IWN_HIADDR(paddr);
3243
3244         /* Copy 802.11 header in TX command. */
3245         memcpy((uint8_t *)(tx + 1), wh, hdrlen);
3246
3247         /* Trim 802.11 header. */
3248         m_adj(m, hdrlen);
3249         tx->security = 0;
3250         tx->flags = htole32(flags);
3251
3252         if (m->m_len > 0) {
3253                 error = bus_dmamap_load_mbuf_segment(ring->data_dmat, data->map,
3254                     m, segs, IWN_MAX_SCATTER - 1, &nsegs, BUS_DMA_NOWAIT);
3255                 if (error == EFBIG) {
3256                         /* Too many fragments, linearize. */
3257                         mnew = m_defrag(m, MB_DONTWAIT);
3258                         if (mnew == NULL) {
3259                                 device_printf(sc->sc_dev,
3260                                     "%s: could not defrag mbuf\n", __func__);
3261                                 m_freem(m);
3262                                 return ENOBUFS;
3263                         }
3264                         m = mnew;
3265                         error = bus_dmamap_load_mbuf_segment(ring->data_dmat,
3266                             data->map, m, segs, IWN_MAX_SCATTER - 1, &nsegs, BUS_DMA_NOWAIT);
3267                 }
3268                 if (error != 0) {
3269                         device_printf(sc->sc_dev,
3270                             "%s: bus_dmamap_load_mbuf_segment failed, error %d\n",
3271                             __func__, error);
3272                         m_freem(m);
3273                         return error;
3274                 }
3275         }
3276
3277         data->m = m;
3278         data->ni = ni;
3279
3280         DPRINTF(sc, IWN_DEBUG_XMIT, "%s: qid %d idx %d len %d nsegs %d\n",
3281             __func__, ring->qid, ring->cur, m->m_pkthdr.len, nsegs);
3282
3283         /* Fill TX descriptor. */
3284         desc->nsegs = 1 + nsegs;
3285         /* First DMA segment is used by the TX command. */
3286         desc->segs[0].addr = htole32(IWN_LOADDR(data->cmd_paddr));
3287         desc->segs[0].len  = htole16(IWN_HIADDR(data->cmd_paddr) |
3288             (4 + sizeof (*tx) + hdrlen + pad) << 4);
3289         /* Other DMA segments are for data payload. */
3290         for (i = 1; i <= nsegs; i++) {
3291                 desc->segs[i].addr = htole32(IWN_LOADDR(segs[i - 1].ds_addr));
3292                 desc->segs[i].len  = htole16(IWN_HIADDR(segs[i - 1].ds_addr) |
3293                     segs[i - 1].ds_len << 4);
3294         }
3295
3296         bus_dmamap_sync(ring->data_dmat, data->map, BUS_DMASYNC_PREWRITE);
3297         bus_dmamap_sync(ring->data_dmat, ring->cmd_dma.map,
3298             BUS_DMASYNC_PREWRITE);
3299         bus_dmamap_sync(ring->desc_dma.tag, ring->desc_dma.map,
3300             BUS_DMASYNC_PREWRITE);
3301
3302 #ifdef notyet
3303         /* Update TX scheduler. */
3304         hal->update_sched(sc, ring->qid, ring->cur, tx->id, totlen);
3305 #endif
3306
3307         /* Kick TX ring. */
3308         ring->cur = (ring->cur + 1) % IWN_TX_RING_COUNT;
3309         IWN_WRITE(sc, IWN_HBUS_TARG_WRPTR, ring->qid << 8 | ring->cur);
3310
3311         /* Mark TX ring as full if we reach a certain threshold. */
3312         if (++ring->queued > IWN_TX_RING_HIMARK)
3313                 sc->qfullmsk |= 1 << ring->qid;
3314
3315         return 0;
3316 }
3317
3318 static int
3319 iwn_raw_xmit(struct ieee80211_node *ni, struct mbuf *m,
3320         const struct ieee80211_bpf_params *params)
3321 {
3322         struct ieee80211com *ic = ni->ni_ic;
3323         struct ifnet *ifp = ic->ic_ifp;
3324         struct iwn_softc *sc = ifp->if_softc;
3325         struct iwn_tx_ring *txq;
3326         int error = 0;
3327
3328         if ((ifp->if_flags & IFF_RUNNING) == 0) {
3329                 ieee80211_free_node(ni);
3330                 m_freem(m);
3331                 return ENETDOWN;
3332         }
3333
3334         IWN_LOCK(sc);
3335         if (params == NULL)
3336                 txq = &sc->txq[M_WME_GETAC(m)];
3337         else
3338                 txq = &sc->txq[params->ibp_pri & 3];
3339
3340         if (params == NULL) {
3341                 /*
3342                  * Legacy path; interpret frame contents to decide
3343                  * precisely how to send the frame.
3344                  */
3345                 error = iwn_tx_data(sc, m, ni, txq);
3346         } else {
3347                 /*
3348                  * Caller supplied explicit parameters to use in
3349                  * sending the frame.
3350                  */
3351                 error = iwn_tx_data_raw(sc, m, ni, txq, params);
3352         }
3353         if (error != 0) {
3354                 /* NB: m is reclaimed on tx failure */
3355                 ieee80211_free_node(ni);
3356                 ifp->if_oerrors++;
3357         }
3358         IWN_UNLOCK(sc);
3359         return error;
3360 }
3361
3362 static void
3363 iwn_start(struct ifnet *ifp)
3364 {
3365         struct iwn_softc *sc = ifp->if_softc;
3366
3367         IWN_LOCK_ASSERT(sc);
3368
3369         iwn_start_locked(ifp);
3370 }
3371
3372 static void
3373 iwn_start_locked(struct ifnet *ifp)
3374 {
3375         struct iwn_softc *sc = ifp->if_softc;
3376         struct ieee80211_node *ni;
3377         struct iwn_tx_ring *txq;
3378         struct mbuf *m;
3379         int pri;
3380
3381         IWN_LOCK_ASSERT(sc);
3382
3383         for (;;) {
3384                 if (sc->qfullmsk != 0) {
3385                         ifp->if_flags |= IFF_OACTIVE;
3386                         break;
3387                 }
3388                 m = ifq_dequeue(&ifp->if_snd, NULL);
3389                 if (m == NULL)
3390                         break;
3391                 ni = (struct ieee80211_node *)m->m_pkthdr.rcvif;
3392                 pri = M_WME_GETAC(m);
3393                 txq = &sc->txq[pri];
3394                 if (iwn_tx_data(sc, m, ni, txq) != 0) {
3395                         ifp->if_oerrors++;
3396                         ieee80211_free_node(ni);
3397                         break;
3398                 }
3399                 sc->sc_tx_timer = 5;
3400         }
3401 }
3402
3403 static void
3404 iwn_watchdog(struct iwn_softc *sc)
3405 {
3406         if (sc->sc_tx_timer > 0 && --sc->sc_tx_timer == 0) {
3407                 struct ifnet *ifp = sc->sc_ifp;
3408                 struct ieee80211com *ic = ifp->if_l2com;
3409
3410                 if_printf(ifp, "device timeout\n");
3411                 ieee80211_runtask(ic, &sc->sc_reinit_task);
3412         }
3413 }
3414
3415 static int
3416 iwn_ioctl(struct ifnet *ifp, u_long cmd, caddr_t data, struct ucred *ucred)
3417 {
3418         struct iwn_softc *sc = ifp->if_softc;
3419         struct ieee80211com *ic = ifp->if_l2com;
3420         struct ieee80211vap *vap = TAILQ_FIRST(&ic->ic_vaps);
3421         struct ifreq *ifr = (struct ifreq *) data;
3422         int error = 0, startall = 0, stop = 0;
3423
3424         switch (cmd) {
3425         case SIOCSIFFLAGS:
3426                 IWN_LOCK(sc);
3427                 if (ifp->if_flags & IFF_UP) {
3428                         if (!(ifp->if_flags & IFF_RUNNING)) {
3429                                 iwn_init_locked(sc);
3430                                 if (IWN_READ(sc, IWN_GP_CNTRL) & IWN_GP_CNTRL_RFKILL)
3431                                         startall = 1;
3432                                 else
3433                                         stop = 1;
3434                         }
3435                 } else {
3436                         if (ifp->if_flags & IFF_RUNNING)
3437                                 iwn_stop_locked(sc);
3438                 }
3439                 IWN_UNLOCK(sc);
3440                 if (startall)
3441                         ieee80211_start_all(ic);
3442                 else if (vap != NULL && stop)
3443                         ieee80211_stop(vap);
3444                 break;
3445         case SIOCGIFMEDIA:
3446                 error = ifmedia_ioctl(ifp, ifr, &ic->ic_media, cmd);
3447                 break;
3448         case SIOCGIFADDR:
3449                 error = ether_ioctl(ifp, cmd, data);
3450                 break;
3451         default:
3452                 error = EINVAL;
3453                 break;
3454         }
3455         return error;
3456 }
3457
3458 /*
3459  * Send a command to the firmware.
3460  */
3461 static int
3462 iwn_cmd(struct iwn_softc *sc, int code, const void *buf, int size, int async)
3463 {
3464         struct iwn_tx_ring *ring = &sc->txq[4];
3465         struct iwn_tx_desc *desc;
3466         struct iwn_tx_data *data;
3467         struct iwn_tx_cmd *cmd;
3468         struct mbuf *m;
3469         bus_addr_t paddr;
3470         int totlen, error;
3471
3472         IWN_LOCK_ASSERT(sc);
3473
3474         desc = &ring->desc[ring->cur];
3475         data = &ring->data[ring->cur];
3476         totlen = 4 + size;
3477
3478         if (size > sizeof cmd->data) {
3479                 /* Command is too large to fit in a descriptor. */
3480                 if (totlen > MCLBYTES)
3481                         return EINVAL;
3482                 m = m_getcl(MB_DONTWAIT, MT_DATA, M_PKTHDR);
3483                 if (m == NULL)
3484                         return ENOMEM;
3485                 cmd = mtod(m, struct iwn_tx_cmd *);
3486                 error = bus_dmamap_load(ring->data_dmat, data->map, cmd,
3487                     totlen, iwn_dma_map_addr, &paddr, BUS_DMA_NOWAIT);
3488                 if (error != 0) {
3489                         m_freem(m);
3490                         return error;
3491                 }
3492                 data->m = m;
3493         } else {
3494                 cmd = &ring->cmd[ring->cur];
3495                 paddr = data->cmd_paddr;
3496         }
3497
3498         cmd->code = code;
3499         cmd->flags = 0;
3500         cmd->qid = ring->qid;
3501         cmd->idx = ring->cur;
3502         memcpy(cmd->data, buf, size);
3503
3504         desc->nsegs = 1;
3505         desc->segs[0].addr = htole32(IWN_LOADDR(paddr));
3506         desc->segs[0].len  = htole16(IWN_HIADDR(paddr) | totlen << 4);
3507
3508         DPRINTF(sc, IWN_DEBUG_CMD, "%s: %s (0x%x) flags %d qid %d idx %d\n",
3509             __func__, iwn_intr_str(cmd->code), cmd->code,
3510             cmd->flags, cmd->qid, cmd->idx);
3511
3512         if (size > sizeof cmd->data) {
3513                 bus_dmamap_sync(ring->data_dmat, data->map,
3514                     BUS_DMASYNC_PREWRITE);
3515         } else {
3516                 bus_dmamap_sync(ring->data_dmat, ring->cmd_dma.map,
3517                     BUS_DMASYNC_PREWRITE);
3518         }
3519         bus_dmamap_sync(ring->desc_dma.tag, ring->desc_dma.map,
3520             BUS_DMASYNC_PREWRITE);
3521
3522 #ifdef notyet
3523         /* Update TX scheduler. */
3524         sc->sc_hal->update_sched(sc, ring->qid, ring->cur, 0, 0);
3525 #endif
3526
3527         /* Kick command ring. */
3528         ring->cur = (ring->cur + 1) % IWN_TX_RING_COUNT;
3529         IWN_WRITE(sc, IWN_HBUS_TARG_WRPTR, ring->qid << 8 | ring->cur);
3530
3531         return async ? 0 : zsleep(desc, sc->sc_ifp->if_serializer, 0, "iwncmd", hz);
3532 }
3533
3534 static int
3535 iwn4965_add_node(struct iwn_softc *sc, struct iwn_node_info *node, int async)
3536 {
3537         struct iwn4965_node_info hnode;
3538         caddr_t src, dst;
3539
3540         /*
3541          * We use the node structure for 5000 Series internally (it is
3542          * a superset of the one for 4965AGN). We thus copy the common
3543          * fields before sending the command.
3544          */
3545         src = (caddr_t)node;
3546         dst = (caddr_t)&hnode;
3547         memcpy(dst, src, 48);
3548         /* Skip TSC, RX MIC and TX MIC fields from ``src''. */
3549         memcpy(dst + 48, src + 72, 20);
3550         return iwn_cmd(sc, IWN_CMD_ADD_NODE, &hnode, sizeof hnode, async);
3551 }
3552
3553 static int
3554 iwn5000_add_node(struct iwn_softc *sc, struct iwn_node_info *node, int async)
3555 {
3556         /* Direct mapping. */
3557         return iwn_cmd(sc, IWN_CMD_ADD_NODE, node, sizeof (*node), async);
3558 }
3559
3560 #if 0   /* HT */
3561 static const uint8_t iwn_ridx_to_plcp[] = {
3562         10, 20, 55, 110, /* CCK */
3563         0xd, 0xf, 0x5, 0x7, 0x9, 0xb, 0x1, 0x3, 0x3 /* OFDM R1-R4 */
3564 };
3565 static const uint8_t iwn_siso_mcs_to_plcp[] = {
3566         0, 0, 0, 0,                     /* CCK */
3567         0, 0, 1, 2, 3, 4, 5, 6, 7       /* HT */
3568 };
3569 static const uint8_t iwn_mimo_mcs_to_plcp[] = {
3570         0, 0, 0, 0,                     /* CCK */
3571         8, 8, 9, 10, 11, 12, 13, 14, 15 /* HT */
3572 };
3573 #endif
3574 static const uint8_t iwn_prev_ridx[] = {
3575         /* NB: allow fallback from CCK11 to OFDM9 and from OFDM6 to CCK5 */
3576         0, 0, 1, 5,                     /* CCK */
3577         2, 4, 3, 6, 7, 8, 9, 10, 10     /* OFDM */
3578 };
3579
3580 /*
3581  * Configure hardware link parameters for the specified
3582  * node operating on the specified channel.
3583  */
3584 static int
3585 iwn_set_link_quality(struct iwn_softc *sc, uint8_t id, int async)
3586 {
3587         struct ifnet *ifp = sc->sc_ifp;
3588         struct ieee80211com *ic = ifp->if_l2com;
3589         struct iwn_cmd_link_quality linkq;
3590         const struct iwn_rate *rinfo;
3591         int i;
3592         uint8_t txant, ridx;
3593
3594         /* Use the first valid TX antenna. */
3595         txant = IWN_LSB(sc->txchainmask);
3596
3597         memset(&linkq, 0, sizeof linkq);
3598         linkq.id = id;
3599         linkq.antmsk_1stream = txant;
3600         linkq.antmsk_2stream = IWN_ANT_AB;
3601         linkq.ampdu_max = 31;
3602         linkq.ampdu_threshold = 3;
3603         linkq.ampdu_limit = htole16(4000);      /* 4ms */
3604
3605 #if 0   /* HT */
3606         if (IEEE80211_IS_CHAN_HT(c))
3607                 linkq.mimo = 1;
3608 #endif
3609
3610         if (id == IWN_ID_BSS)
3611                 ridx = IWN_RIDX_OFDM54;
3612         else if (IEEE80211_IS_CHAN_A(ic->ic_curchan))
3613                 ridx = IWN_RIDX_OFDM6;
3614         else
3615                 ridx = IWN_RIDX_CCK1;
3616
3617         for (i = 0; i < IWN_MAX_TX_RETRIES; i++) {
3618                 rinfo = &iwn_rates[ridx];
3619 #if 0   /* HT */
3620                 if (IEEE80211_IS_CHAN_HT40(c)) {
3621                         linkq.retry[i].plcp = iwn_mimo_mcs_to_plcp[ridx]
3622                                          | IWN_RIDX_MCS;
3623                         linkq.retry[i].rflags = IWN_RFLAG_HT
3624                                          | IWN_RFLAG_HT40;
3625                         /* XXX shortGI */
3626                 } else if (IEEE80211_IS_CHAN_HT(c)) {
3627                         linkq.retry[i].plcp = iwn_siso_mcs_to_plcp[ridx]
3628                                          | IWN_RIDX_MCS;
3629                         linkq.retry[i].rflags = IWN_RFLAG_HT;
3630                         /* XXX shortGI */
3631                 } else
3632 #endif
3633                 {
3634                         linkq.retry[i].plcp = rinfo->plcp;
3635                         linkq.retry[i].rflags = rinfo->flags;
3636                 }
3637                 linkq.retry[i].rflags |= IWN_RFLAG_ANT(txant);
3638                 ridx = iwn_prev_ridx[ridx];
3639         }
3640 #ifdef IWN_DEBUG
3641         if (sc->sc_debug & IWN_DEBUG_STATE) {
3642                 kprintf("%s: set link quality for node %d, mimo %d ssmask %d\n",
3643                     __func__, id, linkq.mimo, linkq.antmsk_1stream);
3644                 kprintf("%s:", __func__);
3645                 for (i = 0; i < IWN_MAX_TX_RETRIES; i++)
3646                         kprintf(" %d:%x", linkq.retry[i].plcp,
3647                             linkq.retry[i].rflags);
3648                 kprintf("\n");
3649         }
3650 #endif
3651         return iwn_cmd(sc, IWN_CMD_LINK_QUALITY, &linkq, sizeof linkq, async);
3652 }
3653
3654 /*
3655  * Broadcast node is used to send group-addressed and management frames.
3656  */
3657 static int
3658 iwn_add_broadcast_node(struct iwn_softc *sc, int async)
3659 {
3660         const struct iwn_hal *hal = sc->sc_hal;
3661         struct ifnet *ifp = sc->sc_ifp;
3662         struct iwn_node_info node;
3663         int error;
3664
3665         memset(&node, 0, sizeof node);
3666         IEEE80211_ADDR_COPY(node.macaddr, ifp->if_broadcastaddr);
3667         node.id = hal->broadcast_id;
3668         DPRINTF(sc, IWN_DEBUG_RESET, "%s: adding broadcast node\n", __func__);
3669         error = hal->add_node(sc, &node, async);
3670         if (error != 0)
3671                 return error;
3672
3673         error = iwn_set_link_quality(sc, hal->broadcast_id, async);
3674         return error;
3675 }
3676
3677 static int
3678 iwn_wme_update(struct ieee80211com *ic)
3679 {
3680 #define IWN_EXP2(x)     ((1 << (x)) - 1)        /* CWmin = 2^ECWmin - 1 */
3681 #define IWN_TXOP_TO_US(v)               (v<<5)
3682         struct iwn_softc *sc = ic->ic_ifp->if_softc;
3683         struct iwn_edca_params cmd;
3684         int i;
3685
3686         memset(&cmd, 0, sizeof cmd);
3687         cmd.flags = htole32(IWN_EDCA_UPDATE);
3688         for (i = 0; i < WME_NUM_AC; i++) {
3689                 const struct wmeParams *wmep =
3690                     &ic->ic_wme.wme_chanParams.cap_wmeParams[i];
3691                 cmd.ac[i].aifsn = wmep->wmep_aifsn;
3692                 cmd.ac[i].cwmin = htole16(IWN_EXP2(wmep->wmep_logcwmin));
3693                 cmd.ac[i].cwmax = htole16(IWN_EXP2(wmep->wmep_logcwmax));
3694                 cmd.ac[i].txoplimit =
3695                     htole16(IWN_TXOP_TO_US(wmep->wmep_txopLimit));
3696         }
3697         IEEE80211_UNLOCK(ic);
3698         IWN_LOCK(sc);
3699         (void) iwn_cmd(sc, IWN_CMD_EDCA_PARAMS, &cmd, sizeof cmd, 1 /*async*/);
3700         IWN_UNLOCK(sc);
3701         IEEE80211_LOCK(ic);
3702         return 0;
3703 #undef IWN_TXOP_TO_US
3704 #undef IWN_EXP2
3705 }
3706
3707 static void
3708 iwn_update_mcast(struct ifnet *ifp)
3709 {
3710         /* Ignore */
3711 }
3712
3713 static void
3714 iwn_set_led(struct iwn_softc *sc, uint8_t which, uint8_t off, uint8_t on)
3715 {
3716         struct iwn_cmd_led led;
3717
3718         /* Clear microcode LED ownership. */
3719         IWN_CLRBITS(sc, IWN_LED, IWN_LED_BSM_CTRL);
3720
3721         led.which = which;
3722         led.unit = htole32(10000);      /* on/off in unit of 100ms */
3723         led.off = off;
3724         led.on = on;
3725         (void)iwn_cmd(sc, IWN_CMD_SET_LED, &led, sizeof led, 1);
3726 }
3727
3728 /*
3729  * Set the critical temperature at which the firmware will stop the radio
3730  * and notify us.
3731  */
3732 static int
3733 iwn_set_critical_temp(struct iwn_softc *sc)
3734 {
3735         struct iwn_critical_temp crit;
3736         int32_t temp;
3737
3738         IWN_WRITE(sc, IWN_UCODE_GP1_CLR, IWN_UCODE_GP1_CTEMP_STOP_RF);
3739
3740         if (sc->hw_type == IWN_HW_REV_TYPE_5150)
3741                 temp = (IWN_CTOK(110) - sc->temp_off) * -5;
3742         else if (sc->hw_type == IWN_HW_REV_TYPE_4965)
3743                 temp = IWN_CTOK(110);
3744         else
3745                 temp = 110;
3746         memset(&crit, 0, sizeof crit);
3747         crit.tempR = htole32(temp);
3748         DPRINTF(sc, IWN_DEBUG_RESET, "setting critical temp to %d\n",
3749             temp);
3750         return iwn_cmd(sc, IWN_CMD_SET_CRITICAL_TEMP, &crit, sizeof crit, 0);
3751 }
3752
3753 static int
3754 iwn_set_timing(struct iwn_softc *sc, struct ieee80211_node *ni)
3755 {
3756         struct iwn_cmd_timing cmd;
3757         uint64_t val, mod;
3758
3759         memset(&cmd, 0, sizeof cmd);
3760         memcpy(&cmd.tstamp, ni->ni_tstamp.data, sizeof (uint64_t));
3761         cmd.bintval = htole16(ni->ni_intval);
3762         cmd.lintval = htole16(10);
3763
3764         /* Compute remaining time until next beacon. */
3765         val = (uint64_t)ni->ni_intval * 1024;   /* msecs -> usecs */
3766         mod = le64toh(cmd.tstamp) % val;
3767         cmd.binitval = htole32((uint32_t)(val - mod));
3768
3769         DPRINTF(sc, IWN_DEBUG_RESET, "timing bintval=%u tstamp=%ju, init=%u\n",
3770             ni->ni_intval, le64toh(cmd.tstamp), (uint32_t)(val - mod));
3771
3772         return iwn_cmd(sc, IWN_CMD_TIMING, &cmd, sizeof cmd, 1);
3773 }
3774
3775 static void
3776 iwn4965_power_calibration(struct iwn_softc *sc, int temp)
3777 {
3778         struct ifnet *ifp = sc->sc_ifp;
3779         struct ieee80211com *ic = ifp->if_l2com;
3780
3781         /* Adjust TX power if need be (delta >= 3 degC.) */
3782         DPRINTF(sc, IWN_DEBUG_CALIBRATE, "%s: temperature %d->%d\n",
3783             __func__, sc->temp, temp);
3784         if (abs(temp - sc->temp) >= 3) {
3785                 /* Record temperature of last calibration. */
3786                 sc->temp = temp;
3787                 (void)iwn4965_set_txpower(sc, ic->ic_bsschan, 1);
3788         }
3789 }
3790
3791 /*
3792  * Set TX power for current channel (each rate has its own power settings).
3793  * This function takes into account the regulatory information from EEPROM,
3794  * the current temperature and the current voltage.
3795  */
3796 static int
3797 iwn4965_set_txpower(struct iwn_softc *sc, struct ieee80211_channel *ch,
3798     int async)
3799 {
3800 /* Fixed-point arithmetic division using a n-bit fractional part. */
3801 #define fdivround(a, b, n)      \
3802         ((((1 << n) * (a)) / (b) + (1 << n) / 2) / (1 << n))
3803 /* Linear interpolation. */
3804 #define interpolate(x, x1, y1, x2, y2, n)       \
3805         ((y1) + fdivround(((int)(x) - (x1)) * ((y2) - (y1)), (x2) - (x1), n))
3806
3807         static const int tdiv[IWN_NATTEN_GROUPS] = { 9, 8, 8, 8, 6 };
3808         struct ifnet *ifp = sc->sc_ifp;
3809         struct ieee80211com *ic = ifp->if_l2com;
3810         struct iwn_ucode_info *uc = &sc->ucode_info;
3811         struct iwn4965_cmd_txpower cmd;
3812         struct iwn4965_eeprom_chan_samples *chans;
3813         int32_t vdiff, tdiff;
3814         int i, c, grp, maxpwr;
3815         const uint8_t *rf_gain, *dsp_gain;
3816         uint8_t chan;
3817
3818         /* Retrieve channel number. */
3819         chan = ieee80211_chan2ieee(ic, ch);
3820         DPRINTF(sc, IWN_DEBUG_RESET, "setting TX power for channel %d\n",
3821             chan);
3822
3823         memset(&cmd, 0, sizeof cmd);
3824         cmd.band = IEEE80211_IS_CHAN_5GHZ(ch) ? 0 : 1;
3825         cmd.chan = chan;
3826
3827         if (IEEE80211_IS_CHAN_5GHZ(ch)) {
3828                 maxpwr   = sc->maxpwr5GHz;
3829                 rf_gain  = iwn4965_rf_gain_5ghz;
3830                 dsp_gain = iwn4965_dsp_gain_5ghz;
3831         } else {
3832                 maxpwr   = sc->maxpwr2GHz;
3833                 rf_gain  = iwn4965_rf_gain_2ghz;
3834                 dsp_gain = iwn4965_dsp_gain_2ghz;
3835         }
3836
3837         /* Compute voltage compensation. */
3838         vdiff = ((int32_t)le32toh(uc->volt) - sc->eeprom_voltage) / 7;
3839         if (vdiff > 0)
3840                 vdiff *= 2;
3841         if (abs(vdiff) > 2)
3842                 vdiff = 0;
3843         DPRINTF(sc, IWN_DEBUG_CALIBRATE | IWN_DEBUG_TXPOW,
3844             "%s: voltage compensation=%d (UCODE=%d, EEPROM=%d)\n",
3845             __func__, vdiff, le32toh(uc->volt), sc->eeprom_voltage);
3846
3847         /* Get channel attenuation group. */
3848         if (chan <= 20)         /* 1-20 */
3849                 grp = 4;
3850         else if (chan <= 43)    /* 34-43 */
3851                 grp = 0;
3852         else if (chan <= 70)    /* 44-70 */
3853                 grp = 1;
3854         else if (chan <= 124)   /* 71-124 */
3855                 grp = 2;
3856         else                    /* 125-200 */
3857                 grp = 3;
3858         DPRINTF(sc, IWN_DEBUG_CALIBRATE | IWN_DEBUG_TXPOW,
3859             "%s: chan %d, attenuation group=%d\n", __func__, chan, grp);
3860
3861         /* Get channel sub-band. */
3862         for (i = 0; i < IWN_NBANDS; i++)
3863                 if (sc->bands[i].lo != 0 &&
3864                     sc->bands[i].lo <= chan && chan <= sc->bands[i].hi)
3865                         break;
3866         if (i == IWN_NBANDS)    /* Can't happen in real-life. */
3867                 return EINVAL;
3868         chans = sc->bands[i].chans;
3869         DPRINTF(sc, IWN_DEBUG_CALIBRATE | IWN_DEBUG_TXPOW,
3870             "%s: chan %d sub-band=%d\n", __func__, chan, i);
3871
3872         for (c = 0; c < 2; c++) {
3873                 uint8_t power, gain, temp;
3874                 int maxchpwr, pwr, ridx, idx;
3875
3876                 power = interpolate(chan,
3877                     chans[0].num, chans[0].samples[c][1].power,
3878                     chans[1].num, chans[1].samples[c][1].power, 1);
3879                 gain  = interpolate(chan,
3880                     chans[0].num, chans[0].samples[c][1].gain,
3881                     chans[1].num, chans[1].samples[c][1].gain, 1);
3882                 temp  = interpolate(chan,
3883                     chans[0].num, chans[0].samples[c][1].temp,
3884                     chans[1].num, chans[1].samples[c][1].temp, 1);
3885                 DPRINTF(sc, IWN_DEBUG_CALIBRATE | IWN_DEBUG_TXPOW,
3886                     "%s: Tx chain %d: power=%d gain=%d temp=%d\n",
3887                     __func__, c, power, gain, temp);
3888
3889                 /* Compute temperature compensation. */
3890                 tdiff = ((sc->temp - temp) * 2) / tdiv[grp];
3891                 DPRINTF(sc, IWN_DEBUG_CALIBRATE | IWN_DEBUG_TXPOW,
3892                     "%s: temperature compensation=%d (current=%d, EEPROM=%d)\n",
3893                     __func__, tdiff, sc->temp, temp);
3894
3895                 for (ridx = 0; ridx <= IWN_RIDX_MAX; ridx++) {
3896                         /* Convert dBm to half-dBm. */
3897                         maxchpwr = sc->maxpwr[chan] * 2;
3898                         if ((ridx / 8) & 1)
3899                                 maxchpwr -= 6;  /* MIMO 2T: -3dB */
3900
3901                         pwr = maxpwr;
3902
3903                         /* Adjust TX power based on rate. */
3904                         if ((ridx % 8) == 5)
3905                                 pwr -= 15;      /* OFDM48: -7.5dB */
3906                         else if ((ridx % 8) == 6)
3907                                 pwr -= 17;      /* OFDM54: -8.5dB */
3908                         else if ((ridx % 8) == 7)
3909                                 pwr -= 20;      /* OFDM60: -10dB */
3910                         else
3911                                 pwr -= 10;      /* Others: -5dB */
3912
3913                         /* Do not exceed channel max TX power. */
3914                         if (pwr > maxchpwr)
3915                                 pwr = maxchpwr;
3916
3917                         idx = gain - (pwr - power) - tdiff - vdiff;
3918                         if ((ridx / 8) & 1)     /* MIMO */
3919                                 idx += (int32_t)le32toh(uc->atten[grp][c]);
3920
3921                         if (cmd.band == 0)
3922                                 idx += 9;       /* 5GHz */
3923                         if (ridx == IWN_RIDX_MAX)
3924                                 idx += 5;       /* CCK */
3925
3926                         /* Make sure idx stays in a valid range. */
3927                         if (idx < 0)
3928                                 idx = 0;
3929                         else if (idx > IWN4965_MAX_PWR_INDEX)
3930                                 idx = IWN4965_MAX_PWR_INDEX;
3931
3932                         DPRINTF(sc, IWN_DEBUG_CALIBRATE | IWN_DEBUG_TXPOW,
3933                             "%s: Tx chain %d, rate idx %d: power=%d\n",
3934                             __func__, c, ridx, idx);
3935                         cmd.power[ridx].rf_gain[c] = rf_gain[idx];
3936                         cmd.power[ridx].dsp_gain[c] = dsp_gain[idx];
3937                 }
3938         }
3939
3940         DPRINTF(sc, IWN_DEBUG_CALIBRATE | IWN_DEBUG_TXPOW,
3941             "%s: set tx power for chan %d\n", __func__, chan);
3942         return iwn_cmd(sc, IWN_CMD_TXPOWER, &cmd, sizeof cmd, async);
3943
3944 #undef interpolate
3945 #undef fdivround
3946 }
3947
3948 static int
3949 iwn5000_set_txpower(struct iwn_softc *sc, struct ieee80211_channel *ch,
3950     int async)
3951 {
3952         struct iwn5000_cmd_txpower cmd;
3953
3954         /*
3955          * TX power calibration is handled automatically by the firmware
3956          * for 5000 Series.
3957          */
3958         memset(&cmd, 0, sizeof cmd);
3959         cmd.global_limit = 2 * IWN5000_TXPOWER_MAX_DBM; /* 16 dBm */
3960         cmd.flags = IWN5000_TXPOWER_NO_CLOSED;
3961         cmd.srv_limit = IWN5000_TXPOWER_AUTO;
3962         DPRINTF(sc, IWN_DEBUG_CALIBRATE, "%s: setting TX power\n", __func__);
3963         return iwn_cmd(sc, IWN_CMD_TXPOWER_DBM, &cmd, sizeof cmd, async);
3964 }
3965
3966 /*
3967  * Retrieve the maximum RSSI (in dBm) among receivers.
3968  */
3969 static int
3970 iwn4965_get_rssi(struct iwn_softc *sc, struct iwn_rx_stat *stat)
3971 {
3972         struct iwn4965_rx_phystat *phy = (void *)stat->phybuf;
3973         uint8_t mask, agc;
3974         int rssi;
3975
3976         mask = (le16toh(phy->antenna) >> 4) & IWN_ANT_ABC;
3977         agc  = (le16toh(phy->agc) >> 7) & 0x7f;
3978
3979