xref: /openbsd-src/sys/dev/pci/if_wpi.c (revision ae3cb403620ab940fbaabb3055fac045a63d56b7)
1 /*	$OpenBSD: if_wpi.c,v 1.141 2017/10/26 15:00:28 mpi Exp $	*/
2 
3 /*-
4  * Copyright (c) 2006-2008
5  *	Damien Bergamini <damien.bergamini@free.fr>
6  *
7  * Permission to use, copy, modify, and distribute this software for any
8  * purpose with or without fee is hereby granted, provided that the above
9  * copyright notice and this permission notice appear in all copies.
10  *
11  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
18  */
19 
20 /*
21  * Driver for Intel PRO/Wireless 3945ABG 802.11 network adapters.
22  */
23 
24 #include "bpfilter.h"
25 
26 #include <sys/param.h>
27 #include <sys/sockio.h>
28 #include <sys/mbuf.h>
29 #include <sys/kernel.h>
30 #include <sys/rwlock.h>
31 #include <sys/socket.h>
32 #include <sys/systm.h>
33 #include <sys/malloc.h>
34 #include <sys/conf.h>
35 #include <sys/device.h>
36 #include <sys/task.h>
37 #include <sys/endian.h>
38 
39 #include <machine/bus.h>
40 #include <machine/intr.h>
41 
42 #include <dev/pci/pcireg.h>
43 #include <dev/pci/pcivar.h>
44 #include <dev/pci/pcidevs.h>
45 
46 #if NBPFILTER > 0
47 #include <net/bpf.h>
48 #endif
49 #include <net/if.h>
50 #include <net/if_dl.h>
51 #include <net/if_media.h>
52 
53 #include <netinet/in.h>
54 #include <netinet/if_ether.h>
55 
56 #include <net80211/ieee80211_var.h>
57 #include <net80211/ieee80211_amrr.h>
58 #include <net80211/ieee80211_radiotap.h>
59 
60 #include <dev/pci/if_wpireg.h>
61 #include <dev/pci/if_wpivar.h>
62 
63 static const struct pci_matchid wpi_devices[] = {
64 	{ PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_PRO_WL_3945ABG_1 },
65 	{ PCI_VENDOR_INTEL, PCI_PRODUCT_INTEL_PRO_WL_3945ABG_2 }
66 };
67 
68 int		wpi_match(struct device *, void *, void *);
69 void		wpi_attach(struct device *, struct device *, void *);
70 #if NBPFILTER > 0
71 void		wpi_radiotap_attach(struct wpi_softc *);
72 #endif
73 int		wpi_detach(struct device *, int);
74 int		wpi_activate(struct device *, int);
75 void		wpi_wakeup(struct wpi_softc *);
76 void		wpi_init_task(void *);
77 int		wpi_nic_lock(struct wpi_softc *);
78 int		wpi_read_prom_data(struct wpi_softc *, uint32_t, void *, int);
79 int		wpi_dma_contig_alloc(bus_dma_tag_t, struct wpi_dma_info *,
80 		    void **, bus_size_t, bus_size_t);
81 void		wpi_dma_contig_free(struct wpi_dma_info *);
82 int		wpi_alloc_shared(struct wpi_softc *);
83 void		wpi_free_shared(struct wpi_softc *);
84 int		wpi_alloc_fwmem(struct wpi_softc *);
85 void		wpi_free_fwmem(struct wpi_softc *);
86 int		wpi_alloc_rx_ring(struct wpi_softc *, struct wpi_rx_ring *);
87 void		wpi_reset_rx_ring(struct wpi_softc *, struct wpi_rx_ring *);
88 void		wpi_free_rx_ring(struct wpi_softc *, struct wpi_rx_ring *);
89 int		wpi_alloc_tx_ring(struct wpi_softc *, struct wpi_tx_ring *,
90 		    int);
91 void		wpi_reset_tx_ring(struct wpi_softc *, struct wpi_tx_ring *);
92 void		wpi_free_tx_ring(struct wpi_softc *, struct wpi_tx_ring *);
93 int		wpi_read_eeprom(struct wpi_softc *);
94 void		wpi_read_eeprom_channels(struct wpi_softc *, int);
95 void		wpi_read_eeprom_group(struct wpi_softc *, int);
96 struct		ieee80211_node *wpi_node_alloc(struct ieee80211com *);
97 void		wpi_newassoc(struct ieee80211com *, struct ieee80211_node *,
98 		    int);
99 int		wpi_media_change(struct ifnet *);
100 int		wpi_newstate(struct ieee80211com *, enum ieee80211_state, int);
101 void		wpi_iter_func(void *, struct ieee80211_node *);
102 void		wpi_calib_timeout(void *);
103 int		wpi_ccmp_decap(struct wpi_softc *, struct mbuf *,
104 		    struct ieee80211_key *);
105 void		wpi_rx_done(struct wpi_softc *, struct wpi_rx_desc *,
106 		    struct wpi_rx_data *);
107 void		wpi_tx_done(struct wpi_softc *, struct wpi_rx_desc *);
108 void		wpi_cmd_done(struct wpi_softc *, struct wpi_rx_desc *);
109 void		wpi_notif_intr(struct wpi_softc *);
110 void		wpi_fatal_intr(struct wpi_softc *);
111 int		wpi_intr(void *);
112 int		wpi_tx(struct wpi_softc *, struct mbuf *,
113 		    struct ieee80211_node *);
114 void		wpi_start(struct ifnet *);
115 void		wpi_watchdog(struct ifnet *);
116 int		wpi_ioctl(struct ifnet *, u_long, caddr_t);
117 int		wpi_cmd(struct wpi_softc *, int, const void *, int, int);
118 int		wpi_mrr_setup(struct wpi_softc *);
119 void		wpi_updateedca(struct ieee80211com *);
120 void		wpi_set_led(struct wpi_softc *, uint8_t, uint8_t, uint8_t);
121 int		wpi_set_timing(struct wpi_softc *, struct ieee80211_node *);
122 void		wpi_power_calibration(struct wpi_softc *);
123 int		wpi_set_txpower(struct wpi_softc *, int);
124 int		wpi_get_power_index(struct wpi_softc *,
125 		    struct wpi_power_group *, struct ieee80211_channel *, int);
126 int		wpi_set_pslevel(struct wpi_softc *, int, int, int);
127 int		wpi_config(struct wpi_softc *);
128 int		wpi_scan(struct wpi_softc *, uint16_t);
129 int		wpi_auth(struct wpi_softc *);
130 int		wpi_run(struct wpi_softc *);
131 int		wpi_set_key(struct ieee80211com *, struct ieee80211_node *,
132 		    struct ieee80211_key *);
133 void		wpi_delete_key(struct ieee80211com *, struct ieee80211_node *,
134 		    struct ieee80211_key *);
135 int		wpi_post_alive(struct wpi_softc *);
136 int		wpi_load_bootcode(struct wpi_softc *, const uint8_t *, int);
137 int		wpi_load_firmware(struct wpi_softc *);
138 int		wpi_read_firmware(struct wpi_softc *);
139 int		wpi_clock_wait(struct wpi_softc *);
140 int		wpi_apm_init(struct wpi_softc *);
141 void		wpi_apm_stop_master(struct wpi_softc *);
142 void		wpi_apm_stop(struct wpi_softc *);
143 void		wpi_nic_config(struct wpi_softc *);
144 int		wpi_hw_init(struct wpi_softc *);
145 void		wpi_hw_stop(struct wpi_softc *);
146 int		wpi_init(struct ifnet *);
147 void		wpi_stop(struct ifnet *, int);
148 
149 #ifdef WPI_DEBUG
150 #define DPRINTF(x)	do { if (wpi_debug > 0) printf x; } while (0)
151 #define DPRINTFN(n, x)	do { if (wpi_debug >= (n)) printf x; } while (0)
152 int wpi_debug = 0;
153 #else
154 #define DPRINTF(x)
155 #define DPRINTFN(n, x)
156 #endif
157 
158 struct cfdriver wpi_cd = {
159 	NULL, "wpi", DV_IFNET
160 };
161 
162 struct cfattach wpi_ca = {
163 	sizeof (struct wpi_softc), wpi_match, wpi_attach, wpi_detach,
164 	wpi_activate
165 };
166 
167 int
168 wpi_match(struct device *parent, void *match, void *aux)
169 {
170 	return pci_matchbyid((struct pci_attach_args *)aux, wpi_devices,
171 	    nitems(wpi_devices));
172 }
173 
174 void
175 wpi_attach(struct device *parent, struct device *self, void *aux)
176 {
177 	struct wpi_softc *sc = (struct wpi_softc *)self;
178 	struct ieee80211com *ic = &sc->sc_ic;
179 	struct ifnet *ifp = &ic->ic_if;
180 	struct pci_attach_args *pa = aux;
181 	const char *intrstr;
182 	pci_intr_handle_t ih;
183 	pcireg_t memtype, reg;
184 	int i, error;
185 
186 	sc->sc_pct = pa->pa_pc;
187 	sc->sc_pcitag = pa->pa_tag;
188 	sc->sc_dmat = pa->pa_dmat;
189 
190 	/*
191 	 * Get the offset of the PCI Express Capability Structure in PCI
192 	 * Configuration Space (the vendor driver hard-codes it as E0h.)
193 	 */
194 	error = pci_get_capability(sc->sc_pct, sc->sc_pcitag,
195 	    PCI_CAP_PCIEXPRESS, &sc->sc_cap_off, NULL);
196 	if (error == 0) {
197 		printf(": PCIe capability structure not found!\n");
198 		return;
199 	}
200 
201 	/* Clear device-specific "PCI retry timeout" register (41h). */
202 	reg = pci_conf_read(sc->sc_pct, sc->sc_pcitag, 0x40);
203 	reg &= ~0xff00;
204 	pci_conf_write(sc->sc_pct, sc->sc_pcitag, 0x40, reg);
205 
206 	memtype = pci_mapreg_type(pa->pa_pc, pa->pa_tag, WPI_PCI_BAR0);
207 	error = pci_mapreg_map(pa, WPI_PCI_BAR0, memtype, 0, &sc->sc_st,
208 	    &sc->sc_sh, NULL, &sc->sc_sz, 0);
209 	if (error != 0) {
210 		printf(": can't map mem space\n");
211 		return;
212 	}
213 
214 	/* Install interrupt handler. */
215 	if (pci_intr_map_msi(pa, &ih) != 0 && pci_intr_map(pa, &ih) != 0) {
216 		printf(": can't map interrupt\n");
217 		return;
218 	}
219 	intrstr = pci_intr_string(sc->sc_pct, ih);
220 	sc->sc_ih = pci_intr_establish(sc->sc_pct, ih, IPL_NET, wpi_intr, sc,
221 	    sc->sc_dev.dv_xname);
222 	if (sc->sc_ih == NULL) {
223 		printf(": can't establish interrupt");
224 		if (intrstr != NULL)
225 			printf(" at %s", intrstr);
226 		printf("\n");
227 		return;
228 	}
229 	printf(": %s", intrstr);
230 
231 	/* Power ON adapter. */
232 	if ((error = wpi_apm_init(sc)) != 0) {
233 		printf(": could not power ON adapter\n");
234 		return;
235 	}
236 
237 	/* Read MAC address, channels, etc from EEPROM. */
238 	if ((error = wpi_read_eeprom(sc)) != 0) {
239 		printf(": could not read EEPROM\n");
240 		return;
241 	}
242 
243 	/* Allocate DMA memory for firmware transfers. */
244 	if ((error = wpi_alloc_fwmem(sc)) != 0) {
245 		printf(": could not allocate memory for firmware\n");
246 		return;
247 	}
248 
249 	/* Allocate shared area. */
250 	if ((error = wpi_alloc_shared(sc)) != 0) {
251 		printf(": could not allocate shared area\n");
252 		goto fail1;
253 	}
254 
255 	/* Allocate TX rings. */
256 	for (i = 0; i < WPI_NTXQUEUES; i++) {
257 		if ((error = wpi_alloc_tx_ring(sc, &sc->txq[i], i)) != 0) {
258 			printf(": could not allocate TX ring %d\n", i);
259 			goto fail2;
260 		}
261 	}
262 
263 	/* Allocate RX ring. */
264 	if ((error = wpi_alloc_rx_ring(sc, &sc->rxq)) != 0) {
265 		printf(": could not allocate Rx ring\n");
266 		goto fail2;
267 	}
268 
269 	/* Power OFF adapter. */
270 	wpi_apm_stop(sc);
271 	/* Clear pending interrupts. */
272 	WPI_WRITE(sc, WPI_INT, 0xffffffff);
273 
274 	ic->ic_phytype = IEEE80211_T_OFDM;	/* not only, but not used */
275 	ic->ic_opmode = IEEE80211_M_STA;	/* default to BSS mode */
276 	ic->ic_state = IEEE80211_S_INIT;
277 
278 	/* Set device capabilities. */
279 	ic->ic_caps =
280 	    IEEE80211_C_WEP |		/* WEP */
281 	    IEEE80211_C_RSN |		/* WPA/RSN */
282 	    IEEE80211_C_SCANALL |	/* device scans all channels at once */
283 	    IEEE80211_C_SCANALLBAND |	/* driver scans all bands at once */
284 	    IEEE80211_C_MONITOR |	/* monitor mode supported */
285 	    IEEE80211_C_SHSLOT |	/* short slot time supported */
286 	    IEEE80211_C_SHPREAMBLE |	/* short preamble supported */
287 	    IEEE80211_C_PMGT;		/* power saving supported */
288 
289 	/* Set supported rates. */
290 	ic->ic_sup_rates[IEEE80211_MODE_11B] = ieee80211_std_rateset_11b;
291 	ic->ic_sup_rates[IEEE80211_MODE_11G] = ieee80211_std_rateset_11g;
292 	if (sc->sc_flags & WPI_FLAG_HAS_5GHZ) {
293 		ic->ic_sup_rates[IEEE80211_MODE_11A] =
294 		    ieee80211_std_rateset_11a;
295 	}
296 
297 	/* IBSS channel undefined for now. */
298 	ic->ic_ibss_chan = &ic->ic_channels[0];
299 
300 	ifp->if_softc = sc;
301 	ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
302 	ifp->if_ioctl = wpi_ioctl;
303 	ifp->if_start = wpi_start;
304 	ifp->if_watchdog = wpi_watchdog;
305 	memcpy(ifp->if_xname, sc->sc_dev.dv_xname, IFNAMSIZ);
306 
307 	if_attach(ifp);
308 	ieee80211_ifattach(ifp);
309 	ic->ic_node_alloc = wpi_node_alloc;
310 	ic->ic_newassoc = wpi_newassoc;
311 	ic->ic_updateedca = wpi_updateedca;
312 	ic->ic_set_key = wpi_set_key;
313 	ic->ic_delete_key = wpi_delete_key;
314 
315 	/* Override 802.11 state transition machine. */
316 	sc->sc_newstate = ic->ic_newstate;
317 	ic->ic_newstate = wpi_newstate;
318 	ieee80211_media_init(ifp, wpi_media_change, ieee80211_media_status);
319 
320 	sc->amrr.amrr_min_success_threshold =  1;
321 	sc->amrr.amrr_max_success_threshold = 15;
322 
323 #if NBPFILTER > 0
324 	wpi_radiotap_attach(sc);
325 #endif
326 	timeout_set(&sc->calib_to, wpi_calib_timeout, sc);
327 	rw_init(&sc->sc_rwlock, "wpilock");
328 	task_set(&sc->init_task, wpi_init_task, sc);
329 	return;
330 
331 	/* Free allocated memory if something failed during attachment. */
332 fail2:	while (--i >= 0)
333 		wpi_free_tx_ring(sc, &sc->txq[i]);
334 	wpi_free_shared(sc);
335 fail1:	wpi_free_fwmem(sc);
336 }
337 
338 #if NBPFILTER > 0
339 /*
340  * Attach the interface to 802.11 radiotap.
341  */
342 void
343 wpi_radiotap_attach(struct wpi_softc *sc)
344 {
345 	bpfattach(&sc->sc_drvbpf, &sc->sc_ic.ic_if, DLT_IEEE802_11_RADIO,
346 	    sizeof (struct ieee80211_frame) + IEEE80211_RADIOTAP_HDRLEN);
347 
348 	sc->sc_rxtap_len = sizeof sc->sc_rxtapu;
349 	sc->sc_rxtap.wr_ihdr.it_len = htole16(sc->sc_rxtap_len);
350 	sc->sc_rxtap.wr_ihdr.it_present = htole32(WPI_RX_RADIOTAP_PRESENT);
351 
352 	sc->sc_txtap_len = sizeof sc->sc_txtapu;
353 	sc->sc_txtap.wt_ihdr.it_len = htole16(sc->sc_txtap_len);
354 	sc->sc_txtap.wt_ihdr.it_present = htole32(WPI_TX_RADIOTAP_PRESENT);
355 }
356 #endif
357 
358 int
359 wpi_detach(struct device *self, int flags)
360 {
361 	struct wpi_softc *sc = (struct wpi_softc *)self;
362 	struct ifnet *ifp = &sc->sc_ic.ic_if;
363 	int qid;
364 
365 	timeout_del(&sc->calib_to);
366 	task_del(systq, &sc->init_task);
367 
368 	/* Uninstall interrupt handler. */
369 	if (sc->sc_ih != NULL)
370 		pci_intr_disestablish(sc->sc_pct, sc->sc_ih);
371 
372 	/* Free DMA resources. */
373 	wpi_free_rx_ring(sc, &sc->rxq);
374 	for (qid = 0; qid < WPI_NTXQUEUES; qid++)
375 		wpi_free_tx_ring(sc, &sc->txq[qid]);
376 	wpi_free_shared(sc);
377 	wpi_free_fwmem(sc);
378 
379 	bus_space_unmap(sc->sc_st, sc->sc_sh, sc->sc_sz);
380 
381 	ieee80211_ifdetach(ifp);
382 	if_detach(ifp);
383 
384 	return 0;
385 }
386 
387 int
388 wpi_activate(struct device *self, int act)
389 {
390 	struct wpi_softc *sc = (struct wpi_softc *)self;
391 	struct ifnet *ifp = &sc->sc_ic.ic_if;
392 
393 	switch (act) {
394 	case DVACT_SUSPEND:
395 		if (ifp->if_flags & IFF_RUNNING)
396 			wpi_stop(ifp, 0);
397 		break;
398 	case DVACT_WAKEUP:
399 		wpi_wakeup(sc);
400 		break;
401 	}
402 
403 	return 0;
404 }
405 
406 void
407 wpi_wakeup(struct wpi_softc *sc)
408 {
409 	pcireg_t reg;
410 
411 	/* Clear device-specific "PCI retry timeout" register (41h). */
412 	reg = pci_conf_read(sc->sc_pct, sc->sc_pcitag, 0x40);
413 	reg &= ~0xff00;
414 	pci_conf_write(sc->sc_pct, sc->sc_pcitag, 0x40, reg);
415 
416 	wpi_init_task(sc);
417 }
418 
419 void
420 wpi_init_task(void *arg1)
421 {
422 	struct wpi_softc *sc = arg1;
423 	struct ifnet *ifp = &sc->sc_ic.ic_if;
424 	int s;
425 
426 	rw_enter_write(&sc->sc_rwlock);
427 	s = splnet();
428 
429 	if ((ifp->if_flags & (IFF_UP | IFF_RUNNING)) == IFF_UP)
430 		wpi_init(ifp);
431 
432 	splx(s);
433 	rw_exit_write(&sc->sc_rwlock);
434 }
435 
436 int
437 wpi_nic_lock(struct wpi_softc *sc)
438 {
439 	int ntries;
440 
441 	/* Request exclusive access to NIC. */
442 	WPI_SETBITS(sc, WPI_GP_CNTRL, WPI_GP_CNTRL_MAC_ACCESS_REQ);
443 
444 	/* Spin until we actually get the lock. */
445 	for (ntries = 0; ntries < 1000; ntries++) {
446 		if ((WPI_READ(sc, WPI_GP_CNTRL) &
447 		     (WPI_GP_CNTRL_MAC_ACCESS_ENA | WPI_GP_CNTRL_SLEEP)) ==
448 		    WPI_GP_CNTRL_MAC_ACCESS_ENA)
449 			return 0;
450 		DELAY(10);
451 	}
452 	return ETIMEDOUT;
453 }
454 
455 static __inline void
456 wpi_nic_unlock(struct wpi_softc *sc)
457 {
458 	WPI_CLRBITS(sc, WPI_GP_CNTRL, WPI_GP_CNTRL_MAC_ACCESS_REQ);
459 }
460 
461 static __inline uint32_t
462 wpi_prph_read(struct wpi_softc *sc, uint32_t addr)
463 {
464 	WPI_WRITE(sc, WPI_PRPH_RADDR, WPI_PRPH_DWORD | addr);
465 	WPI_BARRIER_READ_WRITE(sc);
466 	return WPI_READ(sc, WPI_PRPH_RDATA);
467 }
468 
469 static __inline void
470 wpi_prph_write(struct wpi_softc *sc, uint32_t addr, uint32_t data)
471 {
472 	WPI_WRITE(sc, WPI_PRPH_WADDR, WPI_PRPH_DWORD | addr);
473 	WPI_BARRIER_WRITE(sc);
474 	WPI_WRITE(sc, WPI_PRPH_WDATA, data);
475 }
476 
477 static __inline void
478 wpi_prph_setbits(struct wpi_softc *sc, uint32_t addr, uint32_t mask)
479 {
480 	wpi_prph_write(sc, addr, wpi_prph_read(sc, addr) | mask);
481 }
482 
483 static __inline void
484 wpi_prph_clrbits(struct wpi_softc *sc, uint32_t addr, uint32_t mask)
485 {
486 	wpi_prph_write(sc, addr, wpi_prph_read(sc, addr) & ~mask);
487 }
488 
489 static __inline void
490 wpi_prph_write_region_4(struct wpi_softc *sc, uint32_t addr,
491     const uint32_t *data, int count)
492 {
493 	for (; count > 0; count--, data++, addr += 4)
494 		wpi_prph_write(sc, addr, *data);
495 }
496 
497 #ifdef WPI_DEBUG
498 
499 static __inline uint32_t
500 wpi_mem_read(struct wpi_softc *sc, uint32_t addr)
501 {
502 	WPI_WRITE(sc, WPI_MEM_RADDR, addr);
503 	WPI_BARRIER_READ_WRITE(sc);
504 	return WPI_READ(sc, WPI_MEM_RDATA);
505 }
506 
507 static __inline void
508 wpi_mem_write(struct wpi_softc *sc, uint32_t addr, uint32_t data)
509 {
510 	WPI_WRITE(sc, WPI_MEM_WADDR, addr);
511 	WPI_BARRIER_WRITE(sc);
512 	WPI_WRITE(sc, WPI_MEM_WDATA, data);
513 }
514 
515 static __inline void
516 wpi_mem_read_region_4(struct wpi_softc *sc, uint32_t addr, uint32_t *data,
517     int count)
518 {
519 	for (; count > 0; count--, addr += 4)
520 		*data++ = wpi_mem_read(sc, addr);
521 }
522 
523 #endif
524 
525 int
526 wpi_read_prom_data(struct wpi_softc *sc, uint32_t addr, void *data, int count)
527 {
528 	uint8_t *out = data;
529 	uint32_t val;
530 	int error, ntries;
531 
532 	if ((error = wpi_nic_lock(sc)) != 0)
533 		return error;
534 
535 	for (; count > 0; count -= 2, addr++) {
536 		WPI_WRITE(sc, WPI_EEPROM, addr << 2);
537 		WPI_CLRBITS(sc, WPI_EEPROM, WPI_EEPROM_CMD);
538 
539 		for (ntries = 0; ntries < 10; ntries++) {
540 			val = WPI_READ(sc, WPI_EEPROM);
541 			if (val & WPI_EEPROM_READ_VALID)
542 				break;
543 			DELAY(5);
544 		}
545 		if (ntries == 10) {
546 			printf("%s: could not read EEPROM\n",
547 			    sc->sc_dev.dv_xname);
548 			return ETIMEDOUT;
549 		}
550 		*out++ = val >> 16;
551 		if (count > 1)
552 			*out++ = val >> 24;
553 	}
554 
555 	wpi_nic_unlock(sc);
556 	return 0;
557 }
558 
559 int
560 wpi_dma_contig_alloc(bus_dma_tag_t tag, struct wpi_dma_info *dma, void **kvap,
561     bus_size_t size, bus_size_t alignment)
562 {
563 	int nsegs, error;
564 
565 	dma->tag = tag;
566 	dma->size = size;
567 
568 	error = bus_dmamap_create(tag, size, 1, size, 0, BUS_DMA_NOWAIT,
569 	    &dma->map);
570 	if (error != 0)
571 		goto fail;
572 
573 	error = bus_dmamem_alloc(tag, size, alignment, 0, &dma->seg, 1, &nsegs,
574 	    BUS_DMA_NOWAIT | BUS_DMA_ZERO);
575 	if (error != 0)
576 		goto fail;
577 
578 	error = bus_dmamem_map(tag, &dma->seg, 1, size, &dma->vaddr,
579 	    BUS_DMA_NOWAIT | BUS_DMA_COHERENT);
580 	if (error != 0)
581 		goto fail;
582 
583 	error = bus_dmamap_load_raw(tag, dma->map, &dma->seg, 1, size,
584 	    BUS_DMA_NOWAIT);
585 	if (error != 0)
586 		goto fail;
587 
588 	bus_dmamap_sync(tag, dma->map, 0, size, BUS_DMASYNC_PREWRITE);
589 
590 	dma->paddr = dma->map->dm_segs[0].ds_addr;
591 	if (kvap != NULL)
592 		*kvap = dma->vaddr;
593 
594 	return 0;
595 
596 fail:	wpi_dma_contig_free(dma);
597 	return error;
598 }
599 
600 void
601 wpi_dma_contig_free(struct wpi_dma_info *dma)
602 {
603 	if (dma->map != NULL) {
604 		if (dma->vaddr != NULL) {
605 			bus_dmamap_sync(dma->tag, dma->map, 0, dma->size,
606 			    BUS_DMASYNC_POSTREAD | BUS_DMASYNC_POSTWRITE);
607 			bus_dmamap_unload(dma->tag, dma->map);
608 			bus_dmamem_unmap(dma->tag, dma->vaddr, dma->size);
609 			bus_dmamem_free(dma->tag, &dma->seg, 1);
610 			dma->vaddr = NULL;
611 		}
612 		bus_dmamap_destroy(dma->tag, dma->map);
613 		dma->map = NULL;
614 	}
615 }
616 
617 int
618 wpi_alloc_shared(struct wpi_softc *sc)
619 {
620 	/* Shared buffer must be aligned on a 4KB boundary. */
621 	return wpi_dma_contig_alloc(sc->sc_dmat, &sc->shared_dma,
622 	    (void **)&sc->shared, sizeof (struct wpi_shared), 4096);
623 }
624 
625 void
626 wpi_free_shared(struct wpi_softc *sc)
627 {
628 	wpi_dma_contig_free(&sc->shared_dma);
629 }
630 
631 int
632 wpi_alloc_fwmem(struct wpi_softc *sc)
633 {
634 	/* Allocate enough contiguous space to store text and data. */
635 	return wpi_dma_contig_alloc(sc->sc_dmat, &sc->fw_dma, NULL,
636 	    WPI_FW_TEXT_MAXSZ + WPI_FW_DATA_MAXSZ, 16);
637 }
638 
639 void
640 wpi_free_fwmem(struct wpi_softc *sc)
641 {
642 	wpi_dma_contig_free(&sc->fw_dma);
643 }
644 
645 int
646 wpi_alloc_rx_ring(struct wpi_softc *sc, struct wpi_rx_ring *ring)
647 {
648 	bus_size_t size;
649 	int i, error;
650 
651 	ring->cur = 0;
652 
653 	/* Allocate RX descriptors (16KB aligned.) */
654 	size = WPI_RX_RING_COUNT * sizeof (uint32_t);
655 	error = wpi_dma_contig_alloc(sc->sc_dmat, &ring->desc_dma,
656 	    (void **)&ring->desc, size, 16 * 1024);
657 	if (error != 0) {
658 		printf("%s: could not allocate RX ring DMA memory\n",
659 		    sc->sc_dev.dv_xname);
660 		goto fail;
661 	}
662 
663 	/*
664 	 * Allocate and map RX buffers.
665 	 */
666 	for (i = 0; i < WPI_RX_RING_COUNT; i++) {
667 		struct wpi_rx_data *data = &ring->data[i];
668 
669 		error = bus_dmamap_create(sc->sc_dmat, WPI_RBUF_SIZE, 1,
670 		    WPI_RBUF_SIZE, 0, BUS_DMA_NOWAIT, &data->map);
671 		if (error != 0) {
672 			printf("%s: could not create RX buf DMA map\n",
673 			    sc->sc_dev.dv_xname);
674 			goto fail;
675 		}
676 
677 		data->m = MCLGETI(NULL, M_DONTWAIT, NULL, WPI_RBUF_SIZE);
678 		if (data->m == NULL) {
679 			printf("%s: could not allocate RX mbuf\n",
680 			    sc->sc_dev.dv_xname);
681 			error = ENOBUFS;
682 			goto fail;
683 		}
684 
685 		error = bus_dmamap_load(sc->sc_dmat, data->map,
686 		    mtod(data->m, void *), WPI_RBUF_SIZE, NULL,
687 		    BUS_DMA_NOWAIT | BUS_DMA_READ);
688 		if (error != 0) {
689 			printf("%s: can't map mbuf (error %d)\n",
690 			    sc->sc_dev.dv_xname, error);
691 			goto fail;
692 		}
693 
694 		/* Set physical address of RX buffer. */
695 		ring->desc[i] = htole32(data->map->dm_segs[0].ds_addr);
696 	}
697 
698 	bus_dmamap_sync(sc->sc_dmat, ring->desc_dma.map, 0, size,
699 	    BUS_DMASYNC_PREWRITE);
700 
701 	return 0;
702 
703 fail:	wpi_free_rx_ring(sc, ring);
704 	return error;
705 }
706 
707 void
708 wpi_reset_rx_ring(struct wpi_softc *sc, struct wpi_rx_ring *ring)
709 {
710 	int ntries;
711 
712 	if (wpi_nic_lock(sc) == 0) {
713 		WPI_WRITE(sc, WPI_FH_RX_CONFIG, 0);
714 		for (ntries = 0; ntries < 100; ntries++) {
715 			if (WPI_READ(sc, WPI_FH_RX_STATUS) &
716 			    WPI_FH_RX_STATUS_IDLE)
717 				break;
718 			DELAY(10);
719 		}
720 		wpi_nic_unlock(sc);
721 	}
722 	ring->cur = 0;
723 }
724 
725 void
726 wpi_free_rx_ring(struct wpi_softc *sc, struct wpi_rx_ring *ring)
727 {
728 	int i;
729 
730 	wpi_dma_contig_free(&ring->desc_dma);
731 
732 	for (i = 0; i < WPI_RX_RING_COUNT; i++) {
733 		struct wpi_rx_data *data = &ring->data[i];
734 
735 		if (data->m != NULL) {
736 			bus_dmamap_sync(sc->sc_dmat, data->map, 0,
737 			    data->map->dm_mapsize, BUS_DMASYNC_POSTREAD);
738 			bus_dmamap_unload(sc->sc_dmat, data->map);
739 			m_freem(data->m);
740 		}
741 		if (data->map != NULL)
742 			bus_dmamap_destroy(sc->sc_dmat, data->map);
743 	}
744 }
745 
746 int
747 wpi_alloc_tx_ring(struct wpi_softc *sc, struct wpi_tx_ring *ring, int qid)
748 {
749 	bus_addr_t paddr;
750 	bus_size_t size;
751 	int i, error;
752 
753 	ring->qid = qid;
754 	ring->queued = 0;
755 	ring->cur = 0;
756 
757 	/* Allocate TX descriptors (16KB aligned.) */
758 	size = WPI_TX_RING_COUNT * sizeof (struct wpi_tx_desc);
759 	error = wpi_dma_contig_alloc(sc->sc_dmat, &ring->desc_dma,
760 	    (void **)&ring->desc, size, 16 * 1024);
761 	if (error != 0) {
762 		printf("%s: could not allocate TX ring DMA memory\n",
763 		    sc->sc_dev.dv_xname);
764 		goto fail;
765 	}
766 
767 	/* Update shared area with ring physical address. */
768 	sc->shared->txbase[qid] = htole32(ring->desc_dma.paddr);
769 	bus_dmamap_sync(sc->sc_dmat, sc->shared_dma.map, 0,
770 	    sizeof (struct wpi_shared), BUS_DMASYNC_PREWRITE);
771 
772 	/*
773 	 * We only use rings 0 through 4 (4 EDCA + cmd) so there is no need
774 	 * to allocate commands space for other rings.
775 	 * XXX Do we really need to allocate descriptors for other rings?
776 	 */
777 	if (qid > 4)
778 		return 0;
779 
780 	size = WPI_TX_RING_COUNT * sizeof (struct wpi_tx_cmd);
781 	error = wpi_dma_contig_alloc(sc->sc_dmat, &ring->cmd_dma,
782 	    (void **)&ring->cmd, size, 4);
783 	if (error != 0) {
784 		printf("%s: could not allocate TX cmd DMA memory\n",
785 		    sc->sc_dev.dv_xname);
786 		goto fail;
787 	}
788 
789 	paddr = ring->cmd_dma.paddr;
790 	for (i = 0; i < WPI_TX_RING_COUNT; i++) {
791 		struct wpi_tx_data *data = &ring->data[i];
792 
793 		data->cmd_paddr = paddr;
794 		paddr += sizeof (struct wpi_tx_cmd);
795 
796 		error = bus_dmamap_create(sc->sc_dmat, MCLBYTES,
797 		    WPI_MAX_SCATTER - 1, MCLBYTES, 0, BUS_DMA_NOWAIT,
798 		    &data->map);
799 		if (error != 0) {
800 			printf("%s: could not create TX buf DMA map\n",
801 			    sc->sc_dev.dv_xname);
802 			goto fail;
803 		}
804 	}
805 	return 0;
806 
807 fail:	wpi_free_tx_ring(sc, ring);
808 	return error;
809 }
810 
811 void
812 wpi_reset_tx_ring(struct wpi_softc *sc, struct wpi_tx_ring *ring)
813 {
814 	int i;
815 
816 	for (i = 0; i < WPI_TX_RING_COUNT; i++) {
817 		struct wpi_tx_data *data = &ring->data[i];
818 
819 		if (data->m != NULL) {
820 			bus_dmamap_sync(sc->sc_dmat, data->map, 0,
821 			    data->map->dm_mapsize, BUS_DMASYNC_POSTWRITE);
822 			bus_dmamap_unload(sc->sc_dmat, data->map);
823 			m_freem(data->m);
824 			data->m = NULL;
825 		}
826 	}
827 	/* Clear TX descriptors. */
828 	memset(ring->desc, 0, ring->desc_dma.size);
829 	sc->qfullmsk &= ~(1 << ring->qid);
830 	ring->queued = 0;
831 	ring->cur = 0;
832 }
833 
834 void
835 wpi_free_tx_ring(struct wpi_softc *sc, struct wpi_tx_ring *ring)
836 {
837 	int i;
838 
839 	wpi_dma_contig_free(&ring->desc_dma);
840 	wpi_dma_contig_free(&ring->cmd_dma);
841 
842 	for (i = 0; i < WPI_TX_RING_COUNT; i++) {
843 		struct wpi_tx_data *data = &ring->data[i];
844 
845 		if (data->m != NULL) {
846 			bus_dmamap_sync(sc->sc_dmat, data->map, 0,
847 			    data->map->dm_mapsize, BUS_DMASYNC_POSTWRITE);
848 			bus_dmamap_unload(sc->sc_dmat, data->map);
849 			m_freem(data->m);
850 		}
851 		if (data->map != NULL)
852 			bus_dmamap_destroy(sc->sc_dmat, data->map);
853 	}
854 }
855 
856 int
857 wpi_read_eeprom(struct wpi_softc *sc)
858 {
859 	struct ieee80211com *ic = &sc->sc_ic;
860 	char domain[4];
861 	int i;
862 
863 	if ((WPI_READ(sc, WPI_EEPROM_GP) & 0x6) == 0) {
864 		printf("%s: bad EEPROM signature\n", sc->sc_dev.dv_xname);
865 		return EIO;
866 	}
867 	/* Clear HW ownership of EEPROM. */
868 	WPI_CLRBITS(sc, WPI_EEPROM_GP, WPI_EEPROM_GP_IF_OWNER);
869 
870 	wpi_read_prom_data(sc, WPI_EEPROM_CAPABILITIES, &sc->cap, 1);
871 	wpi_read_prom_data(sc, WPI_EEPROM_REVISION, &sc->rev, 2);
872 	wpi_read_prom_data(sc, WPI_EEPROM_TYPE, &sc->type, 1);
873 
874 	DPRINTF(("cap=%x rev=%x type=%x\n", sc->cap, letoh16(sc->rev),
875 	    sc->type));
876 
877 	/* Read and print regulatory domain (4 ASCII characters.) */
878 	wpi_read_prom_data(sc, WPI_EEPROM_DOMAIN, domain, 4);
879 	printf(", %.4s", domain);
880 
881 	/* Read and print MAC address. */
882 	wpi_read_prom_data(sc, WPI_EEPROM_MAC, ic->ic_myaddr, 6);
883 	printf(", address %s\n", ether_sprintf(ic->ic_myaddr));
884 
885 	/* Read the list of authorized channels. */
886 	for (i = 0; i < WPI_CHAN_BANDS_COUNT; i++)
887 		wpi_read_eeprom_channels(sc, i);
888 
889 	/* Read the list of TX power groups. */
890 	for (i = 0; i < WPI_POWER_GROUPS_COUNT; i++)
891 		wpi_read_eeprom_group(sc, i);
892 
893 	return 0;
894 }
895 
896 void
897 wpi_read_eeprom_channels(struct wpi_softc *sc, int n)
898 {
899 	struct ieee80211com *ic = &sc->sc_ic;
900 	const struct wpi_chan_band *band = &wpi_bands[n];
901 	struct wpi_eeprom_chan channels[WPI_MAX_CHAN_PER_BAND];
902 	int chan, i;
903 
904 	wpi_read_prom_data(sc, band->addr, channels,
905 	    band->nchan * sizeof (struct wpi_eeprom_chan));
906 
907 	for (i = 0; i < band->nchan; i++) {
908 		if (!(channels[i].flags & WPI_EEPROM_CHAN_VALID))
909 			continue;
910 
911 		chan = band->chan[i];
912 
913 		if (n == 0) {	/* 2GHz band */
914 			ic->ic_channels[chan].ic_freq =
915 			    ieee80211_ieee2mhz(chan, IEEE80211_CHAN_2GHZ);
916 			ic->ic_channels[chan].ic_flags =
917 			    IEEE80211_CHAN_CCK | IEEE80211_CHAN_OFDM |
918 			    IEEE80211_CHAN_DYN | IEEE80211_CHAN_2GHZ;
919 
920 		} else {	/* 5GHz band */
921 			/*
922 			 * Some adapters support channels 7, 8, 11 and 12
923 			 * both in the 2GHz and 4.9GHz bands.
924 			 * Because of limitations in our net80211 layer,
925 			 * we don't support them in the 4.9GHz band.
926 			 */
927 			if (chan <= 14)
928 				continue;
929 
930 			ic->ic_channels[chan].ic_freq =
931 			    ieee80211_ieee2mhz(chan, IEEE80211_CHAN_5GHZ);
932 			ic->ic_channels[chan].ic_flags = IEEE80211_CHAN_A;
933 			/* We have at least one valid 5GHz channel. */
934 			sc->sc_flags |= WPI_FLAG_HAS_5GHZ;
935 		}
936 
937 		/* Is active scan allowed on this channel? */
938 		if (!(channels[i].flags & WPI_EEPROM_CHAN_ACTIVE)) {
939 			ic->ic_channels[chan].ic_flags |=
940 			    IEEE80211_CHAN_PASSIVE;
941 		}
942 
943 		/* Save maximum allowed TX power for this channel. */
944 		sc->maxpwr[chan] = channels[i].maxpwr;
945 
946 		DPRINTF(("adding chan %d flags=0x%x maxpwr=%d\n",
947 		    chan, channels[i].flags, sc->maxpwr[chan]));
948 	}
949 }
950 
951 void
952 wpi_read_eeprom_group(struct wpi_softc *sc, int n)
953 {
954 	struct wpi_power_group *group = &sc->groups[n];
955 	struct wpi_eeprom_group rgroup;
956 	int i;
957 
958 	wpi_read_prom_data(sc, WPI_EEPROM_POWER_GRP + n * 32, &rgroup,
959 	    sizeof rgroup);
960 
961 	/* Save TX power group information. */
962 	group->chan   = rgroup.chan;
963 	group->maxpwr = rgroup.maxpwr;
964 	/* Retrieve temperature at which the samples were taken. */
965 	group->temp   = (int16_t)letoh16(rgroup.temp);
966 
967 	DPRINTF(("power group %d: chan=%d maxpwr=%d temp=%d\n", n,
968 	    group->chan, group->maxpwr, group->temp));
969 
970 	for (i = 0; i < WPI_SAMPLES_COUNT; i++) {
971 		group->samples[i].index = rgroup.samples[i].index;
972 		group->samples[i].power = rgroup.samples[i].power;
973 
974 		DPRINTF(("\tsample %d: index=%d power=%d\n", i,
975 		    group->samples[i].index, group->samples[i].power));
976 	}
977 }
978 
979 struct ieee80211_node *
980 wpi_node_alloc(struct ieee80211com *ic)
981 {
982 	return malloc(sizeof (struct wpi_node), M_DEVBUF, M_NOWAIT | M_ZERO);
983 }
984 
985 void
986 wpi_newassoc(struct ieee80211com *ic, struct ieee80211_node *ni, int isnew)
987 {
988 	struct wpi_softc *sc = ic->ic_if.if_softc;
989 	struct wpi_node *wn = (void *)ni;
990 	uint8_t rate;
991 	int ridx, i;
992 
993 	ieee80211_amrr_node_init(&sc->amrr, &wn->amn);
994 	/* Start at lowest available bit-rate, AMRR will raise. */
995 	ni->ni_txrate = 0;
996 
997 	for (i = 0; i < ni->ni_rates.rs_nrates; i++) {
998 		rate = ni->ni_rates.rs_rates[i] & IEEE80211_RATE_VAL;
999 		/* Map 802.11 rate to HW rate index. */
1000 		for (ridx = 0; ridx <= WPI_RIDX_MAX; ridx++)
1001 			if (wpi_rates[ridx].rate == rate)
1002 				break;
1003 		wn->ridx[i] = ridx;
1004 	}
1005 }
1006 
1007 int
1008 wpi_media_change(struct ifnet *ifp)
1009 {
1010 	struct wpi_softc *sc = ifp->if_softc;
1011 	struct ieee80211com *ic = &sc->sc_ic;
1012 	uint8_t rate, ridx;
1013 	int error;
1014 
1015 	error = ieee80211_media_change(ifp);
1016 	if (error != ENETRESET)
1017 		return error;
1018 
1019 	if (ic->ic_fixed_rate != -1) {
1020 		rate = ic->ic_sup_rates[ic->ic_curmode].
1021 		    rs_rates[ic->ic_fixed_rate] & IEEE80211_RATE_VAL;
1022 		/* Map 802.11 rate to HW rate index. */
1023 		for (ridx = 0; ridx <= WPI_RIDX_MAX; ridx++)
1024 			if (wpi_rates[ridx].rate == rate)
1025 				break;
1026 		sc->fixed_ridx = ridx;
1027 	}
1028 
1029 	if ((ifp->if_flags & (IFF_UP | IFF_RUNNING)) ==
1030 	    (IFF_UP | IFF_RUNNING)) {
1031 		wpi_stop(ifp, 0);
1032 		error = wpi_init(ifp);
1033 	}
1034 	return error;
1035 }
1036 
1037 int
1038 wpi_newstate(struct ieee80211com *ic, enum ieee80211_state nstate, int arg)
1039 {
1040 	struct ifnet *ifp = &ic->ic_if;
1041 	struct wpi_softc *sc = ifp->if_softc;
1042 	int error;
1043 
1044 	timeout_del(&sc->calib_to);
1045 
1046 	switch (nstate) {
1047 	case IEEE80211_S_SCAN:
1048 		/* Make the link LED blink while we're scanning. */
1049 		wpi_set_led(sc, WPI_LED_LINK, 20, 2);
1050 
1051 		if ((error = wpi_scan(sc, IEEE80211_CHAN_2GHZ)) != 0) {
1052 			printf("%s: could not initiate scan\n",
1053 			    sc->sc_dev.dv_xname);
1054 			return error;
1055 		}
1056 		ic->ic_state = nstate;
1057 		return 0;
1058 
1059 	case IEEE80211_S_ASSOC:
1060 		if (ic->ic_state != IEEE80211_S_RUN)
1061 			break;
1062 		/* FALLTHROUGH */
1063 	case IEEE80211_S_AUTH:
1064 		/* Reset state to handle reassociations correctly. */
1065 		sc->rxon.associd = 0;
1066 		sc->rxon.filter &= ~htole32(WPI_FILTER_BSS);
1067 
1068 		if ((error = wpi_auth(sc)) != 0) {
1069 			printf("%s: could not move to auth state\n",
1070 			    sc->sc_dev.dv_xname);
1071 			return error;
1072 		}
1073 		break;
1074 
1075 	case IEEE80211_S_RUN:
1076 		if ((error = wpi_run(sc)) != 0) {
1077 			printf("%s: could not move to run state\n",
1078 			    sc->sc_dev.dv_xname);
1079 			return error;
1080 		}
1081 		break;
1082 
1083 	case IEEE80211_S_INIT:
1084 		break;
1085 	}
1086 
1087 	return sc->sc_newstate(ic, nstate, arg);
1088 }
1089 
1090 void
1091 wpi_iter_func(void *arg, struct ieee80211_node *ni)
1092 {
1093 	struct wpi_softc *sc = arg;
1094 	struct wpi_node *wn = (struct wpi_node *)ni;
1095 
1096 	ieee80211_amrr_choose(&sc->amrr, ni, &wn->amn);
1097 }
1098 
1099 void
1100 wpi_calib_timeout(void *arg)
1101 {
1102 	struct wpi_softc *sc = arg;
1103 	struct ieee80211com *ic = &sc->sc_ic;
1104 	int s;
1105 
1106 	s = splnet();
1107 	/* Automatic rate control triggered every 500ms. */
1108 	if (ic->ic_fixed_rate == -1) {
1109 		if (ic->ic_opmode == IEEE80211_M_STA)
1110 			wpi_iter_func(sc, ic->ic_bss);
1111 		else
1112 			ieee80211_iterate_nodes(ic, wpi_iter_func, sc);
1113 	}
1114 
1115 	/* Force automatic TX power calibration every 60 secs. */
1116 	if (++sc->calib_cnt >= 120) {
1117 		wpi_power_calibration(sc);
1118 		sc->calib_cnt = 0;
1119 	}
1120 	splx(s);
1121 
1122 	/* Automatic rate control triggered every 500ms. */
1123 	timeout_add_msec(&sc->calib_to, 500);
1124 }
1125 
1126 int
1127 wpi_ccmp_decap(struct wpi_softc *sc, struct mbuf *m, struct ieee80211_key *k)
1128 {
1129 	struct ieee80211_frame *wh;
1130 	uint64_t pn, *prsc;
1131 	uint8_t *ivp;
1132 	uint8_t tid;
1133 	int hdrlen;
1134 
1135 	wh = mtod(m, struct ieee80211_frame *);
1136 	hdrlen = ieee80211_get_hdrlen(wh);
1137 	ivp = (uint8_t *)wh + hdrlen;
1138 
1139 	/* Check that ExtIV bit is be set. */
1140 	if (!(ivp[3] & IEEE80211_WEP_EXTIV)) {
1141 		DPRINTF(("CCMP decap ExtIV not set\n"));
1142 		return 1;
1143 	}
1144 	tid = ieee80211_has_qos(wh) ?
1145 	    ieee80211_get_qos(wh) & IEEE80211_QOS_TID : 0;
1146 	prsc = &k->k_rsc[tid];
1147 
1148 	/* Extract the 48-bit PN from the CCMP header. */
1149 	pn = (uint64_t)ivp[0]       |
1150 	     (uint64_t)ivp[1] <<  8 |
1151 	     (uint64_t)ivp[4] << 16 |
1152 	     (uint64_t)ivp[5] << 24 |
1153 	     (uint64_t)ivp[6] << 32 |
1154 	     (uint64_t)ivp[7] << 40;
1155 	if (pn <= *prsc) {
1156 		/*
1157 		 * Not necessarily a replayed frame since we did not check
1158 		 * the sequence number of the 802.11 header yet.
1159 		 */
1160 		DPRINTF(("CCMP replayed\n"));
1161 		return 1;
1162 	}
1163 	/* Update last seen packet number. */
1164 	*prsc = pn;
1165 
1166 	/* Clear Protected bit and strip IV. */
1167 	wh->i_fc[1] &= ~IEEE80211_FC1_PROTECTED;
1168 	memmove(mtod(m, caddr_t) + IEEE80211_CCMP_HDRLEN, wh, hdrlen);
1169 	m_adj(m, IEEE80211_CCMP_HDRLEN);
1170 	/* Strip MIC. */
1171 	m_adj(m, -IEEE80211_CCMP_MICLEN);
1172 	return 0;
1173 }
1174 
1175 void
1176 wpi_rx_done(struct wpi_softc *sc, struct wpi_rx_desc *desc,
1177     struct wpi_rx_data *data)
1178 {
1179 	struct ieee80211com *ic = &sc->sc_ic;
1180 	struct ifnet *ifp = &ic->ic_if;
1181 	struct wpi_rx_ring *ring = &sc->rxq;
1182 	struct wpi_rx_stat *stat;
1183 	struct wpi_rx_head *head;
1184 	struct wpi_rx_tail *tail;
1185 	struct ieee80211_frame *wh;
1186 	struct ieee80211_rxinfo rxi;
1187 	struct ieee80211_node *ni;
1188 	struct mbuf *m, *m1;
1189 	uint32_t flags;
1190 	int error;
1191 
1192 	bus_dmamap_sync(sc->sc_dmat, data->map, 0, WPI_RBUF_SIZE,
1193 	    BUS_DMASYNC_POSTREAD);
1194 	stat = (struct wpi_rx_stat *)(desc + 1);
1195 
1196 	if (stat->len > WPI_STAT_MAXLEN) {
1197 		printf("%s: invalid RX statistic header\n",
1198 		    sc->sc_dev.dv_xname);
1199 		ifp->if_ierrors++;
1200 		return;
1201 	}
1202 	head = (struct wpi_rx_head *)((caddr_t)(stat + 1) + stat->len);
1203 	tail = (struct wpi_rx_tail *)((caddr_t)(head + 1) + letoh16(head->len));
1204 	flags = letoh32(tail->flags);
1205 
1206 	/* Discard frames with a bad FCS early. */
1207 	if ((flags & WPI_RX_NOERROR) != WPI_RX_NOERROR) {
1208 		DPRINTFN(2, ("rx tail flags error %x\n", flags));
1209 		ifp->if_ierrors++;
1210 		return;
1211 	}
1212 	/* Discard frames that are too short. */
1213 	if (letoh16(head->len) < sizeof (*wh)) {
1214 		DPRINTF(("frame too short: %d\n", letoh16(head->len)));
1215 		ic->ic_stats.is_rx_tooshort++;
1216 		ifp->if_ierrors++;
1217 		return;
1218 	}
1219 
1220 	m1 = MCLGETI(NULL, M_DONTWAIT, NULL, WPI_RBUF_SIZE);
1221 	if (m1 == NULL) {
1222 		ic->ic_stats.is_rx_nombuf++;
1223 		ifp->if_ierrors++;
1224 		return;
1225 	}
1226 	bus_dmamap_unload(sc->sc_dmat, data->map);
1227 
1228 	error = bus_dmamap_load(sc->sc_dmat, data->map, mtod(m1, void *),
1229 	    WPI_RBUF_SIZE, NULL, BUS_DMA_NOWAIT | BUS_DMA_READ);
1230 	if (error != 0) {
1231 		m_freem(m1);
1232 
1233 		/* Try to reload the old mbuf. */
1234 		error = bus_dmamap_load(sc->sc_dmat, data->map,
1235 		    mtod(data->m, void *), WPI_RBUF_SIZE, NULL,
1236 		    BUS_DMA_NOWAIT | BUS_DMA_READ);
1237 		if (error != 0) {
1238 			panic("%s: could not load old RX mbuf",
1239 			    sc->sc_dev.dv_xname);
1240 		}
1241 		/* Physical address may have changed. */
1242 		ring->desc[ring->cur] = htole32(data->map->dm_segs[0].ds_addr);
1243 		bus_dmamap_sync(sc->sc_dmat, ring->desc_dma.map,
1244 		    ring->cur * sizeof (uint32_t), sizeof (uint32_t),
1245 		    BUS_DMASYNC_PREWRITE);
1246 		ifp->if_ierrors++;
1247 		return;
1248 	}
1249 
1250 	m = data->m;
1251 	data->m = m1;
1252 	/* Update RX descriptor. */
1253 	ring->desc[ring->cur] = htole32(data->map->dm_segs[0].ds_addr);
1254 	bus_dmamap_sync(sc->sc_dmat, ring->desc_dma.map,
1255 	    ring->cur * sizeof (uint32_t), sizeof (uint32_t),
1256 	    BUS_DMASYNC_PREWRITE);
1257 
1258 	/* Finalize mbuf. */
1259 	m->m_data = (caddr_t)(head + 1);
1260 	m->m_pkthdr.len = m->m_len = letoh16(head->len);
1261 
1262 	/* Grab a reference to the source node. */
1263 	wh = mtod(m, struct ieee80211_frame *);
1264 	ni = ieee80211_find_rxnode(ic, wh);
1265 
1266 	rxi.rxi_flags = 0;
1267 	if ((wh->i_fc[1] & IEEE80211_FC1_PROTECTED) &&
1268 	    !IEEE80211_IS_MULTICAST(wh->i_addr1) &&
1269 	    (ni->ni_flags & IEEE80211_NODE_RXPROT) &&
1270 	    ni->ni_pairwise_key.k_cipher == IEEE80211_CIPHER_CCMP) {
1271 		if ((flags & WPI_RX_CIPHER_MASK) != WPI_RX_CIPHER_CCMP) {
1272 			ic->ic_stats.is_ccmp_dec_errs++;
1273 			ifp->if_ierrors++;
1274 			m_freem(m);
1275 			return;
1276 		}
1277 		/* Check whether decryption was successful or not. */
1278 		if ((flags & WPI_RX_DECRYPT_MASK) != WPI_RX_DECRYPT_OK) {
1279 			DPRINTF(("CCMP decryption failed 0x%x\n", flags));
1280 			ic->ic_stats.is_ccmp_dec_errs++;
1281 			ifp->if_ierrors++;
1282 			m_freem(m);
1283 			return;
1284 		}
1285 		if (wpi_ccmp_decap(sc, m, &ni->ni_pairwise_key) != 0) {
1286 			ifp->if_ierrors++;
1287 			m_freem(m);
1288 			return;
1289 		}
1290 		rxi.rxi_flags |= IEEE80211_RXI_HWDEC;
1291 	}
1292 
1293 #if NBPFILTER > 0
1294 	if (sc->sc_drvbpf != NULL) {
1295 		struct mbuf mb;
1296 		struct wpi_rx_radiotap_header *tap = &sc->sc_rxtap;
1297 
1298 		tap->wr_flags = 0;
1299 		if (letoh16(head->flags) & 0x4)
1300 			tap->wr_flags |= IEEE80211_RADIOTAP_F_SHORTPRE;
1301 		tap->wr_chan_freq =
1302 		    htole16(ic->ic_channels[head->chan].ic_freq);
1303 		tap->wr_chan_flags =
1304 		    htole16(ic->ic_channels[head->chan].ic_flags);
1305 		tap->wr_dbm_antsignal = (int8_t)(stat->rssi - WPI_RSSI_OFFSET);
1306 		tap->wr_dbm_antnoise = (int8_t)letoh16(stat->noise);
1307 		tap->wr_tsft = tail->tstamp;
1308 		tap->wr_antenna = (letoh16(head->flags) >> 4) & 0xf;
1309 		switch (head->rate) {
1310 		/* CCK rates. */
1311 		case  10: tap->wr_rate =   2; break;
1312 		case  20: tap->wr_rate =   4; break;
1313 		case  55: tap->wr_rate =  11; break;
1314 		case 110: tap->wr_rate =  22; break;
1315 		/* OFDM rates. */
1316 		case 0xd: tap->wr_rate =  12; break;
1317 		case 0xf: tap->wr_rate =  18; break;
1318 		case 0x5: tap->wr_rate =  24; break;
1319 		case 0x7: tap->wr_rate =  36; break;
1320 		case 0x9: tap->wr_rate =  48; break;
1321 		case 0xb: tap->wr_rate =  72; break;
1322 		case 0x1: tap->wr_rate =  96; break;
1323 		case 0x3: tap->wr_rate = 108; break;
1324 		/* Unknown rate: should not happen. */
1325 		default:  tap->wr_rate =   0;
1326 		}
1327 
1328 		mb.m_data = (caddr_t)tap;
1329 		mb.m_len = sc->sc_rxtap_len;
1330 		mb.m_next = m;
1331 		mb.m_nextpkt = NULL;
1332 		mb.m_type = 0;
1333 		mb.m_flags = 0;
1334 		bpf_mtap(sc->sc_drvbpf, &mb, BPF_DIRECTION_IN);
1335 	}
1336 #endif
1337 
1338 	/* Send the frame to the 802.11 layer. */
1339 	rxi.rxi_rssi = stat->rssi;
1340 	rxi.rxi_tstamp = 0;	/* unused */
1341 	ieee80211_input(ifp, m, ni, &rxi);
1342 
1343 	/* Node is no longer needed. */
1344 	ieee80211_release_node(ic, ni);
1345 }
1346 
1347 void
1348 wpi_tx_done(struct wpi_softc *sc, struct wpi_rx_desc *desc)
1349 {
1350 	struct ieee80211com *ic = &sc->sc_ic;
1351 	struct ifnet *ifp = &ic->ic_if;
1352 	struct wpi_tx_ring *ring = &sc->txq[desc->qid & 0x3];
1353 	struct wpi_tx_data *data = &ring->data[desc->idx];
1354 	struct wpi_tx_stat *stat = (struct wpi_tx_stat *)(desc + 1);
1355 	struct wpi_node *wn = (struct wpi_node *)data->ni;
1356 
1357 	/* Update rate control statistics. */
1358 	wn->amn.amn_txcnt++;
1359 	if (stat->retrycnt > 0)
1360 		wn->amn.amn_retrycnt++;
1361 
1362 	if ((letoh32(stat->status) & 0xff) != 1)
1363 		ifp->if_oerrors++;
1364 
1365 	/* Unmap and free mbuf. */
1366 	bus_dmamap_sync(sc->sc_dmat, data->map, 0, data->map->dm_mapsize,
1367 	    BUS_DMASYNC_POSTWRITE);
1368 	bus_dmamap_unload(sc->sc_dmat, data->map);
1369 	m_freem(data->m);
1370 	data->m = NULL;
1371 	ieee80211_release_node(ic, data->ni);
1372 	data->ni = NULL;
1373 
1374 	sc->sc_tx_timer = 0;
1375 	if (--ring->queued < WPI_TX_RING_LOMARK) {
1376 		sc->qfullmsk &= ~(1 << ring->qid);
1377 		if (sc->qfullmsk == 0 && ifq_is_oactive(&ifp->if_snd)) {
1378 			ifq_clr_oactive(&ifp->if_snd);
1379 			(*ifp->if_start)(ifp);
1380 		}
1381 	}
1382 }
1383 
1384 void
1385 wpi_cmd_done(struct wpi_softc *sc, struct wpi_rx_desc *desc)
1386 {
1387 	struct wpi_tx_ring *ring = &sc->txq[4];
1388 	struct wpi_tx_data *data;
1389 
1390 	if ((desc->qid & 7) != 4)
1391 		return;	/* Not a command ack. */
1392 
1393 	data = &ring->data[desc->idx];
1394 
1395 	/* If the command was mapped in an mbuf, free it. */
1396 	if (data->m != NULL) {
1397 		bus_dmamap_sync(sc->sc_dmat, data->map, 0,
1398 		    data->map->dm_mapsize, BUS_DMASYNC_POSTWRITE);
1399 		bus_dmamap_unload(sc->sc_dmat, data->map);
1400 		m_freem(data->m);
1401 		data->m = NULL;
1402 	}
1403 	wakeup(&ring->cmd[desc->idx]);
1404 }
1405 
1406 void
1407 wpi_notif_intr(struct wpi_softc *sc)
1408 {
1409 	struct ieee80211com *ic = &sc->sc_ic;
1410 	struct ifnet *ifp = &ic->ic_if;
1411 	uint32_t hw;
1412 
1413 	bus_dmamap_sync(sc->sc_dmat, sc->shared_dma.map, 0,
1414 	    sizeof (struct wpi_shared), BUS_DMASYNC_POSTREAD);
1415 
1416 	hw = letoh32(sc->shared->next);
1417 	while (sc->rxq.cur != hw) {
1418 		struct wpi_rx_data *data = &sc->rxq.data[sc->rxq.cur];
1419 		struct wpi_rx_desc *desc;
1420 
1421 		bus_dmamap_sync(sc->sc_dmat, data->map, 0, sizeof (*desc),
1422 		    BUS_DMASYNC_POSTREAD);
1423 		desc = mtod(data->m, struct wpi_rx_desc *);
1424 
1425 		DPRINTFN(4, ("rx notification qid=%x idx=%d flags=%x type=%d "
1426 		    "len=%d\n", desc->qid, desc->idx, desc->flags, desc->type,
1427 		    letoh32(desc->len)));
1428 
1429 		if (!(desc->qid & 0x80))	/* Reply to a command. */
1430 			wpi_cmd_done(sc, desc);
1431 
1432 		switch (desc->type) {
1433 		case WPI_RX_DONE:
1434 			/* An 802.11 frame has been received. */
1435 			wpi_rx_done(sc, desc, data);
1436 			break;
1437 
1438 		case WPI_TX_DONE:
1439 			/* An 802.11 frame has been transmitted. */
1440 			wpi_tx_done(sc, desc);
1441 			break;
1442 
1443 		case WPI_UC_READY:
1444 		{
1445 			struct wpi_ucode_info *uc =
1446 			    (struct wpi_ucode_info *)(desc + 1);
1447 
1448 			/* The microcontroller is ready. */
1449 			bus_dmamap_sync(sc->sc_dmat, data->map, sizeof (*desc),
1450 			    sizeof (*uc), BUS_DMASYNC_POSTREAD);
1451 			DPRINTF(("microcode alive notification version %x "
1452 			    "alive %x\n", letoh32(uc->version),
1453 			    letoh32(uc->valid)));
1454 
1455 			if (letoh32(uc->valid) != 1) {
1456 				printf("%s: microcontroller initialization "
1457 				    "failed\n", sc->sc_dev.dv_xname);
1458 			}
1459 			if (uc->subtype != WPI_UCODE_INIT) {
1460 				/* Save the address of the error log. */
1461 				sc->errptr = letoh32(uc->errptr);
1462 			}
1463 			break;
1464 		}
1465 		case WPI_STATE_CHANGED:
1466 		{
1467 			uint32_t *status = (uint32_t *)(desc + 1);
1468 
1469 			/* Enabled/disabled notification. */
1470 			bus_dmamap_sync(sc->sc_dmat, data->map, sizeof (*desc),
1471 			    sizeof (*status), BUS_DMASYNC_POSTREAD);
1472 			DPRINTF(("state changed to %x\n", letoh32(*status)));
1473 
1474 			if (letoh32(*status) & 1) {
1475 				/* The radio button has to be pushed. */
1476 				printf("%s: Radio transmitter is off\n",
1477 				    sc->sc_dev.dv_xname);
1478 				/* Turn the interface down. */
1479 				wpi_stop(ifp, 1);
1480 				return;	/* No further processing. */
1481 			}
1482 			break;
1483 		}
1484 		case WPI_START_SCAN:
1485 		{
1486 			struct wpi_start_scan *scan =
1487 			    (struct wpi_start_scan *)(desc + 1);
1488 
1489 			bus_dmamap_sync(sc->sc_dmat, data->map, sizeof (*desc),
1490 			    sizeof (*scan), BUS_DMASYNC_POSTREAD);
1491 			DPRINTFN(2, ("scanning channel %d status %x\n",
1492 			    scan->chan, letoh32(scan->status)));
1493 
1494 			/* Fix current channel. */
1495 			ic->ic_bss->ni_chan = &ic->ic_channels[scan->chan];
1496 			break;
1497 		}
1498 		case WPI_STOP_SCAN:
1499 		{
1500 			struct wpi_stop_scan *scan =
1501 			    (struct wpi_stop_scan *)(desc + 1);
1502 
1503 			bus_dmamap_sync(sc->sc_dmat, data->map, sizeof (*desc),
1504 			    sizeof (*scan), BUS_DMASYNC_POSTREAD);
1505 			DPRINTF(("scan finished nchan=%d status=%d chan=%d\n",
1506 			    scan->nchan, scan->status, scan->chan));
1507 
1508 			if (scan->status == 1 && scan->chan <= 14 &&
1509 			    (sc->sc_flags & WPI_FLAG_HAS_5GHZ)) {
1510 				/*
1511 				 * We just finished scanning 2GHz channels,
1512 				 * start scanning 5GHz ones.
1513 				 */
1514 				if (wpi_scan(sc, IEEE80211_CHAN_5GHZ) == 0)
1515 					break;
1516 			}
1517 			ieee80211_end_scan(ifp);
1518 			break;
1519 		}
1520 		}
1521 
1522 		sc->rxq.cur = (sc->rxq.cur + 1) % WPI_RX_RING_COUNT;
1523 	}
1524 
1525 	/* Tell the firmware what we have processed. */
1526 	hw = (hw == 0) ? WPI_RX_RING_COUNT - 1 : hw - 1;
1527 	WPI_WRITE(sc, WPI_FH_RX_WPTR, hw & ~7);
1528 }
1529 
1530 #ifdef WPI_DEBUG
1531 /*
1532  * Dump the error log of the firmware when a firmware panic occurs.  Although
1533  * we can't debug the firmware because it is neither open source nor free, it
1534  * can help us to identify certain classes of problems.
1535  */
1536 void
1537 wpi_fatal_intr(struct wpi_softc *sc)
1538 {
1539 #define N(a)	(sizeof (a) / sizeof ((a)[0]))
1540 	struct wpi_fwdump dump;
1541 	uint32_t i, offset, count;
1542 
1543 	/* Check that the error log address is valid. */
1544 	if (sc->errptr < WPI_FW_DATA_BASE ||
1545 	    sc->errptr + sizeof (dump) >
1546 	    WPI_FW_DATA_BASE + WPI_FW_DATA_MAXSZ) {
1547 		printf("%s: bad firmware error log address 0x%08x\n",
1548 		    sc->sc_dev.dv_xname, sc->errptr);
1549 		return;
1550 	}
1551 
1552 	if (wpi_nic_lock(sc) != 0) {
1553 		printf("%s: could not read firmware error log\n",
1554 		    sc->sc_dev.dv_xname);
1555 		return;
1556 	}
1557 	/* Read number of entries in the log. */
1558 	count = wpi_mem_read(sc, sc->errptr);
1559 	if (count == 0 || count * sizeof (dump) > WPI_FW_DATA_MAXSZ) {
1560 		printf("%s: invalid count field (count=%u)\n",
1561 		    sc->sc_dev.dv_xname, count);
1562 		wpi_nic_unlock(sc);
1563 		return;
1564 	}
1565 	/* Skip "count" field. */
1566 	offset = sc->errptr + sizeof (uint32_t);
1567 	printf("firmware error log (count=%u):\n", count);
1568 	for (i = 0; i < count; i++) {
1569 		wpi_mem_read_region_4(sc, offset, (uint32_t *)&dump,
1570 		    sizeof (dump) / sizeof (uint32_t));
1571 
1572 		printf("  error type = \"%s\" (0x%08X)\n",
1573 		    (dump.desc < N(wpi_fw_errmsg)) ?
1574 			wpi_fw_errmsg[dump.desc] : "UNKNOWN",
1575 		    dump.desc);
1576 		printf("  error data      = 0x%08X\n",
1577 		    dump.data);
1578 		printf("  branch link     = 0x%08X%08X\n",
1579 		    dump.blink[0], dump.blink[1]);
1580 		printf("  interrupt link  = 0x%08X%08X\n",
1581 		    dump.ilink[0], dump.ilink[1]);
1582 		printf("  time            = %u\n", dump.time);
1583 
1584 		offset += sizeof (dump);
1585 	}
1586 	wpi_nic_unlock(sc);
1587 	/* Dump driver status (TX and RX rings) while we're here. */
1588 	printf("driver status:\n");
1589 	for (i = 0; i < 6; i++) {
1590 		struct wpi_tx_ring *ring = &sc->txq[i];
1591 		printf("  tx ring %2d: qid=%-2d cur=%-3d queued=%-3d\n",
1592 		    i, ring->qid, ring->cur, ring->queued);
1593 	}
1594 	printf("  rx ring: cur=%d\n", sc->rxq.cur);
1595 	printf("  802.11 state %d\n", sc->sc_ic.ic_state);
1596 #undef N
1597 }
1598 #endif
1599 
1600 int
1601 wpi_intr(void *arg)
1602 {
1603 	struct wpi_softc *sc = arg;
1604 	struct ifnet *ifp = &sc->sc_ic.ic_if;
1605 	uint32_t r1, r2;
1606 
1607 	/* Disable interrupts. */
1608 	WPI_WRITE(sc, WPI_MASK, 0);
1609 
1610 	r1 = WPI_READ(sc, WPI_INT);
1611 	r2 = WPI_READ(sc, WPI_FH_INT);
1612 
1613 	if (r1 == 0 && r2 == 0) {
1614 		if (ifp->if_flags & IFF_UP)
1615 			WPI_WRITE(sc, WPI_MASK, WPI_INT_MASK);
1616 		return 0;	/* Interrupt not for us. */
1617 	}
1618 	if (r1 == 0xffffffff || (r1 & 0xfffffff0) == 0xa5a5a5a0)
1619 		return 0;	/* Hardware gone! */
1620 
1621 	/* Acknowledge interrupts. */
1622 	WPI_WRITE(sc, WPI_INT, r1);
1623 	WPI_WRITE(sc, WPI_FH_INT, r2);
1624 
1625 	if (r1 & (WPI_INT_SW_ERR | WPI_INT_HW_ERR)) {
1626 		printf("%s: fatal firmware error\n", sc->sc_dev.dv_xname);
1627 		/* Dump firmware error log and stop. */
1628 #ifdef WPI_DEBUG
1629 		wpi_fatal_intr(sc);
1630 #endif
1631 		wpi_stop(ifp, 1);
1632 		task_add(systq, &sc->init_task);
1633 		return 1;
1634 	}
1635 	if ((r1 & (WPI_INT_FH_RX | WPI_INT_SW_RX)) ||
1636 	    (r2 & WPI_FH_INT_RX))
1637 		wpi_notif_intr(sc);
1638 
1639 	if (r1 & WPI_INT_ALIVE)
1640 		wakeup(sc);	/* Firmware is alive. */
1641 
1642 	/* Re-enable interrupts. */
1643 	if (ifp->if_flags & IFF_UP)
1644 		WPI_WRITE(sc, WPI_MASK, WPI_INT_MASK);
1645 
1646 	return 1;
1647 }
1648 
1649 int
1650 wpi_tx(struct wpi_softc *sc, struct mbuf *m, struct ieee80211_node *ni)
1651 {
1652 	struct ieee80211com *ic = &sc->sc_ic;
1653 	struct wpi_node *wn = (void *)ni;
1654 	struct wpi_tx_ring *ring;
1655 	struct wpi_tx_desc *desc;
1656 	struct wpi_tx_data *data;
1657 	struct wpi_tx_cmd *cmd;
1658 	struct wpi_cmd_data *tx;
1659 	const struct wpi_rate *rinfo;
1660 	struct ieee80211_frame *wh;
1661 	struct ieee80211_key *k = NULL;
1662 	enum ieee80211_edca_ac ac;
1663 	uint32_t flags;
1664 	uint16_t qos;
1665 	u_int hdrlen;
1666 	uint8_t *ivp, tid, ridx, type;
1667 	int i, totlen, hasqos, error;
1668 
1669 	wh = mtod(m, struct ieee80211_frame *);
1670 	hdrlen = ieee80211_get_hdrlen(wh);
1671 	type = wh->i_fc[0] & IEEE80211_FC0_TYPE_MASK;
1672 
1673 	/* Select EDCA Access Category and TX ring for this frame. */
1674 	if ((hasqos = ieee80211_has_qos(wh))) {
1675 		qos = ieee80211_get_qos(wh);
1676 		tid = qos & IEEE80211_QOS_TID;
1677 		ac = ieee80211_up_to_ac(ic, tid);
1678 	} else {
1679 		tid = 0;
1680 		ac = EDCA_AC_BE;
1681 	}
1682 
1683 	ring = &sc->txq[ac];
1684 	desc = &ring->desc[ring->cur];
1685 	data = &ring->data[ring->cur];
1686 
1687 	/* Choose a TX rate index. */
1688 	if (IEEE80211_IS_MULTICAST(wh->i_addr1) ||
1689 	    type != IEEE80211_FC0_TYPE_DATA) {
1690 		ridx = (ic->ic_curmode == IEEE80211_MODE_11A) ?
1691 		    WPI_RIDX_OFDM6 : WPI_RIDX_CCK1;
1692 	} else if (ic->ic_fixed_rate != -1) {
1693 		ridx = sc->fixed_ridx;
1694 	} else
1695 		ridx = wn->ridx[ni->ni_txrate];
1696 	rinfo = &wpi_rates[ridx];
1697 
1698 #if NBPFILTER > 0
1699 	if (sc->sc_drvbpf != NULL) {
1700 		struct mbuf mb;
1701 		struct wpi_tx_radiotap_header *tap = &sc->sc_txtap;
1702 
1703 		tap->wt_flags = 0;
1704 		tap->wt_chan_freq = htole16(ni->ni_chan->ic_freq);
1705 		tap->wt_chan_flags = htole16(ni->ni_chan->ic_flags);
1706 		tap->wt_rate = rinfo->rate;
1707 		tap->wt_hwqueue = ac;
1708 		if ((ic->ic_flags & IEEE80211_F_WEPON) &&
1709 		    (wh->i_fc[1] & IEEE80211_FC1_PROTECTED))
1710 			tap->wt_flags |= IEEE80211_RADIOTAP_F_WEP;
1711 
1712 		mb.m_data = (caddr_t)tap;
1713 		mb.m_len = sc->sc_txtap_len;
1714 		mb.m_next = m;
1715 		mb.m_nextpkt = NULL;
1716 		mb.m_type = 0;
1717 		mb.m_flags = 0;
1718 		bpf_mtap(sc->sc_drvbpf, &mb, BPF_DIRECTION_OUT);
1719 	}
1720 #endif
1721 
1722 	totlen = m->m_pkthdr.len;
1723 
1724 	/* Encrypt the frame if need be. */
1725 	if (wh->i_fc[1] & IEEE80211_FC1_PROTECTED) {
1726 		/* Retrieve key for TX. */
1727 		k = ieee80211_get_txkey(ic, wh, ni);
1728 		if (k->k_cipher != IEEE80211_CIPHER_CCMP) {
1729 			/* Do software encryption. */
1730 			if ((m = ieee80211_encrypt(ic, m, k)) == NULL)
1731 				return ENOBUFS;
1732 			/* 802.11 header may have moved. */
1733 			wh = mtod(m, struct ieee80211_frame *);
1734 			totlen = m->m_pkthdr.len;
1735 
1736 		} else	/* HW appends CCMP MIC. */
1737 			totlen += IEEE80211_CCMP_HDRLEN;
1738 	}
1739 
1740 	/* Prepare TX firmware command. */
1741 	cmd = &ring->cmd[ring->cur];
1742 	cmd->code = WPI_CMD_TX_DATA;
1743 	cmd->flags = 0;
1744 	cmd->qid = ring->qid;
1745 	cmd->idx = ring->cur;
1746 
1747 	tx = (struct wpi_cmd_data *)cmd->data;
1748 	/* NB: No need to clear tx, all fields are reinitialized here. */
1749 
1750 	flags = 0;
1751 	if (!IEEE80211_IS_MULTICAST(wh->i_addr1)) {
1752 		/* Unicast frame, check if an ACK is expected. */
1753 		if (!hasqos || (qos & IEEE80211_QOS_ACK_POLICY_MASK) !=
1754 		    IEEE80211_QOS_ACK_POLICY_NOACK)
1755 			flags |= WPI_TX_NEED_ACK;
1756 	}
1757 
1758 	/* Check if frame must be protected using RTS/CTS or CTS-to-self. */
1759 	if (!IEEE80211_IS_MULTICAST(wh->i_addr1)) {
1760 		/* NB: Group frames are sent using CCK in 802.11b/g. */
1761 		if (totlen + IEEE80211_CRC_LEN > ic->ic_rtsthreshold) {
1762 			flags |= WPI_TX_NEED_RTS | WPI_TX_FULL_TXOP;
1763 		} else if ((ic->ic_flags & IEEE80211_F_USEPROT) &&
1764 		    ridx <= WPI_RIDX_OFDM54) {
1765 			if (ic->ic_protmode == IEEE80211_PROT_CTSONLY)
1766 				flags |= WPI_TX_NEED_CTS | WPI_TX_FULL_TXOP;
1767 			else if (ic->ic_protmode == IEEE80211_PROT_RTSCTS)
1768 				flags |= WPI_TX_NEED_RTS | WPI_TX_FULL_TXOP;
1769 		}
1770 	}
1771 
1772 	if (IEEE80211_IS_MULTICAST(wh->i_addr1) ||
1773 	    type != IEEE80211_FC0_TYPE_DATA)
1774 		tx->id = WPI_ID_BROADCAST;
1775 	else
1776 		tx->id = wn->id;
1777 
1778 	if (type == IEEE80211_FC0_TYPE_MGT) {
1779 		uint8_t subtype = wh->i_fc[0] & IEEE80211_FC0_SUBTYPE_MASK;
1780 
1781 #ifndef IEEE80211_STA_ONLY
1782 		/* Tell HW to set timestamp in probe responses. */
1783 		if (subtype == IEEE80211_FC0_SUBTYPE_PROBE_RESP)
1784 			flags |= WPI_TX_INSERT_TSTAMP;
1785 #endif
1786 		if (subtype == IEEE80211_FC0_SUBTYPE_ASSOC_REQ ||
1787 		    subtype == IEEE80211_FC0_SUBTYPE_REASSOC_REQ)
1788 			tx->timeout = htole16(3);
1789 		else
1790 			tx->timeout = htole16(2);
1791 	} else
1792 		tx->timeout = htole16(0);
1793 
1794 	tx->len = htole16(totlen);
1795 	tx->tid = tid;
1796 	tx->rts_ntries = 7;
1797 	tx->data_ntries = 15;
1798 	tx->ofdm_mask = 0xff;
1799 	tx->cck_mask = 0x0f;
1800 	tx->lifetime = htole32(WPI_LIFETIME_INFINITE);
1801 	tx->plcp = rinfo->plcp;
1802 
1803 	/* Copy 802.11 header in TX command. */
1804 	memcpy((uint8_t *)(tx + 1), wh, hdrlen);
1805 
1806 	if (k != NULL && k->k_cipher == IEEE80211_CIPHER_CCMP) {
1807 		/* Trim 802.11 header and prepend CCMP IV. */
1808 		m_adj(m, hdrlen - IEEE80211_CCMP_HDRLEN);
1809 		ivp = mtod(m, uint8_t *);
1810 		k->k_tsc++;
1811 		ivp[0] = k->k_tsc;
1812 		ivp[1] = k->k_tsc >> 8;
1813 		ivp[2] = 0;
1814 		ivp[3] = k->k_id << 6 | IEEE80211_WEP_EXTIV;
1815 		ivp[4] = k->k_tsc >> 16;
1816 		ivp[5] = k->k_tsc >> 24;
1817 		ivp[6] = k->k_tsc >> 32;
1818 		ivp[7] = k->k_tsc >> 40;
1819 
1820 		tx->security = WPI_CIPHER_CCMP;
1821 		memcpy(tx->key, k->k_key, k->k_len);
1822 	} else {
1823 		/* Trim 802.11 header. */
1824 		m_adj(m, hdrlen);
1825 		tx->security = 0;
1826 	}
1827 	tx->flags = htole32(flags);
1828 
1829 	error = bus_dmamap_load_mbuf(sc->sc_dmat, data->map, m,
1830 	    BUS_DMA_NOWAIT | BUS_DMA_WRITE);
1831 	if (error != 0 && error != EFBIG) {
1832 		printf("%s: can't map mbuf (error %d)\n",
1833 		    sc->sc_dev.dv_xname, error);
1834 		m_freem(m);
1835 		return error;
1836 	}
1837 	if (error != 0) {
1838 		/* Too many DMA segments, linearize mbuf. */
1839 		if (m_defrag(m, M_DONTWAIT)) {
1840 			m_freem(m);
1841 			return ENOBUFS;
1842 		}
1843 		error = bus_dmamap_load_mbuf(sc->sc_dmat, data->map, m,
1844 		    BUS_DMA_NOWAIT | BUS_DMA_WRITE);
1845 		if (error != 0) {
1846 			printf("%s: can't map mbuf (error %d)\n",
1847 			    sc->sc_dev.dv_xname, error);
1848 			m_freem(m);
1849 			return error;
1850 		}
1851 	}
1852 
1853 	data->m = m;
1854 	data->ni = ni;
1855 
1856 	DPRINTFN(4, ("sending data: qid=%d idx=%d len=%d nsegs=%d\n",
1857 	    ring->qid, ring->cur, m->m_pkthdr.len, data->map->dm_nsegs));
1858 
1859 	/* Fill TX descriptor. */
1860 	desc->flags = htole32(WPI_PAD32(m->m_pkthdr.len) << 28 |
1861 	    (1 + data->map->dm_nsegs) << 24);
1862 	/* First DMA segment is used by the TX command. */
1863 	desc->segs[0].addr = htole32(ring->cmd_dma.paddr +
1864 	    ring->cur * sizeof (struct wpi_tx_cmd));
1865 	desc->segs[0].len  = htole32(4 + sizeof (struct wpi_cmd_data) +
1866 	    ((hdrlen + 3) & ~3));
1867 	/* Other DMA segments are for data payload. */
1868 	for (i = 1; i <= data->map->dm_nsegs; i++) {
1869 		desc->segs[i].addr =
1870 		    htole32(data->map->dm_segs[i - 1].ds_addr);
1871 		desc->segs[i].len  =
1872 		    htole32(data->map->dm_segs[i - 1].ds_len);
1873 	}
1874 
1875 	bus_dmamap_sync(sc->sc_dmat, data->map, 0, data->map->dm_mapsize,
1876 	    BUS_DMASYNC_PREWRITE);
1877 	bus_dmamap_sync(sc->sc_dmat, ring->cmd_dma.map,
1878 	    (caddr_t)cmd - ring->cmd_dma.vaddr, sizeof (*cmd),
1879 	    BUS_DMASYNC_PREWRITE);
1880 	bus_dmamap_sync(sc->sc_dmat, ring->desc_dma.map,
1881 	    (caddr_t)desc - ring->desc_dma.vaddr, sizeof (*desc),
1882 	    BUS_DMASYNC_PREWRITE);
1883 
1884 	/* Kick TX ring. */
1885 	ring->cur = (ring->cur + 1) % WPI_TX_RING_COUNT;
1886 	WPI_WRITE(sc, WPI_HBUS_TARG_WRPTR, ring->qid << 8 | ring->cur);
1887 
1888 	/* Mark TX ring as full if we reach a certain threshold. */
1889 	if (++ring->queued > WPI_TX_RING_HIMARK)
1890 		sc->qfullmsk |= 1 << ring->qid;
1891 
1892 	return 0;
1893 }
1894 
1895 void
1896 wpi_start(struct ifnet *ifp)
1897 {
1898 	struct wpi_softc *sc = ifp->if_softc;
1899 	struct ieee80211com *ic = &sc->sc_ic;
1900 	struct ieee80211_node *ni;
1901 	struct mbuf *m;
1902 
1903 	if (!(ifp->if_flags & IFF_RUNNING) || ifq_is_oactive(&ifp->if_snd))
1904 		return;
1905 
1906 	for (;;) {
1907 		if (sc->qfullmsk != 0) {
1908 			ifq_set_oactive(&ifp->if_snd);
1909 			break;
1910 		}
1911 		/* Send pending management frames first. */
1912 		m = mq_dequeue(&ic->ic_mgtq);
1913 		if (m != NULL) {
1914 			ni = m->m_pkthdr.ph_cookie;
1915 			goto sendit;
1916 		}
1917 		if (ic->ic_state != IEEE80211_S_RUN)
1918 			break;
1919 
1920 		/* Encapsulate and send data frames. */
1921 		IFQ_DEQUEUE(&ifp->if_snd, m);
1922 		if (m == NULL)
1923 			break;
1924 #if NBPFILTER > 0
1925 		if (ifp->if_bpf != NULL)
1926 			bpf_mtap(ifp->if_bpf, m, BPF_DIRECTION_OUT);
1927 #endif
1928 		if ((m = ieee80211_encap(ifp, m, &ni)) == NULL)
1929 			continue;
1930 sendit:
1931 #if NBPFILTER > 0
1932 		if (ic->ic_rawbpf != NULL)
1933 			bpf_mtap(ic->ic_rawbpf, m, BPF_DIRECTION_OUT);
1934 #endif
1935 		if (wpi_tx(sc, m, ni) != 0) {
1936 			ieee80211_release_node(ic, ni);
1937 			ifp->if_oerrors++;
1938 			continue;
1939 		}
1940 
1941 		sc->sc_tx_timer = 5;
1942 		ifp->if_timer = 1;
1943 	}
1944 }
1945 
1946 void
1947 wpi_watchdog(struct ifnet *ifp)
1948 {
1949 	struct wpi_softc *sc = ifp->if_softc;
1950 
1951 	ifp->if_timer = 0;
1952 
1953 	if (sc->sc_tx_timer > 0) {
1954 		if (--sc->sc_tx_timer == 0) {
1955 			printf("%s: device timeout\n", sc->sc_dev.dv_xname);
1956 			wpi_stop(ifp, 1);
1957 			ifp->if_oerrors++;
1958 			return;
1959 		}
1960 		ifp->if_timer = 1;
1961 	}
1962 
1963 	ieee80211_watchdog(ifp);
1964 }
1965 
1966 int
1967 wpi_ioctl(struct ifnet *ifp, u_long cmd, caddr_t data)
1968 {
1969 	struct wpi_softc *sc = ifp->if_softc;
1970 	struct ieee80211com *ic = &sc->sc_ic;
1971 	int s, error = 0;
1972 
1973 	error = rw_enter(&sc->sc_rwlock, RW_WRITE | RW_INTR);
1974 	if (error)
1975 		return error;
1976 	s = splnet();
1977 
1978 	switch (cmd) {
1979 	case SIOCSIFADDR:
1980 		ifp->if_flags |= IFF_UP;
1981 		/* FALLTHROUGH */
1982 	case SIOCSIFFLAGS:
1983 		if (ifp->if_flags & IFF_UP) {
1984 			if (!(ifp->if_flags & IFF_RUNNING))
1985 				error = wpi_init(ifp);
1986 		} else {
1987 			if (ifp->if_flags & IFF_RUNNING)
1988 				wpi_stop(ifp, 1);
1989 		}
1990 		break;
1991 
1992 	case SIOCS80211POWER:
1993 		error = ieee80211_ioctl(ifp, cmd, data);
1994 		if (error != ENETRESET)
1995 			break;
1996 		if (ic->ic_state == IEEE80211_S_RUN) {
1997 			if (ic->ic_flags & IEEE80211_F_PMGTON)
1998 				error = wpi_set_pslevel(sc, 0, 3, 0);
1999 			else	/* back to CAM */
2000 				error = wpi_set_pslevel(sc, 0, 0, 0);
2001 		} else {
2002 			/* Defer until transition to IEEE80211_S_RUN. */
2003 			error = 0;
2004 		}
2005 		break;
2006 
2007 	default:
2008 		error = ieee80211_ioctl(ifp, cmd, data);
2009 	}
2010 
2011 	if (error == ENETRESET) {
2012 		error = 0;
2013 		if ((ifp->if_flags & (IFF_UP | IFF_RUNNING)) ==
2014 		    (IFF_UP | IFF_RUNNING)) {
2015 			wpi_stop(ifp, 0);
2016 			error = wpi_init(ifp);
2017 		}
2018 	}
2019 
2020 	splx(s);
2021 	rw_exit_write(&sc->sc_rwlock);
2022 	return error;
2023 }
2024 
2025 /*
2026  * Send a command to the firmware.
2027  */
2028 int
2029 wpi_cmd(struct wpi_softc *sc, int code, const void *buf, int size, int async)
2030 {
2031 	struct wpi_tx_ring *ring = &sc->txq[4];
2032 	struct wpi_tx_desc *desc;
2033 	struct wpi_tx_data *data;
2034 	struct wpi_tx_cmd *cmd;
2035 	struct mbuf *m;
2036 	bus_addr_t paddr;
2037 	int totlen, error;
2038 
2039 	desc = &ring->desc[ring->cur];
2040 	data = &ring->data[ring->cur];
2041 	totlen = 4 + size;
2042 
2043 	if (size > sizeof cmd->data) {
2044 		/* Command is too large to fit in a descriptor. */
2045 		if (totlen > MCLBYTES)
2046 			return EINVAL;
2047 		MGETHDR(m, M_DONTWAIT, MT_DATA);
2048 		if (m == NULL)
2049 			return ENOMEM;
2050 		if (totlen > MHLEN) {
2051 			MCLGET(m, M_DONTWAIT);
2052 			if (!(m->m_flags & M_EXT)) {
2053 				m_freem(m);
2054 				return ENOMEM;
2055 			}
2056 		}
2057 		cmd = mtod(m, struct wpi_tx_cmd *);
2058 		error = bus_dmamap_load(sc->sc_dmat, data->map, cmd, totlen,
2059 		    NULL, BUS_DMA_NOWAIT | BUS_DMA_WRITE);
2060 		if (error != 0) {
2061 			m_freem(m);
2062 			return error;
2063 		}
2064 		data->m = m;
2065 		paddr = data->map->dm_segs[0].ds_addr;
2066 	} else {
2067 		cmd = &ring->cmd[ring->cur];
2068 		paddr = data->cmd_paddr;
2069 	}
2070 
2071 	cmd->code = code;
2072 	cmd->flags = 0;
2073 	cmd->qid = ring->qid;
2074 	cmd->idx = ring->cur;
2075 	memcpy(cmd->data, buf, size);
2076 
2077 	desc->flags = htole32(WPI_PAD32(size) << 28 | 1 << 24);
2078 	desc->segs[0].addr = htole32(paddr);
2079 	desc->segs[0].len  = htole32(totlen);
2080 
2081 	if (size > sizeof cmd->data) {
2082 		bus_dmamap_sync(sc->sc_dmat, data->map, 0, totlen,
2083 		    BUS_DMASYNC_PREWRITE);
2084 	} else {
2085 		bus_dmamap_sync(sc->sc_dmat, ring->cmd_dma.map,
2086 		    (caddr_t)cmd - ring->cmd_dma.vaddr, totlen,
2087 		    BUS_DMASYNC_PREWRITE);
2088 	}
2089 	bus_dmamap_sync(sc->sc_dmat, ring->desc_dma.map,
2090 	    (caddr_t)desc - ring->desc_dma.vaddr, sizeof (*desc),
2091 	    BUS_DMASYNC_PREWRITE);
2092 
2093 	/* Kick command ring. */
2094 	ring->cur = (ring->cur + 1) % WPI_TX_RING_COUNT;
2095 	WPI_WRITE(sc, WPI_HBUS_TARG_WRPTR, ring->qid << 8 | ring->cur);
2096 
2097 	return async ? 0 : tsleep(cmd, PCATCH, "wpicmd", hz);
2098 }
2099 
2100 /*
2101  * Configure HW multi-rate retries.
2102  */
2103 int
2104 wpi_mrr_setup(struct wpi_softc *sc)
2105 {
2106 	struct ieee80211com *ic = &sc->sc_ic;
2107 	struct wpi_mrr_setup mrr;
2108 	int i, error;
2109 
2110 	/* CCK rates (not used with 802.11a). */
2111 	for (i = WPI_RIDX_CCK1; i <= WPI_RIDX_CCK11; i++) {
2112 		mrr.rates[i].flags = 0;
2113 		mrr.rates[i].plcp = wpi_rates[i].plcp;
2114 		/* Fallback to the immediate lower CCK rate (if any.) */
2115 		mrr.rates[i].next =
2116 		    (i == WPI_RIDX_CCK1) ? WPI_RIDX_CCK1 : i - 1;
2117 		/* Try one time at this rate before falling back to "next". */
2118 		mrr.rates[i].ntries = 1;
2119 	}
2120 	/* OFDM rates (not used with 802.11b). */
2121 	for (i = WPI_RIDX_OFDM6; i <= WPI_RIDX_OFDM54; i++) {
2122 		mrr.rates[i].flags = 0;
2123 		mrr.rates[i].plcp = wpi_rates[i].plcp;
2124 		/* Fallback to the immediate lower rate (if any.) */
2125 		/* We allow fallback from OFDM/6 to CCK/2 in 11b/g mode. */
2126 		mrr.rates[i].next = (i == WPI_RIDX_OFDM6) ?
2127 		    ((ic->ic_curmode == IEEE80211_MODE_11A) ?
2128 			WPI_RIDX_OFDM6 : WPI_RIDX_CCK2) :
2129 		    i - 1;
2130 		/* Try one time at this rate before falling back to "next". */
2131 		mrr.rates[i].ntries = 1;
2132 	}
2133 	/* Setup MRR for control frames. */
2134 	mrr.which = htole32(WPI_MRR_CTL);
2135 	error = wpi_cmd(sc, WPI_CMD_MRR_SETUP, &mrr, sizeof mrr, 0);
2136 	if (error != 0) {
2137 		printf("%s: could not setup MRR for control frames\n",
2138 		    sc->sc_dev.dv_xname);
2139 		return error;
2140 	}
2141 	/* Setup MRR for data frames. */
2142 	mrr.which = htole32(WPI_MRR_DATA);
2143 	error = wpi_cmd(sc, WPI_CMD_MRR_SETUP, &mrr, sizeof mrr, 0);
2144 	if (error != 0) {
2145 		printf("%s: could not setup MRR for data frames\n",
2146 		    sc->sc_dev.dv_xname);
2147 		return error;
2148 	}
2149 	return 0;
2150 }
2151 
2152 void
2153 wpi_updateedca(struct ieee80211com *ic)
2154 {
2155 #define WPI_EXP2(x)	((1 << (x)) - 1)	/* CWmin = 2^ECWmin - 1 */
2156 	struct wpi_softc *sc = ic->ic_softc;
2157 	struct wpi_edca_params cmd;
2158 	int aci;
2159 
2160 	memset(&cmd, 0, sizeof cmd);
2161 	cmd.flags = htole32(WPI_EDCA_UPDATE);
2162 	for (aci = 0; aci < EDCA_NUM_AC; aci++) {
2163 		const struct ieee80211_edca_ac_params *ac =
2164 		    &ic->ic_edca_ac[aci];
2165 		cmd.ac[aci].aifsn = ac->ac_aifsn;
2166 		cmd.ac[aci].cwmin = htole16(WPI_EXP2(ac->ac_ecwmin));
2167 		cmd.ac[aci].cwmax = htole16(WPI_EXP2(ac->ac_ecwmax));
2168 		cmd.ac[aci].txoplimit =
2169 		    htole16(IEEE80211_TXOP_TO_US(ac->ac_txoplimit));
2170 	}
2171 	(void)wpi_cmd(sc, WPI_CMD_EDCA_PARAMS, &cmd, sizeof cmd, 1);
2172 #undef WPI_EXP2
2173 }
2174 
2175 void
2176 wpi_set_led(struct wpi_softc *sc, uint8_t which, uint8_t off, uint8_t on)
2177 {
2178 	struct wpi_cmd_led led;
2179 
2180 	led.which = which;
2181 	led.unit = htole32(100000);	/* on/off in unit of 100ms */
2182 	led.off = off;
2183 	led.on = on;
2184 	(void)wpi_cmd(sc, WPI_CMD_SET_LED, &led, sizeof led, 1);
2185 }
2186 
2187 int
2188 wpi_set_timing(struct wpi_softc *sc, struct ieee80211_node *ni)
2189 {
2190 	struct wpi_cmd_timing cmd;
2191 	uint64_t val, mod;
2192 
2193 	memset(&cmd, 0, sizeof cmd);
2194 	memcpy(&cmd.tstamp, ni->ni_tstamp, sizeof (uint64_t));
2195 	cmd.bintval = htole16(ni->ni_intval);
2196 	cmd.lintval = htole16(10);
2197 
2198 	/* Compute remaining time until next beacon. */
2199 	val = (uint64_t)ni->ni_intval * 1024;	/* msecs -> usecs */
2200 	mod = letoh64(cmd.tstamp) % val;
2201 	cmd.binitval = htole32((uint32_t)(val - mod));
2202 
2203 	DPRINTF(("timing bintval=%u, tstamp=%llu, init=%u\n",
2204 	    ni->ni_intval, letoh64(cmd.tstamp), (uint32_t)(val - mod)));
2205 
2206 	return wpi_cmd(sc, WPI_CMD_TIMING, &cmd, sizeof cmd, 1);
2207 }
2208 
2209 /*
2210  * This function is called periodically (every minute) to adjust TX power
2211  * based on temperature variation.
2212  */
2213 void
2214 wpi_power_calibration(struct wpi_softc *sc)
2215 {
2216 	int temp;
2217 
2218 	temp = (int)WPI_READ(sc, WPI_UCODE_GP2);
2219 	/* Sanity-check temperature. */
2220 	if (temp < -260 || temp > 25) {
2221 		/* This can't be correct, ignore. */
2222 		DPRINTF(("out-of-range temperature reported: %d\n", temp));
2223 		return;
2224 	}
2225 	DPRINTF(("temperature %d->%d\n", sc->temp, temp));
2226 	/* Adjust TX power if need be (delta > 6). */
2227 	if (abs(temp - sc->temp) > 6) {
2228 		/* Record temperature of last calibration. */
2229 		sc->temp = temp;
2230 		(void)wpi_set_txpower(sc, 1);
2231 	}
2232 }
2233 
2234 /*
2235  * Set TX power for current channel (each rate has its own power settings).
2236  */
2237 int
2238 wpi_set_txpower(struct wpi_softc *sc, int async)
2239 {
2240 	struct ieee80211com *ic = &sc->sc_ic;
2241 	struct ieee80211_channel *ch;
2242 	struct wpi_power_group *group;
2243 	struct wpi_cmd_txpower cmd;
2244 	u_int chan;
2245 	int idx, i;
2246 
2247 	/* Retrieve current channel from last RXON. */
2248 	chan = sc->rxon.chan;
2249 	DPRINTF(("setting TX power for channel %d\n", chan));
2250 	ch = &ic->ic_channels[chan];
2251 
2252 	/* Find the TX power group to which this channel belongs. */
2253 	if (IEEE80211_IS_CHAN_5GHZ(ch)) {
2254 		for (group = &sc->groups[1]; group < &sc->groups[4]; group++)
2255 			if (chan <= group->chan)
2256 				break;
2257 	} else
2258 		group = &sc->groups[0];
2259 
2260 	memset(&cmd, 0, sizeof cmd);
2261 	cmd.band = IEEE80211_IS_CHAN_5GHZ(ch) ? 0 : 1;
2262 	cmd.chan = htole16(chan);
2263 
2264 	/* Set TX power for all OFDM and CCK rates. */
2265 	for (i = 0; i <= WPI_RIDX_MAX ; i++) {
2266 		/* Retrieve TX power for this channel/rate. */
2267 		idx = wpi_get_power_index(sc, group, ch, i);
2268 
2269 		cmd.rates[i].plcp = wpi_rates[i].plcp;
2270 
2271 		if (IEEE80211_IS_CHAN_5GHZ(ch)) {
2272 			cmd.rates[i].rf_gain = wpi_rf_gain_5ghz[idx];
2273 			cmd.rates[i].dsp_gain = wpi_dsp_gain_5ghz[idx];
2274 		} else {
2275 			cmd.rates[i].rf_gain = wpi_rf_gain_2ghz[idx];
2276 			cmd.rates[i].dsp_gain = wpi_dsp_gain_2ghz[idx];
2277 		}
2278 		DPRINTF(("chan %d/rate %d: power index %d\n", chan,
2279 		    wpi_rates[i].rate, idx));
2280 	}
2281 	return wpi_cmd(sc, WPI_CMD_TXPOWER, &cmd, sizeof cmd, async);
2282 }
2283 
2284 /*
2285  * Determine TX power index for a given channel/rate combination.
2286  * This takes into account the regulatory information from EEPROM and the
2287  * current temperature.
2288  */
2289 int
2290 wpi_get_power_index(struct wpi_softc *sc, struct wpi_power_group *group,
2291     struct ieee80211_channel *c, int ridx)
2292 {
2293 /* Fixed-point arithmetic division using a n-bit fractional part. */
2294 #define fdivround(a, b, n)	\
2295 	((((1 << n) * (a)) / (b) + (1 << n) / 2) / (1 << n))
2296 
2297 /* Linear interpolation. */
2298 #define interpolate(x, x1, y1, x2, y2, n)	\
2299 	((y1) + fdivround(((x) - (x1)) * ((y2) - (y1)), (x2) - (x1), n))
2300 
2301 	struct ieee80211com *ic = &sc->sc_ic;
2302 	struct wpi_power_sample *sample;
2303 	int pwr, idx;
2304 	u_int chan;
2305 
2306 	/* Get channel number. */
2307 	chan = ieee80211_chan2ieee(ic, c);
2308 
2309 	/* Default TX power is group maximum TX power minus 3dB. */
2310 	pwr = group->maxpwr / 2;
2311 
2312 	/* Decrease TX power for highest OFDM rates to reduce distortion. */
2313 	switch (ridx) {
2314 	case WPI_RIDX_OFDM36:
2315 		pwr -= IEEE80211_IS_CHAN_2GHZ(c) ? 0 :  5;
2316 		break;
2317 	case WPI_RIDX_OFDM48:
2318 		pwr -= IEEE80211_IS_CHAN_2GHZ(c) ? 7 : 10;
2319 		break;
2320 	case WPI_RIDX_OFDM54:
2321 		pwr -= IEEE80211_IS_CHAN_2GHZ(c) ? 9 : 12;
2322 		break;
2323 	}
2324 
2325 	/* Never exceed the channel maximum allowed TX power. */
2326 	pwr = MIN(pwr, sc->maxpwr[chan]);
2327 
2328 	/* Retrieve TX power index into gain tables from samples. */
2329 	for (sample = group->samples; sample < &group->samples[3]; sample++)
2330 		if (pwr > sample[1].power)
2331 			break;
2332 	/* Fixed-point linear interpolation using a 19-bit fractional part. */
2333 	idx = interpolate(pwr, sample[0].power, sample[0].index,
2334 	    sample[1].power, sample[1].index, 19);
2335 
2336 	/*-
2337 	 * Adjust power index based on current temperature:
2338 	 * - if cooler than factory-calibrated: decrease output power
2339 	 * - if warmer than factory-calibrated: increase output power
2340 	 */
2341 	idx -= (sc->temp - group->temp) * 11 / 100;
2342 
2343 	/* Decrease TX power for CCK rates (-5dB). */
2344 	if (ridx >= WPI_RIDX_CCK1)
2345 		idx += 10;
2346 
2347 	/* Make sure idx stays in a valid range. */
2348 	if (idx < 0)
2349 		idx = 0;
2350 	else if (idx > WPI_MAX_PWR_INDEX)
2351 		idx = WPI_MAX_PWR_INDEX;
2352 	return idx;
2353 
2354 #undef interpolate
2355 #undef fdivround
2356 }
2357 
2358 /*
2359  * Set STA mode power saving level (between 0 and 5).
2360  * Level 0 is CAM (Continuously Aware Mode), 5 is for maximum power saving.
2361  */
2362 int
2363 wpi_set_pslevel(struct wpi_softc *sc, int dtim, int level, int async)
2364 {
2365 	struct wpi_pmgt_cmd cmd;
2366 	const struct wpi_pmgt *pmgt;
2367 	uint32_t max, skip_dtim;
2368 	pcireg_t reg;
2369 	int i;
2370 
2371 	/* Select which PS parameters to use. */
2372 	if (dtim <= 10)
2373 		pmgt = &wpi_pmgt[0][level];
2374 	else
2375 		pmgt = &wpi_pmgt[1][level];
2376 
2377 	memset(&cmd, 0, sizeof cmd);
2378 	if (level != 0)	/* not CAM */
2379 		cmd.flags |= htole16(WPI_PS_ALLOW_SLEEP);
2380 	/* Retrieve PCIe Active State Power Management (ASPM). */
2381 	reg = pci_conf_read(sc->sc_pct, sc->sc_pcitag,
2382 	    sc->sc_cap_off + PCI_PCIE_LCSR);
2383 	if (!(reg & PCI_PCIE_LCSR_ASPM_L0S))	/* L0s Entry disabled. */
2384 		cmd.flags |= htole16(WPI_PS_PCI_PMGT);
2385 	cmd.rxtimeout = htole32(pmgt->rxtimeout * 1024);
2386 	cmd.txtimeout = htole32(pmgt->txtimeout * 1024);
2387 
2388 	if (dtim == 0) {
2389 		dtim = 1;
2390 		skip_dtim = 0;
2391 	} else
2392 		skip_dtim = pmgt->skip_dtim;
2393 	if (skip_dtim != 0) {
2394 		cmd.flags |= htole16(WPI_PS_SLEEP_OVER_DTIM);
2395 		max = pmgt->intval[4];
2396 		if (max == (uint32_t)-1)
2397 			max = dtim * (skip_dtim + 1);
2398 		else if (max > dtim)
2399 			max = (max / dtim) * dtim;
2400 	} else
2401 		max = dtim;
2402 	for (i = 0; i < 5; i++)
2403 		cmd.intval[i] = htole32(MIN(max, pmgt->intval[i]));
2404 
2405 	DPRINTF(("setting power saving level to %d\n", level));
2406 	return wpi_cmd(sc, WPI_CMD_SET_POWER_MODE, &cmd, sizeof cmd, async);
2407 }
2408 
2409 int
2410 wpi_config(struct wpi_softc *sc)
2411 {
2412 	struct ieee80211com *ic = &sc->sc_ic;
2413 	struct ifnet *ifp = &ic->ic_if;
2414 	struct wpi_bluetooth bluetooth;
2415 	struct wpi_node_info node;
2416 	int error;
2417 
2418 	/* Set power saving level to CAM during initialization. */
2419 	if ((error = wpi_set_pslevel(sc, 0, 0, 0)) != 0) {
2420 		printf("%s: could not set power saving level\n",
2421 		    sc->sc_dev.dv_xname);
2422 		return error;
2423 	}
2424 
2425 	/* Configure bluetooth coexistence. */
2426 	memset(&bluetooth, 0, sizeof bluetooth);
2427 	bluetooth.flags = WPI_BT_COEX_MODE_4WIRE;
2428 	bluetooth.lead_time = WPI_BT_LEAD_TIME_DEF;
2429 	bluetooth.max_kill = WPI_BT_MAX_KILL_DEF;
2430 	error = wpi_cmd(sc, WPI_CMD_BT_COEX, &bluetooth, sizeof bluetooth, 0);
2431 	if (error != 0) {
2432 		printf("%s: could not configure bluetooth coexistence\n",
2433 		    sc->sc_dev.dv_xname);
2434 		return error;
2435 	}
2436 
2437 	/* Configure adapter. */
2438 	memset(&sc->rxon, 0, sizeof (struct wpi_rxon));
2439 	IEEE80211_ADDR_COPY(ic->ic_myaddr, LLADDR(ifp->if_sadl));
2440 	IEEE80211_ADDR_COPY(sc->rxon.myaddr, ic->ic_myaddr);
2441 	/* Set default channel. */
2442 	sc->rxon.chan = ieee80211_chan2ieee(ic, ic->ic_ibss_chan);
2443 	sc->rxon.flags = htole32(WPI_RXON_TSF);
2444 	if (IEEE80211_IS_CHAN_2GHZ(ic->ic_ibss_chan))
2445 		sc->rxon.flags |= htole32(WPI_RXON_AUTO | WPI_RXON_24GHZ);
2446 	switch (ic->ic_opmode) {
2447 	case IEEE80211_M_STA:
2448 		sc->rxon.mode = WPI_MODE_STA;
2449 		sc->rxon.filter = htole32(WPI_FILTER_MULTICAST);
2450 		break;
2451 	case IEEE80211_M_MONITOR:
2452 		sc->rxon.mode = WPI_MODE_MONITOR;
2453 		sc->rxon.filter = htole32(WPI_FILTER_MULTICAST |
2454 		    WPI_FILTER_CTL | WPI_FILTER_PROMISC);
2455 		break;
2456 	default:
2457 		/* Should not get there. */
2458 		break;
2459 	}
2460 	sc->rxon.cck_mask  = 0x0f;	/* not yet negotiated */
2461 	sc->rxon.ofdm_mask = 0xff;	/* not yet negotiated */
2462 	DPRINTF(("setting configuration\n"));
2463 	error = wpi_cmd(sc, WPI_CMD_RXON, &sc->rxon, sizeof (struct wpi_rxon),
2464 	    0);
2465 	if (error != 0) {
2466 		printf("%s: RXON command failed\n", sc->sc_dev.dv_xname);
2467 		return error;
2468 	}
2469 
2470 	/* Configuration has changed, set TX power accordingly. */
2471 	if ((error = wpi_set_txpower(sc, 0)) != 0) {
2472 		printf("%s: could not set TX power\n", sc->sc_dev.dv_xname);
2473 		return error;
2474 	}
2475 
2476 	/* Add broadcast node. */
2477 	memset(&node, 0, sizeof node);
2478 	IEEE80211_ADDR_COPY(node.macaddr, etherbroadcastaddr);
2479 	node.id = WPI_ID_BROADCAST;
2480 	node.plcp = wpi_rates[WPI_RIDX_CCK1].plcp;
2481 	node.action = htole32(WPI_ACTION_SET_RATE);
2482 	node.antenna = WPI_ANTENNA_BOTH;
2483 	error = wpi_cmd(sc, WPI_CMD_ADD_NODE, &node, sizeof node, 0);
2484 	if (error != 0) {
2485 		printf("%s: could not add broadcast node\n",
2486 		    sc->sc_dev.dv_xname);
2487 		return error;
2488 	}
2489 
2490 	if ((error = wpi_mrr_setup(sc)) != 0) {
2491 		printf("%s: could not setup MRR\n", sc->sc_dev.dv_xname);
2492 		return error;
2493 	}
2494 	return 0;
2495 }
2496 
2497 int
2498 wpi_scan(struct wpi_softc *sc, uint16_t flags)
2499 {
2500 	struct ieee80211com *ic = &sc->sc_ic;
2501 	struct wpi_scan_hdr *hdr;
2502 	struct wpi_cmd_data *tx;
2503 	struct wpi_scan_essid *essid;
2504 	struct wpi_scan_chan *chan;
2505 	struct ieee80211_frame *wh;
2506 	struct ieee80211_rateset *rs;
2507 	struct ieee80211_channel *c;
2508 	uint8_t *buf, *frm;
2509 	int buflen, error;
2510 
2511 	buf = malloc(WPI_SCAN_MAXSZ, M_DEVBUF, M_NOWAIT | M_ZERO);
2512 	if (buf == NULL) {
2513 		printf("%s: could not allocate buffer for scan command\n",
2514 		    sc->sc_dev.dv_xname);
2515 		return ENOMEM;
2516 	}
2517 	hdr = (struct wpi_scan_hdr *)buf;
2518 	/*
2519 	 * Move to the next channel if no frames are received within 10ms
2520 	 * after sending the probe request.
2521 	 */
2522 	hdr->quiet_time = htole16(10);		/* timeout in milliseconds */
2523 	hdr->quiet_threshold = htole16(1);	/* min # of packets */
2524 
2525 	tx = (struct wpi_cmd_data *)(hdr + 1);
2526 	tx->flags = htole32(WPI_TX_AUTO_SEQ);
2527 	tx->id = WPI_ID_BROADCAST;
2528 	tx->lifetime = htole32(WPI_LIFETIME_INFINITE);
2529 
2530 	if (flags & IEEE80211_CHAN_5GHZ) {
2531 		hdr->crc_threshold = htole16(1);
2532 		/* Send probe requests at 6Mbps. */
2533 		tx->plcp = wpi_rates[WPI_RIDX_OFDM6].plcp;
2534 		rs = &ic->ic_sup_rates[IEEE80211_MODE_11A];
2535 	} else {
2536 		hdr->flags = htole32(WPI_RXON_24GHZ | WPI_RXON_AUTO);
2537 		/* Send probe requests at 1Mbps. */
2538 		tx->plcp = wpi_rates[WPI_RIDX_CCK1].plcp;
2539 		rs = &ic->ic_sup_rates[IEEE80211_MODE_11G];
2540 	}
2541 
2542 	essid = (struct wpi_scan_essid *)(tx + 1);
2543 	if (ic->ic_des_esslen != 0) {
2544 		essid[0].id  = IEEE80211_ELEMID_SSID;
2545 		essid[0].len = ic->ic_des_esslen;
2546 		memcpy(essid[0].data, ic->ic_des_essid, ic->ic_des_esslen);
2547 	}
2548 	/*
2549 	 * Build a probe request frame.  Most of the following code is a
2550 	 * copy & paste of what is done in net80211.
2551 	 */
2552 	wh = (struct ieee80211_frame *)(essid + 4);
2553 	wh->i_fc[0] = IEEE80211_FC0_VERSION_0 | IEEE80211_FC0_TYPE_MGT |
2554 	    IEEE80211_FC0_SUBTYPE_PROBE_REQ;
2555 	wh->i_fc[1] = IEEE80211_FC1_DIR_NODS;
2556 	IEEE80211_ADDR_COPY(wh->i_addr1, etherbroadcastaddr);
2557 	IEEE80211_ADDR_COPY(wh->i_addr2, ic->ic_myaddr);
2558 	IEEE80211_ADDR_COPY(wh->i_addr3, etherbroadcastaddr);
2559 	*(uint16_t *)&wh->i_dur[0] = 0;	/* filled by HW */
2560 	*(uint16_t *)&wh->i_seq[0] = 0;	/* filled by HW */
2561 
2562 	frm = (uint8_t *)(wh + 1);
2563 	frm = ieee80211_add_ssid(frm, NULL, 0);
2564 	frm = ieee80211_add_rates(frm, rs);
2565 	if (rs->rs_nrates > IEEE80211_RATE_SIZE)
2566 		frm = ieee80211_add_xrates(frm, rs);
2567 
2568 	/* Set length of probe request. */
2569 	tx->len = htole16(frm - (uint8_t *)wh);
2570 
2571 	chan = (struct wpi_scan_chan *)frm;
2572 	for (c  = &ic->ic_channels[1];
2573 	     c <= &ic->ic_channels[IEEE80211_CHAN_MAX]; c++) {
2574 		if ((c->ic_flags & flags) != flags)
2575 			continue;
2576 
2577 		chan->chan = ieee80211_chan2ieee(ic, c);
2578 		DPRINTFN(2, ("adding channel %d\n", chan->chan));
2579 		chan->flags = 0;
2580 		if (!(c->ic_flags & IEEE80211_CHAN_PASSIVE))
2581 			chan->flags |= WPI_CHAN_ACTIVE;
2582 		if (ic->ic_des_esslen != 0)
2583 			chan->flags |= WPI_CHAN_NPBREQS(1);
2584 		chan->dsp_gain = 0x6e;
2585 		if (IEEE80211_IS_CHAN_5GHZ(c)) {
2586 			chan->rf_gain = 0x3b;
2587 			chan->active  = htole16(24);
2588 			chan->passive = htole16(110);
2589 		} else {
2590 			chan->rf_gain = 0x28;
2591 			chan->active  = htole16(36);
2592 			chan->passive = htole16(120);
2593 		}
2594 		hdr->nchan++;
2595 		chan++;
2596 	}
2597 
2598 	buflen = (uint8_t *)chan - buf;
2599 	hdr->len = htole16(buflen);
2600 
2601 	DPRINTF(("sending scan command nchan=%d\n", hdr->nchan));
2602 	error = wpi_cmd(sc, WPI_CMD_SCAN, buf, buflen, 1);
2603 	free(buf, M_DEVBUF, WPI_SCAN_MAXSZ);
2604 	return error;
2605 }
2606 
2607 int
2608 wpi_auth(struct wpi_softc *sc)
2609 {
2610 	struct ieee80211com *ic = &sc->sc_ic;
2611 	struct ieee80211_node *ni = ic->ic_bss;
2612 	struct wpi_node_info node;
2613 	int error;
2614 
2615 	/* Update adapter configuration. */
2616 	IEEE80211_ADDR_COPY(sc->rxon.bssid, ni->ni_bssid);
2617 	sc->rxon.chan = ieee80211_chan2ieee(ic, ni->ni_chan);
2618 	sc->rxon.flags = htole32(WPI_RXON_TSF);
2619 	if (IEEE80211_IS_CHAN_2GHZ(ni->ni_chan))
2620 		sc->rxon.flags |= htole32(WPI_RXON_AUTO | WPI_RXON_24GHZ);
2621 	if (ic->ic_flags & IEEE80211_F_SHSLOT)
2622 		sc->rxon.flags |= htole32(WPI_RXON_SHSLOT);
2623 	if (ic->ic_flags & IEEE80211_F_SHPREAMBLE)
2624 		sc->rxon.flags |= htole32(WPI_RXON_SHPREAMBLE);
2625 	switch (ic->ic_curmode) {
2626 	case IEEE80211_MODE_11A:
2627 		sc->rxon.cck_mask  = 0;
2628 		sc->rxon.ofdm_mask = 0x15;
2629 		break;
2630 	case IEEE80211_MODE_11B:
2631 		sc->rxon.cck_mask  = 0x03;
2632 		sc->rxon.ofdm_mask = 0;
2633 		break;
2634 	default:	/* Assume 802.11b/g. */
2635 		sc->rxon.cck_mask  = 0x0f;
2636 		sc->rxon.ofdm_mask = 0x15;
2637 	}
2638 	DPRINTF(("rxon chan %d flags %x cck %x ofdm %x\n", sc->rxon.chan,
2639 	    sc->rxon.flags, sc->rxon.cck_mask, sc->rxon.ofdm_mask));
2640 	error = wpi_cmd(sc, WPI_CMD_RXON, &sc->rxon, sizeof (struct wpi_rxon),
2641 	    1);
2642 	if (error != 0) {
2643 		printf("%s: RXON command failed\n", sc->sc_dev.dv_xname);
2644 		return error;
2645 	}
2646 
2647 	/* Configuration has changed, set TX power accordingly. */
2648 	if ((error = wpi_set_txpower(sc, 1)) != 0) {
2649 		printf("%s: could not set TX power\n", sc->sc_dev.dv_xname);
2650 		return error;
2651 	}
2652 	/*
2653 	 * Reconfiguring RXON clears the firmware nodes table so we must
2654 	 * add the broadcast node again.
2655 	 */
2656 	memset(&node, 0, sizeof node);
2657 	IEEE80211_ADDR_COPY(node.macaddr, etherbroadcastaddr);
2658 	node.id = WPI_ID_BROADCAST;
2659 	node.plcp = (ic->ic_curmode == IEEE80211_MODE_11A) ?
2660 	    wpi_rates[WPI_RIDX_OFDM6].plcp : wpi_rates[WPI_RIDX_CCK1].plcp;
2661 	node.action = htole32(WPI_ACTION_SET_RATE);
2662 	node.antenna = WPI_ANTENNA_BOTH;
2663 	error = wpi_cmd(sc, WPI_CMD_ADD_NODE, &node, sizeof node, 1);
2664 	if (error != 0) {
2665 		printf("%s: could not add broadcast node\n",
2666 		    sc->sc_dev.dv_xname);
2667 		return error;
2668 	}
2669 	return 0;
2670 }
2671 
2672 int
2673 wpi_run(struct wpi_softc *sc)
2674 {
2675 	struct ieee80211com *ic = &sc->sc_ic;
2676 	struct ieee80211_node *ni = ic->ic_bss;
2677 	struct wpi_node_info node;
2678 	int error;
2679 
2680 	if (ic->ic_opmode == IEEE80211_M_MONITOR) {
2681 		/* Link LED blinks while monitoring. */
2682 		wpi_set_led(sc, WPI_LED_LINK, 5, 5);
2683 		return 0;
2684 	}
2685 	if ((error = wpi_set_timing(sc, ni)) != 0) {
2686 		printf("%s: could not set timing\n", sc->sc_dev.dv_xname);
2687 		return error;
2688 	}
2689 
2690 	/* Update adapter configuration. */
2691 	sc->rxon.associd = htole16(IEEE80211_AID(ni->ni_associd));
2692 	/* Short preamble and slot time are negotiated when associating. */
2693 	sc->rxon.flags &= ~htole32(WPI_RXON_SHPREAMBLE | WPI_RXON_SHSLOT);
2694 	if (ic->ic_flags & IEEE80211_F_SHSLOT)
2695 		sc->rxon.flags |= htole32(WPI_RXON_SHSLOT);
2696 	if (ic->ic_flags & IEEE80211_F_SHPREAMBLE)
2697 		sc->rxon.flags |= htole32(WPI_RXON_SHPREAMBLE);
2698 	sc->rxon.filter |= htole32(WPI_FILTER_BSS);
2699 	DPRINTF(("rxon chan %d flags %x\n", sc->rxon.chan, sc->rxon.flags));
2700 	error = wpi_cmd(sc, WPI_CMD_RXON, &sc->rxon, sizeof (struct wpi_rxon),
2701 	    1);
2702 	if (error != 0) {
2703 		printf("%s: RXON command failed\n", sc->sc_dev.dv_xname);
2704 		return error;
2705 	}
2706 
2707 	/* Configuration has changed, set TX power accordingly. */
2708 	if ((error = wpi_set_txpower(sc, 1)) != 0) {
2709 		printf("%s: could not set TX power\n", sc->sc_dev.dv_xname);
2710 		return error;
2711 	}
2712 
2713 	/* Fake a join to init the TX rate. */
2714 	((struct wpi_node *)ni)->id = WPI_ID_BSS;
2715 	wpi_newassoc(ic, ni, 1);
2716 
2717 	/* Add BSS node. */
2718 	memset(&node, 0, sizeof node);
2719 	IEEE80211_ADDR_COPY(node.macaddr, ni->ni_bssid);
2720 	node.id = WPI_ID_BSS;
2721 	node.plcp = (ic->ic_curmode == IEEE80211_MODE_11A) ?
2722 	    wpi_rates[WPI_RIDX_OFDM6].plcp : wpi_rates[WPI_RIDX_CCK1].plcp;
2723 	node.action = htole32(WPI_ACTION_SET_RATE);
2724 	node.antenna = WPI_ANTENNA_BOTH;
2725 	DPRINTF(("adding BSS node\n"));
2726 	error = wpi_cmd(sc, WPI_CMD_ADD_NODE, &node, sizeof node, 1);
2727 	if (error != 0) {
2728 		printf("%s: could not add BSS node\n", sc->sc_dev.dv_xname);
2729 		return error;
2730 	}
2731 
2732 	/* Start periodic calibration timer. */
2733 	sc->calib_cnt = 0;
2734 	timeout_add_msec(&sc->calib_to, 500);
2735 
2736 	/* Link LED always on while associated. */
2737 	wpi_set_led(sc, WPI_LED_LINK, 0, 1);
2738 
2739 	/* Enable power-saving mode if requested by user. */
2740 	if (sc->sc_ic.ic_flags & IEEE80211_F_PMGTON)
2741 		(void)wpi_set_pslevel(sc, 0, 3, 1);
2742 
2743 	return 0;
2744 }
2745 
2746 /*
2747  * We support CCMP hardware encryption/decryption of unicast frames only.
2748  * HW support for TKIP really sucks.  We should let TKIP die anyway.
2749  */
2750 int
2751 wpi_set_key(struct ieee80211com *ic, struct ieee80211_node *ni,
2752     struct ieee80211_key *k)
2753 {
2754 	struct wpi_softc *sc = ic->ic_softc;
2755 	struct wpi_node *wn = (void *)ni;
2756 	struct wpi_node_info node;
2757 	uint16_t kflags;
2758 
2759 	if ((k->k_flags & IEEE80211_KEY_GROUP) ||
2760 	    k->k_cipher != IEEE80211_CIPHER_CCMP)
2761 		return ieee80211_set_key(ic, ni, k);
2762 
2763 	kflags = WPI_KFLAG_CCMP | WPI_KFLAG_KID(k->k_id);
2764 	memset(&node, 0, sizeof node);
2765 	node.id = wn->id;
2766 	node.control = WPI_NODE_UPDATE;
2767 	node.flags = WPI_FLAG_SET_KEY;
2768 	node.kflags = htole16(kflags);
2769 	memcpy(node.key, k->k_key, k->k_len);
2770 	DPRINTF(("set key id=%d for node %d\n", k->k_id, node.id));
2771 	return wpi_cmd(sc, WPI_CMD_ADD_NODE, &node, sizeof node, 1);
2772 }
2773 
2774 void
2775 wpi_delete_key(struct ieee80211com *ic, struct ieee80211_node *ni,
2776     struct ieee80211_key *k)
2777 {
2778 	struct wpi_softc *sc = ic->ic_softc;
2779 	struct wpi_node *wn = (void *)ni;
2780 	struct wpi_node_info node;
2781 
2782 	if ((k->k_flags & IEEE80211_KEY_GROUP) ||
2783 	    k->k_cipher != IEEE80211_CIPHER_CCMP) {
2784 		/* See comment about other ciphers above. */
2785 		ieee80211_delete_key(ic, ni, k);
2786 		return;
2787 	}
2788 	if (ic->ic_state != IEEE80211_S_RUN)
2789 		return;	/* Nothing to do. */
2790 	memset(&node, 0, sizeof node);
2791 	node.id = wn->id;
2792 	node.control = WPI_NODE_UPDATE;
2793 	node.flags = WPI_FLAG_SET_KEY;
2794 	node.kflags = 0;
2795 	DPRINTF(("delete keys for node %d\n", node.id));
2796 	(void)wpi_cmd(sc, WPI_CMD_ADD_NODE, &node, sizeof node, 1);
2797 }
2798 
2799 int
2800 wpi_post_alive(struct wpi_softc *sc)
2801 {
2802 	int ntries, error;
2803 
2804 	/* Check (again) that the radio is not disabled. */
2805 	if ((error = wpi_nic_lock(sc)) != 0)
2806 		return error;
2807 	/* NB: Runtime firmware must be up and running. */
2808 	if (!(wpi_prph_read(sc, WPI_APMG_RFKILL) & 1)) {
2809 		printf("%s: radio is disabled by hardware switch\n",
2810 		    sc->sc_dev.dv_xname);
2811 		wpi_nic_unlock(sc);
2812 		return EPERM;	/* :-) */
2813 	}
2814 	wpi_nic_unlock(sc);
2815 
2816 	/* Wait for thermal sensor to calibrate. */
2817 	for (ntries = 0; ntries < 1000; ntries++) {
2818 		if ((sc->temp = (int)WPI_READ(sc, WPI_UCODE_GP2)) != 0)
2819 			break;
2820 		DELAY(10);
2821 	}
2822 	if (ntries == 1000) {
2823 		printf("%s: timeout waiting for thermal sensor calibration\n",
2824 		    sc->sc_dev.dv_xname);
2825 		return ETIMEDOUT;
2826 	}
2827 	DPRINTF(("temperature %d\n", sc->temp));
2828 	return 0;
2829 }
2830 
2831 /*
2832  * The firmware boot code is small and is intended to be copied directly into
2833  * the NIC internal memory (no DMA transfer.)
2834  */
2835 int
2836 wpi_load_bootcode(struct wpi_softc *sc, const uint8_t *ucode, int size)
2837 {
2838 	int error, ntries;
2839 
2840 	size /= sizeof (uint32_t);
2841 
2842 	if ((error = wpi_nic_lock(sc)) != 0)
2843 		return error;
2844 
2845 	/* Copy microcode image into NIC memory. */
2846 	wpi_prph_write_region_4(sc, WPI_BSM_SRAM_BASE,
2847 	    (const uint32_t *)ucode, size);
2848 
2849 	wpi_prph_write(sc, WPI_BSM_WR_MEM_SRC, 0);
2850 	wpi_prph_write(sc, WPI_BSM_WR_MEM_DST, WPI_FW_TEXT_BASE);
2851 	wpi_prph_write(sc, WPI_BSM_WR_DWCOUNT, size);
2852 
2853 	/* Start boot load now. */
2854 	wpi_prph_write(sc, WPI_BSM_WR_CTRL, WPI_BSM_WR_CTRL_START);
2855 
2856 	/* Wait for transfer to complete. */
2857 	for (ntries = 0; ntries < 1000; ntries++) {
2858 		if (!(wpi_prph_read(sc, WPI_BSM_WR_CTRL) &
2859 		    WPI_BSM_WR_CTRL_START))
2860 			break;
2861 		DELAY(10);
2862 	}
2863 	if (ntries == 1000) {
2864 		printf("%s: could not load boot firmware\n",
2865 		    sc->sc_dev.dv_xname);
2866 		wpi_nic_unlock(sc);
2867 		return ETIMEDOUT;
2868 	}
2869 
2870 	/* Enable boot after power up. */
2871 	wpi_prph_write(sc, WPI_BSM_WR_CTRL, WPI_BSM_WR_CTRL_START_EN);
2872 
2873 	wpi_nic_unlock(sc);
2874 	return 0;
2875 }
2876 
2877 int
2878 wpi_load_firmware(struct wpi_softc *sc)
2879 {
2880 	struct wpi_fw_info *fw = &sc->fw;
2881 	struct wpi_dma_info *dma = &sc->fw_dma;
2882 	int error;
2883 
2884 	/* Copy initialization sections into pre-allocated DMA-safe memory. */
2885 	memcpy(dma->vaddr, fw->init.data, fw->init.datasz);
2886 	bus_dmamap_sync(sc->sc_dmat, dma->map, 0, fw->init.datasz,
2887 	    BUS_DMASYNC_PREWRITE);
2888 	memcpy(dma->vaddr + WPI_FW_DATA_MAXSZ,
2889 	    fw->init.text, fw->init.textsz);
2890 	bus_dmamap_sync(sc->sc_dmat, dma->map, WPI_FW_DATA_MAXSZ,
2891 	    fw->init.textsz, BUS_DMASYNC_PREWRITE);
2892 
2893 	/* Tell adapter where to find initialization sections. */
2894 	if ((error = wpi_nic_lock(sc)) != 0)
2895 		return error;
2896 	wpi_prph_write(sc, WPI_BSM_DRAM_DATA_ADDR, dma->paddr);
2897 	wpi_prph_write(sc, WPI_BSM_DRAM_DATA_SIZE, fw->init.datasz);
2898 	wpi_prph_write(sc, WPI_BSM_DRAM_TEXT_ADDR,
2899 	    dma->paddr + WPI_FW_DATA_MAXSZ);
2900 	wpi_prph_write(sc, WPI_BSM_DRAM_TEXT_SIZE, fw->init.textsz);
2901 	wpi_nic_unlock(sc);
2902 
2903 	/* Load firmware boot code. */
2904 	error = wpi_load_bootcode(sc, fw->boot.text, fw->boot.textsz);
2905 	if (error != 0) {
2906 		printf("%s: could not load boot firmware\n",
2907 		    sc->sc_dev.dv_xname);
2908 		return error;
2909 	}
2910 	/* Now press "execute". */
2911 	WPI_WRITE(sc, WPI_RESET, 0);
2912 
2913 	/* Wait at most one second for first alive notification. */
2914 	if ((error = tsleep(sc, PCATCH, "wpiinit", hz)) != 0) {
2915 		printf("%s: timeout waiting for adapter to initialize\n",
2916 		    sc->sc_dev.dv_xname);
2917 		return error;
2918 	}
2919 
2920 	/* Copy runtime sections into pre-allocated DMA-safe memory. */
2921 	memcpy(dma->vaddr, fw->main.data, fw->main.datasz);
2922 	bus_dmamap_sync(sc->sc_dmat, dma->map, 0, fw->main.datasz,
2923 	    BUS_DMASYNC_PREWRITE);
2924 	memcpy(dma->vaddr + WPI_FW_DATA_MAXSZ,
2925 	    fw->main.text, fw->main.textsz);
2926 	bus_dmamap_sync(sc->sc_dmat, dma->map, WPI_FW_DATA_MAXSZ,
2927 	    fw->main.textsz, BUS_DMASYNC_PREWRITE);
2928 
2929 	/* Tell adapter where to find runtime sections. */
2930 	if ((error = wpi_nic_lock(sc)) != 0)
2931 		return error;
2932 	wpi_prph_write(sc, WPI_BSM_DRAM_DATA_ADDR, dma->paddr);
2933 	wpi_prph_write(sc, WPI_BSM_DRAM_DATA_SIZE, fw->main.datasz);
2934 	wpi_prph_write(sc, WPI_BSM_DRAM_TEXT_ADDR,
2935 	    dma->paddr + WPI_FW_DATA_MAXSZ);
2936 	wpi_prph_write(sc, WPI_BSM_DRAM_TEXT_SIZE,
2937 	    WPI_FW_UPDATED | fw->main.textsz);
2938 	wpi_nic_unlock(sc);
2939 
2940 	return 0;
2941 }
2942 
2943 int
2944 wpi_read_firmware(struct wpi_softc *sc)
2945 {
2946 	struct wpi_fw_info *fw = &sc->fw;
2947 	const struct wpi_firmware_hdr *hdr;
2948 	int error;
2949 
2950 	/* Read firmware image from filesystem. */
2951 	if ((error = loadfirmware("wpi-3945abg", &fw->data, &fw->datalen)) != 0) {
2952 		printf("%s: error, %d, could not read firmware %s\n",
2953 		    sc->sc_dev.dv_xname, error, "wpi-3945abg");
2954 		return error;
2955 	}
2956 	if (fw->datalen < sizeof (*hdr)) {
2957 		printf("%s: truncated firmware header: %zu bytes\n",
2958 		    sc->sc_dev.dv_xname, fw->datalen);
2959 		free(fw->data, M_DEVBUF, fw->datalen);
2960 		return EINVAL;
2961 	}
2962 	/* Extract firmware header information. */
2963 	hdr = (struct wpi_firmware_hdr *)fw->data;
2964 	fw->main.textsz = letoh32(hdr->main_textsz);
2965 	fw->main.datasz = letoh32(hdr->main_datasz);
2966 	fw->init.textsz = letoh32(hdr->init_textsz);
2967 	fw->init.datasz = letoh32(hdr->init_datasz);
2968 	fw->boot.textsz = letoh32(hdr->boot_textsz);
2969 	fw->boot.datasz = 0;
2970 
2971 	/* Sanity-check firmware header. */
2972 	if (fw->main.textsz > WPI_FW_TEXT_MAXSZ ||
2973 	    fw->main.datasz > WPI_FW_DATA_MAXSZ ||
2974 	    fw->init.textsz > WPI_FW_TEXT_MAXSZ ||
2975 	    fw->init.datasz > WPI_FW_DATA_MAXSZ ||
2976 	    fw->boot.textsz > WPI_FW_BOOT_TEXT_MAXSZ ||
2977 	    (fw->boot.textsz & 3) != 0) {
2978 		printf("%s: invalid firmware header\n", sc->sc_dev.dv_xname);
2979 		free(fw->data, M_DEVBUF, fw->datalen);
2980 		return EINVAL;
2981 	}
2982 
2983 	/* Check that all firmware sections fit. */
2984 	if (fw->datalen < sizeof (*hdr) + fw->main.textsz + fw->main.datasz +
2985 	    fw->init.textsz + fw->init.datasz + fw->boot.textsz) {
2986 		printf("%s: firmware file too short: %zu bytes\n",
2987 		    sc->sc_dev.dv_xname, fw->datalen);
2988 		free(fw->data, M_DEVBUF, fw->datalen);
2989 		return EINVAL;
2990 	}
2991 
2992 	/* Get pointers to firmware sections. */
2993 	fw->main.text = (const uint8_t *)(hdr + 1);
2994 	fw->main.data = fw->main.text + fw->main.textsz;
2995 	fw->init.text = fw->main.data + fw->main.datasz;
2996 	fw->init.data = fw->init.text + fw->init.textsz;
2997 	fw->boot.text = fw->init.data + fw->init.datasz;
2998 
2999 	return 0;
3000 }
3001 
3002 int
3003 wpi_clock_wait(struct wpi_softc *sc)
3004 {
3005 	int ntries;
3006 
3007 	/* Set "initialization complete" bit. */
3008 	WPI_SETBITS(sc, WPI_GP_CNTRL, WPI_GP_CNTRL_INIT_DONE);
3009 
3010 	/* Wait for clock stabilization. */
3011 	for (ntries = 0; ntries < 25000; ntries++) {
3012 		if (WPI_READ(sc, WPI_GP_CNTRL) & WPI_GP_CNTRL_MAC_CLOCK_READY)
3013 			return 0;
3014 		DELAY(100);
3015 	}
3016 	printf("%s: timeout waiting for clock stabilization\n",
3017 	    sc->sc_dev.dv_xname);
3018 	return ETIMEDOUT;
3019 }
3020 
3021 int
3022 wpi_apm_init(struct wpi_softc *sc)
3023 {
3024 	int error;
3025 
3026 	WPI_SETBITS(sc, WPI_ANA_PLL, WPI_ANA_PLL_INIT);
3027 	/* Disable L0s. */
3028 	WPI_SETBITS(sc, WPI_GIO_CHICKEN, WPI_GIO_CHICKEN_L1A_NO_L0S_RX);
3029 
3030 	if ((error = wpi_clock_wait(sc)) != 0)
3031 		return error;
3032 
3033 	if ((error = wpi_nic_lock(sc)) != 0)
3034 		return error;
3035 	/* Enable DMA. */
3036 	wpi_prph_write(sc, WPI_APMG_CLK_ENA,
3037 	    WPI_APMG_CLK_DMA_CLK_RQT | WPI_APMG_CLK_BSM_CLK_RQT);
3038 	DELAY(20);
3039 	/* Disable L1. */
3040 	wpi_prph_setbits(sc, WPI_APMG_PCI_STT, WPI_APMG_PCI_STT_L1A_DIS);
3041 	wpi_nic_unlock(sc);
3042 
3043 	return 0;
3044 }
3045 
3046 void
3047 wpi_apm_stop_master(struct wpi_softc *sc)
3048 {
3049 	int ntries;
3050 
3051 	WPI_SETBITS(sc, WPI_RESET, WPI_RESET_STOP_MASTER);
3052 
3053 	if ((WPI_READ(sc, WPI_GP_CNTRL) & WPI_GP_CNTRL_PS_MASK) ==
3054 	    WPI_GP_CNTRL_MAC_PS)
3055 		return;	/* Already asleep. */
3056 
3057 	for (ntries = 0; ntries < 100; ntries++) {
3058 		if (WPI_READ(sc, WPI_RESET) & WPI_RESET_MASTER_DISABLED)
3059 			return;
3060 		DELAY(10);
3061 	}
3062 	printf("%s: timeout waiting for master\n", sc->sc_dev.dv_xname);
3063 }
3064 
3065 void
3066 wpi_apm_stop(struct wpi_softc *sc)
3067 {
3068 	wpi_apm_stop_master(sc);
3069 	WPI_SETBITS(sc, WPI_RESET, WPI_RESET_SW);
3070 }
3071 
3072 void
3073 wpi_nic_config(struct wpi_softc *sc)
3074 {
3075 	pcireg_t reg;
3076 	uint8_t rev;
3077 
3078 	/* Voodoo from the reference driver. */
3079 	reg = pci_conf_read(sc->sc_pct, sc->sc_pcitag, PCI_CLASS_REG);
3080 	rev = PCI_REVISION(reg);
3081 	if ((rev & 0xc0) == 0x40)
3082 		WPI_SETBITS(sc, WPI_HW_IF_CONFIG, WPI_HW_IF_CONFIG_ALM_MB);
3083 	else if (!(rev & 0x80))
3084 		WPI_SETBITS(sc, WPI_HW_IF_CONFIG, WPI_HW_IF_CONFIG_ALM_MM);
3085 
3086 	if (sc->cap == 0x80)
3087 		WPI_SETBITS(sc, WPI_HW_IF_CONFIG, WPI_HW_IF_CONFIG_SKU_MRC);
3088 
3089 	if ((letoh16(sc->rev) & 0xf0) == 0xd0)
3090 		WPI_SETBITS(sc, WPI_HW_IF_CONFIG, WPI_HW_IF_CONFIG_REV_D);
3091 	else
3092 		WPI_CLRBITS(sc, WPI_HW_IF_CONFIG, WPI_HW_IF_CONFIG_REV_D);
3093 
3094 	if (sc->type > 1)
3095 		WPI_SETBITS(sc, WPI_HW_IF_CONFIG, WPI_HW_IF_CONFIG_TYPE_B);
3096 }
3097 
3098 int
3099 wpi_hw_init(struct wpi_softc *sc)
3100 {
3101 	int chnl, ntries, error;
3102 
3103 	/* Clear pending interrupts. */
3104 	WPI_WRITE(sc, WPI_INT, 0xffffffff);
3105 
3106 	if ((error = wpi_apm_init(sc)) != 0) {
3107 		printf("%s: could not power ON adapter\n",
3108 		    sc->sc_dev.dv_xname);
3109 		return error;
3110 	}
3111 
3112 	/* Select VMAIN power source. */
3113 	if ((error = wpi_nic_lock(sc)) != 0)
3114 		return error;
3115 	wpi_prph_clrbits(sc, WPI_APMG_PS, WPI_APMG_PS_PWR_SRC_MASK);
3116 	wpi_nic_unlock(sc);
3117 	/* Spin until VMAIN gets selected. */
3118 	for (ntries = 0; ntries < 5000; ntries++) {
3119 		if (WPI_READ(sc, WPI_GPIO_IN) & WPI_GPIO_IN_VMAIN)
3120 			break;
3121 		DELAY(10);
3122 	}
3123 	if (ntries == 5000) {
3124 		printf("%s: timeout selecting power source\n",
3125 		    sc->sc_dev.dv_xname);
3126 		return ETIMEDOUT;
3127 	}
3128 
3129 	/* Perform adapter initialization. */
3130 	(void)wpi_nic_config(sc);
3131 
3132 	/* Initialize RX ring. */
3133 	if ((error = wpi_nic_lock(sc)) != 0)
3134 		return error;
3135 	/* Set physical address of RX ring. */
3136 	WPI_WRITE(sc, WPI_FH_RX_BASE, sc->rxq.desc_dma.paddr);
3137 	/* Set physical address of RX read pointer. */
3138 	WPI_WRITE(sc, WPI_FH_RX_RPTR_ADDR, sc->shared_dma.paddr +
3139 	    offsetof(struct wpi_shared, next));
3140 	WPI_WRITE(sc, WPI_FH_RX_WPTR, 0);
3141 	/* Enable RX. */
3142 	WPI_WRITE(sc, WPI_FH_RX_CONFIG,
3143 	    WPI_FH_RX_CONFIG_DMA_ENA |
3144 	    WPI_FH_RX_CONFIG_RDRBD_ENA |
3145 	    WPI_FH_RX_CONFIG_WRSTATUS_ENA |
3146 	    WPI_FH_RX_CONFIG_MAXFRAG |
3147 	    WPI_FH_RX_CONFIG_NRBD(WPI_RX_RING_COUNT_LOG) |
3148 	    WPI_FH_RX_CONFIG_IRQ_DST_HOST |
3149 	    WPI_FH_RX_CONFIG_IRQ_RBTH(1));
3150 	(void)WPI_READ(sc, WPI_FH_RSSR_TBL);	/* barrier */
3151 	WPI_WRITE(sc, WPI_FH_RX_WPTR, (WPI_RX_RING_COUNT - 1) & ~7);
3152 	wpi_nic_unlock(sc);
3153 
3154 	/* Initialize TX rings. */
3155 	if ((error = wpi_nic_lock(sc)) != 0)
3156 		return error;
3157 	wpi_prph_write(sc, WPI_ALM_SCHED_MODE, 2);	/* bypass mode */
3158 	wpi_prph_write(sc, WPI_ALM_SCHED_ARASTAT, 1);	/* enable RA0 */
3159 	/* Enable all 6 TX rings. */
3160 	wpi_prph_write(sc, WPI_ALM_SCHED_TXFACT, 0x3f);
3161 	wpi_prph_write(sc, WPI_ALM_SCHED_SBYPASS_MODE1, 0x10000);
3162 	wpi_prph_write(sc, WPI_ALM_SCHED_SBYPASS_MODE2, 0x30002);
3163 	wpi_prph_write(sc, WPI_ALM_SCHED_TXF4MF, 4);
3164 	wpi_prph_write(sc, WPI_ALM_SCHED_TXF5MF, 5);
3165 	/* Set physical address of TX rings. */
3166 	WPI_WRITE(sc, WPI_FH_TX_BASE, sc->shared_dma.paddr);
3167 	WPI_WRITE(sc, WPI_FH_MSG_CONFIG, 0xffff05a5);
3168 
3169 	/* Enable all DMA channels. */
3170 	for (chnl = 0; chnl < WPI_NDMACHNLS; chnl++) {
3171 		WPI_WRITE(sc, WPI_FH_CBBC_CTRL(chnl), 0);
3172 		WPI_WRITE(sc, WPI_FH_CBBC_BASE(chnl), 0);
3173 		WPI_WRITE(sc, WPI_FH_TX_CONFIG(chnl), 0x80200008);
3174 	}
3175 	wpi_nic_unlock(sc);
3176 	(void)WPI_READ(sc, WPI_FH_TX_BASE);	/* barrier */
3177 
3178 	/* Clear "radio off" and "commands blocked" bits. */
3179 	WPI_WRITE(sc, WPI_UCODE_GP1_CLR, WPI_UCODE_GP1_RFKILL);
3180 	WPI_WRITE(sc, WPI_UCODE_GP1_CLR, WPI_UCODE_GP1_CMD_BLOCKED);
3181 
3182 	/* Clear pending interrupts. */
3183 	WPI_WRITE(sc, WPI_INT, 0xffffffff);
3184 	/* Enable interrupts. */
3185 	WPI_WRITE(sc, WPI_MASK, WPI_INT_MASK);
3186 
3187 	/* _Really_ make sure "radio off" bit is cleared! */
3188 	WPI_WRITE(sc, WPI_UCODE_GP1_CLR, WPI_UCODE_GP1_RFKILL);
3189 	WPI_WRITE(sc, WPI_UCODE_GP1_CLR, WPI_UCODE_GP1_RFKILL);
3190 
3191 	if ((error = wpi_load_firmware(sc)) != 0) {
3192 		printf("%s: could not load firmware\n", sc->sc_dev.dv_xname);
3193 		return error;
3194 	}
3195 	/* Wait at most one second for firmware alive notification. */
3196 	if ((error = tsleep(sc, PCATCH, "wpiinit", hz)) != 0) {
3197 		printf("%s: timeout waiting for adapter to initialize\n",
3198 		    sc->sc_dev.dv_xname);
3199 		return error;
3200 	}
3201 	/* Do post-firmware initialization. */
3202 	return wpi_post_alive(sc);
3203 }
3204 
3205 void
3206 wpi_hw_stop(struct wpi_softc *sc)
3207 {
3208 	int chnl, qid, ntries;
3209 	uint32_t tmp;
3210 
3211 	WPI_WRITE(sc, WPI_RESET, WPI_RESET_NEVO);
3212 
3213 	/* Disable interrupts. */
3214 	WPI_WRITE(sc, WPI_MASK, 0);
3215 	WPI_WRITE(sc, WPI_INT, 0xffffffff);
3216 	WPI_WRITE(sc, WPI_FH_INT, 0xffffffff);
3217 
3218 	/* Make sure we no longer hold the NIC lock. */
3219 	wpi_nic_unlock(sc);
3220 
3221 	if (wpi_nic_lock(sc) == 0) {
3222 		/* Stop TX scheduler. */
3223 		wpi_prph_write(sc, WPI_ALM_SCHED_MODE, 0);
3224 		wpi_prph_write(sc, WPI_ALM_SCHED_TXFACT, 0);
3225 
3226 		/* Stop all DMA channels. */
3227 		for (chnl = 0; chnl < WPI_NDMACHNLS; chnl++) {
3228 			WPI_WRITE(sc, WPI_FH_TX_CONFIG(chnl), 0);
3229 			for (ntries = 0; ntries < 100; ntries++) {
3230 				tmp = WPI_READ(sc, WPI_FH_TX_STATUS);
3231 				if ((tmp & WPI_FH_TX_STATUS_IDLE(chnl)) ==
3232 				    WPI_FH_TX_STATUS_IDLE(chnl))
3233 					break;
3234 				DELAY(10);
3235 			}
3236 		}
3237 		wpi_nic_unlock(sc);
3238 	}
3239 
3240 	/* Stop RX ring. */
3241 	wpi_reset_rx_ring(sc, &sc->rxq);
3242 
3243 	/* Reset all TX rings. */
3244 	for (qid = 0; qid < WPI_NTXQUEUES; qid++)
3245 		wpi_reset_tx_ring(sc, &sc->txq[qid]);
3246 
3247 	if (wpi_nic_lock(sc) == 0) {
3248 		wpi_prph_write(sc, WPI_APMG_CLK_DIS, WPI_APMG_CLK_DMA_CLK_RQT);
3249 		wpi_nic_unlock(sc);
3250 	}
3251 	DELAY(5);
3252 	/* Power OFF adapter. */
3253 	wpi_apm_stop(sc);
3254 }
3255 
3256 int
3257 wpi_init(struct ifnet *ifp)
3258 {
3259 	struct wpi_softc *sc = ifp->if_softc;
3260 	struct ieee80211com *ic = &sc->sc_ic;
3261 	int error;
3262 
3263 #ifdef notyet
3264 	/* Check that the radio is not disabled by hardware switch. */
3265 	if (!(WPI_READ(sc, WPI_GP_CNTRL) & WPI_GP_CNTRL_RFKILL)) {
3266 		printf("%s: radio is disabled by hardware switch\n",
3267 		    sc->sc_dev.dv_xname);
3268 		error = EPERM;	/* :-) */
3269 		goto fail;
3270 	}
3271 #endif
3272 	/* Read firmware images from the filesystem. */
3273 	if ((error = wpi_read_firmware(sc)) != 0) {
3274 		printf("%s: could not read firmware\n", sc->sc_dev.dv_xname);
3275 		goto fail;
3276 	}
3277 
3278 	/* Initialize hardware and upload firmware. */
3279 	error = wpi_hw_init(sc);
3280 	free(sc->fw.data, M_DEVBUF, sc->fw.datalen);
3281 	if (error != 0) {
3282 		printf("%s: could not initialize hardware\n",
3283 		    sc->sc_dev.dv_xname);
3284 		goto fail;
3285 	}
3286 
3287 	/* Configure adapter now that it is ready. */
3288 	if ((error = wpi_config(sc)) != 0) {
3289 		printf("%s: could not configure device\n",
3290 		    sc->sc_dev.dv_xname);
3291 		goto fail;
3292 	}
3293 
3294 	ifq_clr_oactive(&ifp->if_snd);
3295 	ifp->if_flags |= IFF_RUNNING;
3296 
3297 	if (ic->ic_opmode != IEEE80211_M_MONITOR)
3298 		ieee80211_begin_scan(ifp);
3299 	else
3300 		ieee80211_new_state(ic, IEEE80211_S_RUN, -1);
3301 
3302 	return 0;
3303 
3304 fail:	wpi_stop(ifp, 1);
3305 	return error;
3306 }
3307 
3308 void
3309 wpi_stop(struct ifnet *ifp, int disable)
3310 {
3311 	struct wpi_softc *sc = ifp->if_softc;
3312 	struct ieee80211com *ic = &sc->sc_ic;
3313 
3314 	ifp->if_timer = sc->sc_tx_timer = 0;
3315 	ifp->if_flags &= ~IFF_RUNNING;
3316 	ifq_clr_oactive(&ifp->if_snd);
3317 
3318 	/* In case we were scanning, release the scan "lock". */
3319 	ic->ic_scan_lock = IEEE80211_SCAN_UNLOCKED;
3320 
3321 	ieee80211_new_state(ic, IEEE80211_S_INIT, -1);
3322 
3323 	/* Power OFF hardware. */
3324 	wpi_hw_stop(sc);
3325 }
3326