dc: Switch from device_polling to ifpoll
[dragonfly.git] / sys / dev / netif / dc / if_dc.c
1 /*
2  * Copyright (c) 1997, 1998, 1999
3  *      Bill Paul <wpaul@ee.columbia.edu>.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *      This product includes software developed by Bill Paul.
16  * 4. Neither the name of the author nor the names of any co-contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY Bill Paul AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL Bill Paul OR THE VOICES IN HIS HEAD
24  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
29  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
30  * THE POSSIBILITY OF SUCH DAMAGE.
31  *
32  * $FreeBSD: src/sys/pci/if_dc.c,v 1.9.2.45 2003/06/08 14:31:53 mux Exp $
33  */
34
35 /*
36  * DEC "tulip" clone ethernet driver. Supports the DEC/Intel 21143
37  * series chips and several workalikes including the following:
38  *
39  * Macronix 98713/98715/98725/98727/98732 PMAC (www.macronix.com)
40  * Macronix/Lite-On 82c115 PNIC II (www.macronix.com)
41  * Lite-On 82c168/82c169 PNIC (www.litecom.com)
42  * ASIX Electronics AX88140A (www.asix.com.tw)
43  * ASIX Electronics AX88141 (www.asix.com.tw)
44  * ADMtek AL981 (www.admtek.com.tw)
45  * ADMtek AN985 (www.admtek.com.tw)
46  * Netgear FA511 (www.netgear.com) Appears to be rebadged ADMTek AN985
47  * Davicom DM9100, DM9102, DM9102A (www.davicom8.com)
48  * Accton EN1217 (www.accton.com)
49  * Xircom X3201 (www.xircom.com)
50  * Abocom FE2500
51  * Conexant LANfinity (www.conexant.com)
52  *
53  * Datasheets for the 21143 are available at developer.intel.com.
54  * Datasheets for the clone parts can be found at their respective sites.
55  * (Except for the PNIC; see www.freebsd.org/~wpaul/PNIC/pnic.ps.gz.)
56  * The PNIC II is essentially a Macronix 98715A chip; the only difference
57  * worth noting is that its multicast hash table is only 128 bits wide
58  * instead of 512.
59  *
60  * Written by Bill Paul <wpaul@ee.columbia.edu>
61  * Electrical Engineering Department
62  * Columbia University, New York City
63  */
64
65 /*
66  * The Intel 21143 is the successor to the DEC 21140. It is basically
67  * the same as the 21140 but with a few new features. The 21143 supports
68  * three kinds of media attachments:
69  *
70  * o MII port, for 10Mbps and 100Mbps support and NWAY
71  *   autonegotiation provided by an external PHY.
72  * o SYM port, for symbol mode 100Mbps support.
73  * o 10baseT port.
74  * o AUI/BNC port.
75  *
76  * The 100Mbps SYM port and 10baseT port can be used together in
77  * combination with the internal NWAY support to create a 10/100
78  * autosensing configuration.
79  *
80  * Note that not all tulip workalikes are handled in this driver: we only
81  * deal with those which are relatively well behaved. The Winbond is
82  * handled separately due to its different register offsets and the
83  * special handling needed for its various bugs. The PNIC is handled
84  * here, but I'm not thrilled about it.
85  *
86  * All of the workalike chips use some form of MII transceiver support
87  * with the exception of the Macronix chips, which also have a SYM port.
88  * The ASIX AX88140A is also documented to have a SYM port, but all
89  * the cards I've seen use an MII transceiver, probably because the
90  * AX88140A doesn't support internal NWAY.
91  */
92
93 #include "opt_ifpoll.h"
94
95 #include <sys/param.h>
96 #include <sys/systm.h>
97 #include <sys/sockio.h>
98 #include <sys/mbuf.h>
99 #include <sys/malloc.h>
100 #include <sys/kernel.h>
101 #include <sys/interrupt.h>
102 #include <sys/socket.h>
103 #include <sys/sysctl.h>
104 #include <sys/bus.h>
105 #include <sys/rman.h>
106 #include <sys/thread2.h>
107
108 #include <net/if.h>
109 #include <net/ifq_var.h>
110 #include <net/if_arp.h>
111 #include <net/ethernet.h>
112 #include <net/if_dl.h>
113 #include <net/if_media.h>
114 #include <net/if_poll.h>
115 #include <net/if_types.h>
116 #include <net/vlan/if_vlan_var.h>
117
118 #include <net/bpf.h>
119
120 #include <vm/vm.h>              /* for vtophys */
121 #include <vm/pmap.h>            /* for vtophys */
122
123 #include "../mii_layer/mii.h"
124 #include "../mii_layer/miivar.h"
125
126 #include <bus/pci/pcireg.h>
127 #include <bus/pci/pcivar.h>
128
129 #define DC_USEIOSPACE
130
131 #include "if_dcreg.h"
132
133 /* "controller miibus0" required.  See GENERIC if you get errors here. */
134 #include "miibus_if.h"
135
136 /*
137  * Various supported device vendors/types and their names.
138  */
139 static const struct dc_type dc_devs[] = {
140         { DC_VENDORID_DEC, DC_DEVICEID_21143,
141                 "Intel 21143 10/100BaseTX" },
142         { DC_VENDORID_DAVICOM, DC_DEVICEID_DM9009,
143                 "Davicom DM9009 10/100BaseTX" },
144         { DC_VENDORID_DAVICOM, DC_DEVICEID_DM9100,
145                 "Davicom DM9100 10/100BaseTX" },
146         { DC_VENDORID_DAVICOM, DC_DEVICEID_DM9102,
147                 "Davicom DM9102 10/100BaseTX" },
148         { DC_VENDORID_DAVICOM, DC_DEVICEID_DM9102,
149                 "Davicom DM9102A 10/100BaseTX" },
150         { DC_VENDORID_ADMTEK, DC_DEVICEID_AL981,
151                 "ADMtek AL981 10/100BaseTX" },
152         { DC_VENDORID_ADMTEK, DC_DEVICEID_AN985,
153                 "ADMtek AN985 10/100BaseTX" },
154         { DC_VENDORID_ADMTEK, DC_DEVICEID_FA511,
155                 "Netgear FA511 10/100BaseTX" },
156         { DC_VENDORID_ADMTEK, DC_DEVICEID_ADM9511,
157                 "ADMtek ADM9511 10/100BaseTX" },
158         { DC_VENDORID_ADMTEK, DC_DEVICEID_ADM9513,
159                 "ADMtek ADM9513 10/100BaseTX" },
160         { DC_VENDORID_ASIX, DC_DEVICEID_AX88140A,
161                 "ASIX AX88140A 10/100BaseTX" },
162         { DC_VENDORID_ASIX, DC_DEVICEID_AX88140A,
163                 "ASIX AX88141 10/100BaseTX" },
164         { DC_VENDORID_MX, DC_DEVICEID_98713,
165                 "Macronix 98713 10/100BaseTX" },
166         { DC_VENDORID_MX, DC_DEVICEID_98713,
167                 "Macronix 98713A 10/100BaseTX" },
168         { DC_VENDORID_CP, DC_DEVICEID_98713_CP,
169                 "Compex RL100-TX 10/100BaseTX" },
170         { DC_VENDORID_CP, DC_DEVICEID_98713_CP,
171                 "Compex RL100-TX 10/100BaseTX" },
172         { DC_VENDORID_MX, DC_DEVICEID_987x5,
173                 "Macronix 98715/98715A 10/100BaseTX" },
174         { DC_VENDORID_MX, DC_DEVICEID_987x5,
175                 "Macronix 98715AEC-C 10/100BaseTX" },
176         { DC_VENDORID_MX, DC_DEVICEID_987x5,
177                 "Macronix 98725 10/100BaseTX" },
178         { DC_VENDORID_MX, DC_DEVICEID_98727,
179                 "Macronix 98727/98732 10/100BaseTX" },
180         { DC_VENDORID_LO, DC_DEVICEID_82C115,
181                 "LC82C115 PNIC II 10/100BaseTX" },
182         { DC_VENDORID_LO, DC_DEVICEID_82C168,
183                 "82c168 PNIC 10/100BaseTX" },
184         { DC_VENDORID_LO, DC_DEVICEID_82C168,
185                 "82c169 PNIC 10/100BaseTX" },
186         { DC_VENDORID_ACCTON, DC_DEVICEID_EN1217,
187                 "Accton EN1217 10/100BaseTX" },
188         { DC_VENDORID_ACCTON, DC_DEVICEID_EN2242,
189                 "Accton EN2242 MiniPCI 10/100BaseTX" },
190         { DC_VENDORID_XIRCOM, DC_DEVICEID_X3201,
191                 "Xircom X3201 10/100BaseTX" },
192         { DC_VENDORID_CONEXANT, DC_DEVICEID_RS7112,
193                 "Conexant LANfinity MiniPCI 10/100BaseTX" },
194         { DC_VENDORID_3COM, DC_DEVICEID_3CSOHOB,
195                 "3Com OfficeConnect 10/100B" },
196         { DC_VENDORID_ABOCOM, DC_DEVICEID_FE2500,
197                 "Abocom FE2500 10/100BaseTX" },
198         { 0, 0, NULL }
199 };
200
201 static int dc_probe             (device_t);
202 static int dc_attach            (device_t);
203 static int dc_detach            (device_t);
204 static int dc_suspend           (device_t);
205 static int dc_resume            (device_t);
206 static void dc_acpi             (device_t);
207 static const struct dc_type *dc_devtype (device_t);
208 static int dc_newbuf            (struct dc_softc *, int, struct mbuf *);
209 static int dc_encap             (struct dc_softc *, struct mbuf *,
210                                         u_int32_t *);
211 static void dc_pnic_rx_bug_war  (struct dc_softc *, int);
212 static int dc_rx_resync         (struct dc_softc *);
213 static void dc_rxeof            (struct dc_softc *);
214 static void dc_txeof            (struct dc_softc *);
215 static void dc_tick             (void *);
216 static void dc_tx_underrun      (struct dc_softc *);
217 static void dc_intr             (void *);
218 static void dc_start            (struct ifnet *);
219 static int dc_ioctl             (struct ifnet *, u_long, caddr_t,
220                                         struct ucred *);
221 #ifdef IFPOLL_ENABLE
222 static void dc_npoll            (struct ifnet *, struct ifpoll_info *);
223 static void dc_npoll_compat     (struct ifnet *, void *, int);
224 #endif
225 static void dc_init             (void *);
226 static void dc_stop             (struct dc_softc *);
227 static void dc_watchdog         (struct ifnet *);
228 static void dc_shutdown         (device_t);
229 static int dc_ifmedia_upd       (struct ifnet *);
230 static void dc_ifmedia_sts      (struct ifnet *, struct ifmediareq *);
231
232 static void dc_delay            (struct dc_softc *);
233 static void dc_eeprom_idle      (struct dc_softc *);
234 static void dc_eeprom_putbyte   (struct dc_softc *, int);
235 static void dc_eeprom_getword   (struct dc_softc *, int, u_int16_t *);
236 static void dc_eeprom_getword_pnic
237                                 (struct dc_softc *, int, u_int16_t *);
238 static void dc_eeprom_getword_xircom
239                                 (struct dc_softc *, int, u_int16_t *);
240 static void dc_eeprom_width     (struct dc_softc *);
241 static void dc_read_eeprom      (struct dc_softc *, caddr_t, int,
242                                                         int, int);
243
244 static void dc_mii_writebit     (struct dc_softc *, int);
245 static int dc_mii_readbit       (struct dc_softc *);
246 static void dc_mii_sync         (struct dc_softc *);
247 static void dc_mii_send         (struct dc_softc *, u_int32_t, int);
248 static int dc_mii_readreg       (struct dc_softc *, struct dc_mii_frame *);
249 static int dc_mii_writereg      (struct dc_softc *, struct dc_mii_frame *);
250 static int dc_miibus_readreg    (device_t, int, int);
251 static int dc_miibus_writereg   (device_t, int, int, int);
252 static void dc_miibus_statchg   (device_t);
253 static void dc_miibus_mediainit (device_t);
254
255 static u_int32_t dc_crc_mask    (struct dc_softc *);
256 static void dc_setcfg           (struct dc_softc *, int);
257 static void dc_setfilt_21143    (struct dc_softc *);
258 static void dc_setfilt_asix     (struct dc_softc *);
259 static void dc_setfilt_admtek   (struct dc_softc *);
260 static void dc_setfilt_xircom   (struct dc_softc *);
261
262 static void dc_setfilt          (struct dc_softc *);
263
264 static void dc_reset            (struct dc_softc *);
265 static int dc_list_rx_init      (struct dc_softc *);
266 static int dc_list_tx_init      (struct dc_softc *);
267
268 static void dc_read_srom        (struct dc_softc *, int);
269 static void dc_parse_21143_srom (struct dc_softc *);
270 static void dc_decode_leaf_sia  (struct dc_softc *,
271                                     struct dc_eblock_sia *);
272 static void dc_decode_leaf_mii  (struct dc_softc *,
273                                     struct dc_eblock_mii *);
274 static void dc_decode_leaf_sym  (struct dc_softc *,
275                                     struct dc_eblock_sym *);
276 static void dc_apply_fixup      (struct dc_softc *, int);
277 static uint32_t dc_mchash_xircom(struct dc_softc *, const uint8_t *);
278
279 #ifdef DC_USEIOSPACE
280 #define DC_RES                  SYS_RES_IOPORT
281 #define DC_RID                  DC_PCI_CFBIO
282 #else
283 #define DC_RES                  SYS_RES_MEMORY
284 #define DC_RID                  DC_PCI_CFBMA
285 #endif
286
287 static device_method_t dc_methods[] = {
288         /* Device interface */
289         DEVMETHOD(device_probe,         dc_probe),
290         DEVMETHOD(device_attach,        dc_attach),
291         DEVMETHOD(device_detach,        dc_detach),
292         DEVMETHOD(device_suspend,       dc_suspend),
293         DEVMETHOD(device_resume,        dc_resume),
294         DEVMETHOD(device_shutdown,      dc_shutdown),
295
296         /* bus interface */
297         DEVMETHOD(bus_print_child,      bus_generic_print_child),
298         DEVMETHOD(bus_driver_added,     bus_generic_driver_added),
299
300         /* MII interface */
301         DEVMETHOD(miibus_readreg,       dc_miibus_readreg),
302         DEVMETHOD(miibus_writereg,      dc_miibus_writereg),
303         DEVMETHOD(miibus_statchg,       dc_miibus_statchg),
304         DEVMETHOD(miibus_mediainit,     dc_miibus_mediainit),
305
306         { 0, 0 }
307 };
308
309 static driver_t dc_driver = {
310         "dc",
311         dc_methods,
312         sizeof(struct dc_softc)
313 };
314
315 static devclass_t dc_devclass;
316
317 #ifdef __i386__
318 static int dc_quick=1;
319 SYSCTL_INT(_hw, OID_AUTO, dc_quick, CTLFLAG_RW,
320         &dc_quick,0,"do not mdevget in dc driver");
321 #endif
322
323 DECLARE_DUMMY_MODULE(if_dc);
324 DRIVER_MODULE(if_dc, cardbus, dc_driver, dc_devclass, NULL, NULL);
325 DRIVER_MODULE(if_dc, pci, dc_driver, dc_devclass, NULL, NULL);
326 DRIVER_MODULE(miibus, dc, miibus_driver, miibus_devclass, NULL, NULL);
327
328 #define DC_SETBIT(sc, reg, x)                           \
329         CSR_WRITE_4(sc, reg, CSR_READ_4(sc, reg) | (x))
330
331 #define DC_CLRBIT(sc, reg, x)                           \
332         CSR_WRITE_4(sc, reg, CSR_READ_4(sc, reg) & ~(x))
333
334 #define SIO_SET(x)      DC_SETBIT(sc, DC_SIO, (x))
335 #define SIO_CLR(x)      DC_CLRBIT(sc, DC_SIO, (x))
336
337 static void
338 dc_delay(struct dc_softc *sc)
339 {
340         int                     idx;
341
342         for (idx = (300 / 33) + 1; idx > 0; idx--)
343                 CSR_READ_4(sc, DC_BUSCTL);
344 }
345
346 static void
347 dc_eeprom_width(struct dc_softc *sc)
348 {
349         int i;
350
351         /* Force EEPROM to idle state. */
352         dc_eeprom_idle(sc);
353
354         /* Enter EEPROM access mode. */
355         CSR_WRITE_4(sc, DC_SIO, DC_SIO_EESEL);
356         dc_delay(sc);
357         DC_SETBIT(sc, DC_SIO, DC_SIO_ROMCTL_READ);
358         dc_delay(sc);
359         DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_CLK);
360         dc_delay(sc);
361         DC_SETBIT(sc, DC_SIO, DC_SIO_EE_CS);
362         dc_delay(sc);
363
364         for (i = 3; i--;) {
365                 if (6 & (1 << i))
366                         DC_SETBIT(sc, DC_SIO, DC_SIO_EE_DATAIN);
367                 else
368                         DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_DATAIN);
369                 dc_delay(sc);
370                 DC_SETBIT(sc, DC_SIO, DC_SIO_EE_CLK);
371                 dc_delay(sc);
372                 DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_CLK);
373                 dc_delay(sc);
374         }
375
376         for (i = 1; i <= 12; i++) {
377                 DC_SETBIT(sc, DC_SIO, DC_SIO_EE_CLK);
378                 dc_delay(sc);
379                 if (!(CSR_READ_4(sc, DC_SIO) & DC_SIO_EE_DATAOUT)) {
380                         DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_CLK);
381                         dc_delay(sc);
382                         break;
383                 }
384                 DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_CLK);
385                 dc_delay(sc);
386         }
387
388         /* Turn off EEPROM access mode. */
389         dc_eeprom_idle(sc);
390
391         if (i < 4 || i > 12)
392                 sc->dc_romwidth = 6;
393         else
394                 sc->dc_romwidth = i;
395
396         /* Enter EEPROM access mode. */
397         CSR_WRITE_4(sc, DC_SIO, DC_SIO_EESEL);
398         dc_delay(sc);
399         DC_SETBIT(sc, DC_SIO, DC_SIO_ROMCTL_READ);
400         dc_delay(sc);
401         DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_CLK);
402         dc_delay(sc);
403         DC_SETBIT(sc, DC_SIO, DC_SIO_EE_CS);
404         dc_delay(sc);
405
406         /* Turn off EEPROM access mode. */
407         dc_eeprom_idle(sc);
408 }
409
410 static void
411 dc_eeprom_idle(struct dc_softc *sc)
412 {
413         int             i;
414
415         CSR_WRITE_4(sc, DC_SIO, DC_SIO_EESEL);
416         dc_delay(sc);
417         DC_SETBIT(sc, DC_SIO, DC_SIO_ROMCTL_READ);
418         dc_delay(sc);
419         DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_CLK);
420         dc_delay(sc);
421         DC_SETBIT(sc, DC_SIO, DC_SIO_EE_CS);
422         dc_delay(sc);
423
424         for (i = 0; i < 25; i++) {
425                 DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_CLK);
426                 dc_delay(sc);
427                 DC_SETBIT(sc, DC_SIO, DC_SIO_EE_CLK);
428                 dc_delay(sc);
429         }
430
431         DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_CLK);
432         dc_delay(sc);
433         DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_CS);
434         dc_delay(sc);
435         CSR_WRITE_4(sc, DC_SIO, 0x00000000);
436
437         return;
438 }
439
440 /*
441  * Send a read command and address to the EEPROM, check for ACK.
442  */
443 static void
444 dc_eeprom_putbyte(struct dc_softc *sc, int addr)
445 {
446         int             d, i;
447
448         d = DC_EECMD_READ >> 6;
449         for (i = 3; i--; ) {
450                 if (d & (1 << i))
451                         DC_SETBIT(sc, DC_SIO, DC_SIO_EE_DATAIN);
452                 else
453                         DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_DATAIN);
454                 dc_delay(sc);
455                 DC_SETBIT(sc, DC_SIO, DC_SIO_EE_CLK);
456                 dc_delay(sc);
457                 DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_CLK);
458                 dc_delay(sc);
459         }
460
461         /*
462          * Feed in each bit and strobe the clock.
463          */
464         for (i = sc->dc_romwidth; i--;) {
465                 if (addr & (1 << i)) {
466                         SIO_SET(DC_SIO_EE_DATAIN);
467                 } else {
468                         SIO_CLR(DC_SIO_EE_DATAIN);
469                 }
470                 dc_delay(sc);
471                 SIO_SET(DC_SIO_EE_CLK);
472                 dc_delay(sc);
473                 SIO_CLR(DC_SIO_EE_CLK);
474                 dc_delay(sc);
475         }
476
477         return;
478 }
479
480 /*
481  * Read a word of data stored in the EEPROM at address 'addr.'
482  * The PNIC 82c168/82c169 has its own non-standard way to read
483  * the EEPROM.
484  */
485 static void
486 dc_eeprom_getword_pnic(struct dc_softc *sc, int addr, u_int16_t *dest)
487 {
488         int             i;
489         u_int32_t               r;
490
491         CSR_WRITE_4(sc, DC_PN_SIOCTL, DC_PN_EEOPCODE_READ|addr);
492
493         for (i = 0; i < DC_TIMEOUT; i++) {
494                 DELAY(1);
495                 r = CSR_READ_4(sc, DC_SIO);
496                 if (!(r & DC_PN_SIOCTL_BUSY)) {
497                         *dest = (u_int16_t)(r & 0xFFFF);
498                         return;
499                 }
500         }
501
502         return;
503 }
504
505 /*
506  * Read a word of data stored in the EEPROM at address 'addr.'
507  * The Xircom X3201 has its own non-standard way to read
508  * the EEPROM, too.
509  */
510 static void
511 dc_eeprom_getword_xircom(struct dc_softc *sc, int addr, u_int16_t *dest)
512 {
513         SIO_SET(DC_SIO_ROMSEL | DC_SIO_ROMCTL_READ);
514
515         addr *= 2;
516         CSR_WRITE_4(sc, DC_ROM, addr | 0x160);
517         *dest = (u_int16_t)CSR_READ_4(sc, DC_SIO)&0xff;
518         addr += 1;
519         CSR_WRITE_4(sc, DC_ROM, addr | 0x160);
520         *dest |= ((u_int16_t)CSR_READ_4(sc, DC_SIO)&0xff) << 8;
521
522         SIO_CLR(DC_SIO_ROMSEL | DC_SIO_ROMCTL_READ);
523 }
524
525 /*
526  * Read a word of data stored in the EEPROM at address 'addr.'
527  */
528 static void
529 dc_eeprom_getword(struct dc_softc *sc, int addr, u_int16_t *dest)
530 {
531         int             i;
532         u_int16_t               word = 0;
533
534         /* Force EEPROM to idle state. */
535         dc_eeprom_idle(sc);
536
537         /* Enter EEPROM access mode. */
538         CSR_WRITE_4(sc, DC_SIO, DC_SIO_EESEL);
539         dc_delay(sc);
540         DC_SETBIT(sc, DC_SIO,  DC_SIO_ROMCTL_READ);
541         dc_delay(sc);
542         DC_CLRBIT(sc, DC_SIO, DC_SIO_EE_CLK);
543         dc_delay(sc);
544         DC_SETBIT(sc, DC_SIO, DC_SIO_EE_CS);
545         dc_delay(sc);
546
547         /*
548          * Send address of word we want to read.
549          */
550         dc_eeprom_putbyte(sc, addr);
551
552         /*
553          * Start reading bits from EEPROM.
554          */
555         for (i = 0x8000; i; i >>= 1) {
556                 SIO_SET(DC_SIO_EE_CLK);
557                 dc_delay(sc);
558                 if (CSR_READ_4(sc, DC_SIO) & DC_SIO_EE_DATAOUT)
559                         word |= i;
560                 dc_delay(sc);
561                 SIO_CLR(DC_SIO_EE_CLK);
562                 dc_delay(sc);
563         }
564
565         /* Turn off EEPROM access mode. */
566         dc_eeprom_idle(sc);
567
568         *dest = word;
569
570         return;
571 }
572
573 /*
574  * Read a sequence of words from the EEPROM.
575  */
576 static void
577 dc_read_eeprom(struct dc_softc *sc, caddr_t dest, int off, int cnt, int swap)
578 {
579         int                     i;
580         u_int16_t               word = 0, *ptr;
581
582         for (i = 0; i < cnt; i++) {
583                 if (DC_IS_PNIC(sc))
584                         dc_eeprom_getword_pnic(sc, off + i, &word);
585                 else if (DC_IS_XIRCOM(sc))
586                         dc_eeprom_getword_xircom(sc, off + i, &word);
587                 else
588                         dc_eeprom_getword(sc, off + i, &word);
589                 ptr = (u_int16_t *)(dest + (i * 2));
590                 if (swap)
591                         *ptr = ntohs(word);
592                 else
593                         *ptr = word;
594         }
595
596         return;
597 }
598
599 /*
600  * The following two routines are taken from the Macronix 98713
601  * Application Notes pp.19-21.
602  */
603 /*
604  * Write a bit to the MII bus.
605  */
606 static void
607 dc_mii_writebit(struct dc_softc *sc, int bit)
608 {
609         if (bit)
610                 CSR_WRITE_4(sc, DC_SIO,
611                     DC_SIO_ROMCTL_WRITE|DC_SIO_MII_DATAOUT);
612         else
613                 CSR_WRITE_4(sc, DC_SIO, DC_SIO_ROMCTL_WRITE);
614
615         DC_SETBIT(sc, DC_SIO, DC_SIO_MII_CLK);
616         DC_CLRBIT(sc, DC_SIO, DC_SIO_MII_CLK);
617
618         return;
619 }
620
621 /*
622  * Read a bit from the MII bus.
623  */
624 static int
625 dc_mii_readbit(struct dc_softc *sc)
626 {
627         CSR_WRITE_4(sc, DC_SIO, DC_SIO_ROMCTL_READ|DC_SIO_MII_DIR);
628         CSR_READ_4(sc, DC_SIO);
629         DC_SETBIT(sc, DC_SIO, DC_SIO_MII_CLK);
630         DC_CLRBIT(sc, DC_SIO, DC_SIO_MII_CLK);
631         if (CSR_READ_4(sc, DC_SIO) & DC_SIO_MII_DATAIN)
632                 return(1);
633
634         return(0);
635 }
636
637 /*
638  * Sync the PHYs by setting data bit and strobing the clock 32 times.
639  */
640 static void
641 dc_mii_sync(struct dc_softc *sc)
642 {
643         int             i;
644
645         CSR_WRITE_4(sc, DC_SIO, DC_SIO_ROMCTL_WRITE);
646
647         for (i = 0; i < 32; i++)
648                 dc_mii_writebit(sc, 1);
649
650         return;
651 }
652
653 /*
654  * Clock a series of bits through the MII.
655  */
656 static void
657 dc_mii_send(struct dc_softc *sc, u_int32_t bits, int cnt)
658 {
659         int                     i;
660
661         for (i = (0x1 << (cnt - 1)); i; i >>= 1)
662                 dc_mii_writebit(sc, bits & i);
663 }
664
665 /*
666  * Read an PHY register through the MII.
667  */
668 static int
669 dc_mii_readreg(struct dc_softc *sc, struct dc_mii_frame *frame)
670 {
671         int ack, i;
672
673         /*
674          * Set up frame for RX.
675          */
676         frame->mii_stdelim = DC_MII_STARTDELIM;
677         frame->mii_opcode = DC_MII_READOP;
678         frame->mii_turnaround = 0;
679         frame->mii_data = 0;
680         
681         /*
682          * Sync the PHYs.
683          */
684         dc_mii_sync(sc);
685
686         /*
687          * Send command/address info.
688          */
689         dc_mii_send(sc, frame->mii_stdelim, 2);
690         dc_mii_send(sc, frame->mii_opcode, 2);
691         dc_mii_send(sc, frame->mii_phyaddr, 5);
692         dc_mii_send(sc, frame->mii_regaddr, 5);
693
694 #ifdef notdef
695         /* Idle bit */
696         dc_mii_writebit(sc, 1);
697         dc_mii_writebit(sc, 0);
698 #endif
699
700         /* Check for ack */
701         ack = dc_mii_readbit(sc);
702
703         /*
704          * Now try reading data bits. If the ack failed, we still
705          * need to clock through 16 cycles to keep the PHY(s) in sync.
706          */
707         if (ack) {
708                 for(i = 0; i < 16; i++) {
709                         dc_mii_readbit(sc);
710                 }
711                 goto fail;
712         }
713
714         for (i = 0x8000; i; i >>= 1) {
715                 if (!ack) {
716                         if (dc_mii_readbit(sc))
717                                 frame->mii_data |= i;
718                 }
719         }
720
721 fail:
722
723         dc_mii_writebit(sc, 0);
724         dc_mii_writebit(sc, 0);
725
726         if (ack)
727                 return(1);
728         return(0);
729 }
730
731 /*
732  * Write to a PHY register through the MII.
733  */
734 static int
735 dc_mii_writereg(struct dc_softc *sc, struct dc_mii_frame *frame)
736 {
737         /*
738          * Set up frame for TX.
739          */
740
741         frame->mii_stdelim = DC_MII_STARTDELIM;
742         frame->mii_opcode = DC_MII_WRITEOP;
743         frame->mii_turnaround = DC_MII_TURNAROUND;
744
745         /*
746          * Sync the PHYs.
747          */     
748         dc_mii_sync(sc);
749
750         dc_mii_send(sc, frame->mii_stdelim, 2);
751         dc_mii_send(sc, frame->mii_opcode, 2);
752         dc_mii_send(sc, frame->mii_phyaddr, 5);
753         dc_mii_send(sc, frame->mii_regaddr, 5);
754         dc_mii_send(sc, frame->mii_turnaround, 2);
755         dc_mii_send(sc, frame->mii_data, 16);
756
757         /* Idle bit. */
758         dc_mii_writebit(sc, 0);
759         dc_mii_writebit(sc, 0);
760
761         return(0);
762 }
763
764 static int
765 dc_miibus_readreg(device_t dev, int phy, int reg)
766 {
767         struct dc_mii_frame     frame;
768         struct dc_softc         *sc;
769         int                     i, rval, phy_reg = 0;
770
771         sc = device_get_softc(dev);
772         bzero((char *)&frame, sizeof(frame));
773
774         /*
775          * Note: both the AL981 and AN985 have internal PHYs,
776          * however the AL981 provides direct access to the PHY
777          * registers while the AN985 uses a serial MII interface.
778          * The AN985's MII interface is also buggy in that you
779          * can read from any MII address (0 to 31), but only address 1
780          * behaves normally. To deal with both cases, we pretend
781          * that the PHY is at MII address 1.
782          */
783         if (DC_IS_ADMTEK(sc) && phy != DC_ADMTEK_PHYADDR)
784                 return(0);
785
786         /*
787          * Note: the ukphy probes of the RS7112 report a PHY at
788          * MII address 0 (possibly HomePNA?) and 1 (ethernet)
789          * so we only respond to correct one.
790          */
791         if (DC_IS_CONEXANT(sc) && phy != DC_CONEXANT_PHYADDR)
792                 return(0);
793
794         if (sc->dc_pmode != DC_PMODE_MII) {
795                 if (phy == (MII_NPHY - 1)) {
796                         switch(reg) {
797                         case MII_BMSR:
798                         /*
799                          * Fake something to make the probe
800                          * code think there's a PHY here.
801                          */
802                                 return(BMSR_MEDIAMASK);
803                                 break;
804                         case MII_PHYIDR1:
805                                 if (DC_IS_PNIC(sc))
806                                         return(DC_VENDORID_LO);
807                                 return(DC_VENDORID_DEC);
808                                 break;
809                         case MII_PHYIDR2:
810                                 if (DC_IS_PNIC(sc))
811                                         return(DC_DEVICEID_82C168);
812                                 return(DC_DEVICEID_21143);
813                                 break;
814                         default:
815                                 return(0);
816                                 break;
817                         }
818                 } else
819                         return(0);
820         }
821
822         if (DC_IS_PNIC(sc)) {
823                 CSR_WRITE_4(sc, DC_PN_MII, DC_PN_MIIOPCODE_READ |
824                     (phy << 23) | (reg << 18));
825                 for (i = 0; i < DC_TIMEOUT; i++) {
826                         DELAY(1);
827                         rval = CSR_READ_4(sc, DC_PN_MII);
828                         if (!(rval & DC_PN_MII_BUSY)) {
829                                 rval &= 0xFFFF;
830                                 return(rval == 0xFFFF ? 0 : rval);
831                         }
832                 }
833                 return(0);
834         }
835
836         if (DC_IS_COMET(sc)) {
837                 switch(reg) {
838                 case MII_BMCR:
839                         phy_reg = DC_AL_BMCR;
840                         break;
841                 case MII_BMSR:
842                         phy_reg = DC_AL_BMSR;
843                         break;
844                 case MII_PHYIDR1:
845                         phy_reg = DC_AL_VENID;
846                         break;
847                 case MII_PHYIDR2:
848                         phy_reg = DC_AL_DEVID;
849                         break;
850                 case MII_ANAR:
851                         phy_reg = DC_AL_ANAR;
852                         break;
853                 case MII_ANLPAR:
854                         phy_reg = DC_AL_LPAR;
855                         break;
856                 case MII_ANER:
857                         phy_reg = DC_AL_ANER;
858                         break;
859                 default:
860                         if_printf(&sc->arpcom.ac_if,
861                                   "phy_read: bad phy register %x\n", reg);
862                         return(0);
863                         break;
864                 }
865
866                 rval = CSR_READ_4(sc, phy_reg) & 0x0000FFFF;
867
868                 if (rval == 0xFFFF)
869                         return(0);
870                 return(rval);
871         }
872
873         frame.mii_phyaddr = phy;
874         frame.mii_regaddr = reg;
875         if (sc->dc_type == DC_TYPE_98713) {
876                 phy_reg = CSR_READ_4(sc, DC_NETCFG);
877                 CSR_WRITE_4(sc, DC_NETCFG, phy_reg & ~DC_NETCFG_PORTSEL);
878         }
879         dc_mii_readreg(sc, &frame);
880         if (sc->dc_type == DC_TYPE_98713)
881                 CSR_WRITE_4(sc, DC_NETCFG, phy_reg);
882
883         return(frame.mii_data);
884 }
885
886 static int
887 dc_miibus_writereg(device_t dev, int phy, int reg, int data)
888 {
889         struct dc_softc         *sc;
890         struct dc_mii_frame     frame;
891         int                     i, phy_reg = 0;
892
893         sc = device_get_softc(dev);
894         bzero((char *)&frame, sizeof(frame));
895
896         if (DC_IS_ADMTEK(sc) && phy != DC_ADMTEK_PHYADDR)
897                 return(0);
898
899         if (DC_IS_CONEXANT(sc) && phy != DC_CONEXANT_PHYADDR)
900                 return(0);
901
902         if (DC_IS_PNIC(sc)) {
903                 CSR_WRITE_4(sc, DC_PN_MII, DC_PN_MIIOPCODE_WRITE |
904                     (phy << 23) | (reg << 10) | data);
905                 for (i = 0; i < DC_TIMEOUT; i++) {
906                         if (!(CSR_READ_4(sc, DC_PN_MII) & DC_PN_MII_BUSY))
907                                 break;
908                 }
909                 return(0);
910         }
911
912         if (DC_IS_COMET(sc)) {
913                 switch(reg) {
914                 case MII_BMCR:
915                         phy_reg = DC_AL_BMCR;
916                         break;
917                 case MII_BMSR:
918                         phy_reg = DC_AL_BMSR;
919                         break;
920                 case MII_PHYIDR1:
921                         phy_reg = DC_AL_VENID;
922                         break;
923                 case MII_PHYIDR2:
924                         phy_reg = DC_AL_DEVID;
925                         break;
926                 case MII_ANAR:
927                         phy_reg = DC_AL_ANAR;
928                         break;
929                 case MII_ANLPAR:
930                         phy_reg = DC_AL_LPAR;
931                         break;
932                 case MII_ANER:
933                         phy_reg = DC_AL_ANER;
934                         break;
935                 default:
936                         if_printf(&sc->arpcom.ac_if,
937                                   "phy_write: bad phy register %x\n", reg);
938                         return(0);
939                         break;
940                 }
941
942                 CSR_WRITE_4(sc, phy_reg, data);
943                 return(0);
944         }
945
946         frame.mii_phyaddr = phy;
947         frame.mii_regaddr = reg;
948         frame.mii_data = data;
949
950         if (sc->dc_type == DC_TYPE_98713) {
951                 phy_reg = CSR_READ_4(sc, DC_NETCFG);
952                 CSR_WRITE_4(sc, DC_NETCFG, phy_reg & ~DC_NETCFG_PORTSEL);
953         }
954         dc_mii_writereg(sc, &frame);
955         if (sc->dc_type == DC_TYPE_98713)
956                 CSR_WRITE_4(sc, DC_NETCFG, phy_reg);
957
958         return(0);
959 }
960
961 static void
962 dc_miibus_statchg(device_t dev)
963 {
964         struct dc_softc         *sc;
965         struct mii_data         *mii;
966         struct ifmedia          *ifm;
967
968         sc = device_get_softc(dev);
969         if (DC_IS_ADMTEK(sc))
970                 return;
971
972         mii = device_get_softc(sc->dc_miibus);
973         ifm = &mii->mii_media;
974         if (DC_IS_DAVICOM(sc) &&
975             IFM_SUBTYPE(ifm->ifm_media) == IFM_HPNA_1) {
976                 dc_setcfg(sc, ifm->ifm_media);
977                 sc->dc_if_media = ifm->ifm_media;
978         } else {
979                 dc_setcfg(sc, mii->mii_media_active);
980                 sc->dc_if_media = mii->mii_media_active;
981         }
982
983         return;
984 }
985
986 /*
987  * Special support for DM9102A cards with HomePNA PHYs. Note:
988  * with the Davicom DM9102A/DM9801 eval board that I have, it seems
989  * to be impossible to talk to the management interface of the DM9801
990  * PHY (its MDIO pin is not connected to anything). Consequently,
991  * the driver has to just 'know' about the additional mode and deal
992  * with it itself. *sigh*
993  */
994 static void
995 dc_miibus_mediainit(device_t dev)
996 {
997         struct dc_softc         *sc;
998         struct mii_data         *mii;
999         struct ifmedia          *ifm;
1000         int                     rev;
1001
1002         rev = pci_get_revid(dev);
1003
1004         sc = device_get_softc(dev);
1005         mii = device_get_softc(sc->dc_miibus);
1006         ifm = &mii->mii_media;
1007
1008         if (DC_IS_DAVICOM(sc) && rev >= DC_REVISION_DM9102A)
1009                 ifmedia_add(ifm, IFM_ETHER | IFM_HPNA_1, 0, NULL);
1010
1011         return;
1012 }
1013
1014 #define DC_BITS_512     9
1015 #define DC_BITS_128     7
1016 #define DC_BITS_64      6
1017
1018 static u_int32_t
1019 dc_crc_mask(struct dc_softc *sc)
1020 {
1021         /*
1022          * The hash table on the PNIC II and the MX98715AEC-C/D/E
1023          * chips is only 128 bits wide.
1024          */
1025         if (sc->dc_flags & DC_128BIT_HASH)
1026                 return ((1 << DC_BITS_128) - 1);
1027
1028         /* The hash table on the MX98715BEC is only 64 bits wide. */
1029         if (sc->dc_flags & DC_64BIT_HASH)
1030                 return ((1 << DC_BITS_64) - 1);
1031
1032         return ((1 << DC_BITS_512) - 1);
1033 }
1034
1035 /*
1036  * 21143-style RX filter setup routine. Filter programming is done by
1037  * downloading a special setup frame into the TX engine. 21143, Macronix,
1038  * PNIC, PNIC II and Davicom chips are programmed this way.
1039  *
1040  * We always program the chip using 'hash perfect' mode, i.e. one perfect
1041  * address (our node address) and a 512-bit hash filter for multicast
1042  * frames. We also sneak the broadcast address into the hash filter since
1043  * we need that too.
1044  */
1045 void
1046 dc_setfilt_21143(struct dc_softc *sc)
1047 {
1048         struct dc_desc          *sframe;
1049         u_int32_t               h, crc_mask, *sp;
1050         struct ifmultiaddr      *ifma;
1051         struct ifnet            *ifp;
1052         int                     i;
1053
1054         ifp = &sc->arpcom.ac_if;
1055
1056         i = sc->dc_cdata.dc_tx_prod;
1057         DC_INC(sc->dc_cdata.dc_tx_prod, DC_TX_LIST_CNT);
1058         sc->dc_cdata.dc_tx_cnt++;
1059         sframe = &sc->dc_ldata->dc_tx_list[i];
1060         sp = (u_int32_t *)&sc->dc_cdata.dc_sbuf;
1061         bzero((char *)sp, DC_SFRAME_LEN);
1062
1063         sframe->dc_data = vtophys(&sc->dc_cdata.dc_sbuf);
1064         sframe->dc_ctl = DC_SFRAME_LEN | DC_TXCTL_SETUP | DC_TXCTL_TLINK |
1065             DC_FILTER_HASHPERF | DC_TXCTL_FINT;
1066
1067         sc->dc_cdata.dc_tx_chain[i] = (struct mbuf *)&sc->dc_cdata.dc_sbuf;
1068
1069         /* If we want promiscuous mode, set the allframes bit. */
1070         if (ifp->if_flags & IFF_PROMISC)
1071                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_RX_PROMISC);
1072         else
1073                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_RX_PROMISC);
1074
1075         if (ifp->if_flags & IFF_ALLMULTI)
1076                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_RX_ALLMULTI);
1077         else
1078                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_RX_ALLMULTI);
1079
1080         crc_mask = dc_crc_mask(sc);
1081         TAILQ_FOREACH(ifma, &ifp->if_multiaddrs, ifma_link) {
1082                 if (ifma->ifma_addr->sa_family != AF_LINK)
1083                         continue;
1084                 h = ether_crc32_le(
1085                         LLADDR((struct sockaddr_dl *)ifma->ifma_addr),
1086                         ETHER_ADDR_LEN) & crc_mask;
1087                 sp[h >> 4] |= 1 << (h & 0xF);
1088         }
1089
1090         if (ifp->if_flags & IFF_BROADCAST) {
1091                 h = ether_crc32_le(ifp->if_broadcastaddr,
1092                                    ETHER_ADDR_LEN) & crc_mask;
1093                 sp[h >> 4] |= 1 << (h & 0xF);
1094         }
1095
1096         /* Set our MAC address */
1097         sp[39] = ((u_int16_t *)sc->arpcom.ac_enaddr)[0];
1098         sp[40] = ((u_int16_t *)sc->arpcom.ac_enaddr)[1];
1099         sp[41] = ((u_int16_t *)sc->arpcom.ac_enaddr)[2];
1100
1101         sframe->dc_status = DC_TXSTAT_OWN;
1102         CSR_WRITE_4(sc, DC_TXSTART, 0xFFFFFFFF);
1103
1104         /*
1105          * The PNIC takes an exceedingly long time to process its
1106          * setup frame; wait 10ms after posting the setup frame
1107          * before proceeding, just so it has time to swallow its
1108          * medicine.
1109          */
1110         DELAY(10000);
1111
1112         ifp->if_timer = 5;
1113
1114         return;
1115 }
1116
1117 void
1118 dc_setfilt_admtek(struct dc_softc *sc)
1119 {
1120         struct ifnet            *ifp;
1121         int                     h = 0;
1122         u_int32_t               crc_mask;
1123         u_int32_t               hashes[2] = { 0, 0 };
1124         struct ifmultiaddr      *ifma;
1125
1126         ifp = &sc->arpcom.ac_if;
1127
1128         /* Init our MAC address */
1129         CSR_WRITE_4(sc, DC_AL_PAR0, *(u_int32_t *)(&sc->arpcom.ac_enaddr[0]));
1130         CSR_WRITE_4(sc, DC_AL_PAR1, *(u_int32_t *)(&sc->arpcom.ac_enaddr[4]));
1131
1132         /* If we want promiscuous mode, set the allframes bit. */
1133         if (ifp->if_flags & IFF_PROMISC)
1134                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_RX_PROMISC);
1135         else
1136                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_RX_PROMISC);
1137
1138         if (ifp->if_flags & IFF_ALLMULTI)
1139                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_RX_ALLMULTI);
1140         else
1141                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_RX_ALLMULTI);
1142
1143         /* first, zot all the existing hash bits */
1144         CSR_WRITE_4(sc, DC_AL_MAR0, 0);
1145         CSR_WRITE_4(sc, DC_AL_MAR1, 0);
1146
1147         /*
1148          * If we're already in promisc or allmulti mode, we
1149          * don't have to bother programming the multicast filter.
1150          */
1151         if (ifp->if_flags & (IFF_PROMISC|IFF_ALLMULTI))
1152                 return;
1153
1154         /* now program new ones */
1155         if (DC_IS_CENTAUR(sc))
1156                 crc_mask = dc_crc_mask(sc);
1157         else
1158                 crc_mask = 0x3f;
1159         TAILQ_FOREACH(ifma, &ifp->if_multiaddrs, ifma_link) {
1160                 if (ifma->ifma_addr->sa_family != AF_LINK)
1161                         continue;
1162                 if (DC_IS_CENTAUR(sc)) {
1163                         h = ether_crc32_le(
1164                                 LLADDR((struct sockaddr_dl *)ifma->ifma_addr),
1165                                 ETHER_ADDR_LEN) & crc_mask;
1166                 } else {
1167                         h = ether_crc32_be(
1168                                 LLADDR((struct sockaddr_dl *)ifma->ifma_addr),
1169                                 ETHER_ADDR_LEN);
1170                         h = (h >> 26) & crc_mask;
1171                 }
1172                 if (h < 32)
1173                         hashes[0] |= (1 << h);
1174                 else
1175                         hashes[1] |= (1 << (h - 32));
1176         }
1177
1178         CSR_WRITE_4(sc, DC_AL_MAR0, hashes[0]);
1179         CSR_WRITE_4(sc, DC_AL_MAR1, hashes[1]);
1180
1181         return;
1182 }
1183
1184 void
1185 dc_setfilt_asix(struct dc_softc *sc)
1186 {
1187         struct ifnet            *ifp;
1188         int                     h = 0;
1189         u_int32_t               hashes[2] = { 0, 0 };
1190         struct ifmultiaddr      *ifma;
1191
1192         ifp = &sc->arpcom.ac_if;
1193
1194         /* Init our MAC address */
1195         CSR_WRITE_4(sc, DC_AX_FILTIDX, DC_AX_FILTIDX_PAR0);
1196         CSR_WRITE_4(sc, DC_AX_FILTDATA,
1197             *(u_int32_t *)(&sc->arpcom.ac_enaddr[0]));
1198         CSR_WRITE_4(sc, DC_AX_FILTIDX, DC_AX_FILTIDX_PAR1);
1199         CSR_WRITE_4(sc, DC_AX_FILTDATA,
1200             *(u_int32_t *)(&sc->arpcom.ac_enaddr[4]));
1201
1202         /* If we want promiscuous mode, set the allframes bit. */
1203         if (ifp->if_flags & IFF_PROMISC)
1204                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_RX_PROMISC);
1205         else
1206                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_RX_PROMISC);
1207
1208         if (ifp->if_flags & IFF_ALLMULTI)
1209                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_RX_ALLMULTI);
1210         else
1211                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_RX_ALLMULTI);
1212
1213         /*
1214          * The ASIX chip has a special bit to enable reception
1215          * of broadcast frames.
1216          */
1217         if (ifp->if_flags & IFF_BROADCAST)
1218                 DC_SETBIT(sc, DC_NETCFG, DC_AX_NETCFG_RX_BROAD);
1219         else
1220                 DC_CLRBIT(sc, DC_NETCFG, DC_AX_NETCFG_RX_BROAD);
1221
1222         /* first, zot all the existing hash bits */
1223         CSR_WRITE_4(sc, DC_AX_FILTIDX, DC_AX_FILTIDX_MAR0);
1224         CSR_WRITE_4(sc, DC_AX_FILTDATA, 0);
1225         CSR_WRITE_4(sc, DC_AX_FILTIDX, DC_AX_FILTIDX_MAR1);
1226         CSR_WRITE_4(sc, DC_AX_FILTDATA, 0);
1227
1228         /*
1229          * If we're already in promisc or allmulti mode, we
1230          * don't have to bother programming the multicast filter.
1231          */
1232         if (ifp->if_flags & (IFF_PROMISC|IFF_ALLMULTI))
1233                 return;
1234
1235         /* now program new ones */
1236         TAILQ_FOREACH(ifma, &ifp->if_multiaddrs, ifma_link) {
1237                 if (ifma->ifma_addr->sa_family != AF_LINK)
1238                         continue;
1239                 h = ether_crc32_be(
1240                         LLADDR((struct sockaddr_dl *)ifma->ifma_addr),
1241                         ETHER_ADDR_LEN);
1242                 h = (h >> 26) & 0x3f;
1243                 if (h < 32)
1244                         hashes[0] |= (1 << h);
1245                 else
1246                         hashes[1] |= (1 << (h - 32));
1247         }
1248
1249         CSR_WRITE_4(sc, DC_AX_FILTIDX, DC_AX_FILTIDX_MAR0);
1250         CSR_WRITE_4(sc, DC_AX_FILTDATA, hashes[0]);
1251         CSR_WRITE_4(sc, DC_AX_FILTIDX, DC_AX_FILTIDX_MAR1);
1252         CSR_WRITE_4(sc, DC_AX_FILTDATA, hashes[1]);
1253
1254         return;
1255 }
1256
1257 void
1258 dc_setfilt_xircom(struct dc_softc *sc)
1259 {
1260         struct dc_desc          *sframe;
1261         u_int32_t               h, *sp;
1262         struct ifmultiaddr      *ifma;
1263         struct ifnet            *ifp;
1264         int                     i;
1265
1266         ifp = &sc->arpcom.ac_if;
1267         KASSERT(ifp->if_flags & IFF_RUNNING,
1268                 ("%s is not running yet", ifp->if_xname));
1269
1270         DC_CLRBIT(sc, DC_NETCFG, (DC_NETCFG_TX_ON|DC_NETCFG_RX_ON));
1271
1272         i = sc->dc_cdata.dc_tx_prod;
1273         DC_INC(sc->dc_cdata.dc_tx_prod, DC_TX_LIST_CNT);
1274         sc->dc_cdata.dc_tx_cnt++;
1275         sframe = &sc->dc_ldata->dc_tx_list[i];
1276         sp = (u_int32_t *)&sc->dc_cdata.dc_sbuf;
1277         bzero(sp, DC_SFRAME_LEN);
1278
1279         sframe->dc_data = vtophys(&sc->dc_cdata.dc_sbuf);
1280         sframe->dc_ctl = DC_SFRAME_LEN | DC_TXCTL_SETUP | DC_TXCTL_TLINK |
1281             DC_FILTER_HASHPERF | DC_TXCTL_FINT;
1282
1283         sc->dc_cdata.dc_tx_chain[i] = (struct mbuf *)&sc->dc_cdata.dc_sbuf;
1284
1285         /* If we want promiscuous mode, set the allframes bit. */
1286         if (ifp->if_flags & IFF_PROMISC)
1287                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_RX_PROMISC);
1288         else
1289                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_RX_PROMISC);
1290
1291         if (ifp->if_flags & IFF_ALLMULTI)
1292                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_RX_ALLMULTI);
1293         else
1294                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_RX_ALLMULTI);
1295
1296         TAILQ_FOREACH(ifma, &ifp->if_multiaddrs, ifma_link) {
1297                 if (ifma->ifma_addr->sa_family != AF_LINK)
1298                         continue;
1299                 h = dc_mchash_xircom(sc,
1300                         LLADDR((struct sockaddr_dl *)ifma->ifma_addr));
1301                 sp[h >> 4] |= 1 << (h & 0xF);
1302         }
1303
1304         if (ifp->if_flags & IFF_BROADCAST) {
1305                 h = dc_mchash_xircom(sc, (caddr_t)&etherbroadcastaddr);
1306                 sp[h >> 4] |= 1 << (h & 0xF);
1307         }
1308
1309         /* Set our MAC address */
1310         sp[0] = ((u_int16_t *)sc->arpcom.ac_enaddr)[0];
1311         sp[1] = ((u_int16_t *)sc->arpcom.ac_enaddr)[1];
1312         sp[2] = ((u_int16_t *)sc->arpcom.ac_enaddr)[2];
1313         
1314         DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_TX_ON);
1315         DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_RX_ON);
1316         sframe->dc_status = DC_TXSTAT_OWN;
1317         CSR_WRITE_4(sc, DC_TXSTART, 0xFFFFFFFF);
1318
1319         /*
1320          * wait some time...
1321          */
1322         DELAY(1000);
1323
1324         ifp->if_timer = 5;
1325 }
1326
1327 static void
1328 dc_setfilt(struct dc_softc *sc)
1329 {
1330         if (DC_IS_INTEL(sc) || DC_IS_MACRONIX(sc) || DC_IS_PNIC(sc) ||
1331             DC_IS_PNICII(sc) || DC_IS_DAVICOM(sc) || DC_IS_CONEXANT(sc))
1332                 dc_setfilt_21143(sc);
1333
1334         if (DC_IS_ASIX(sc))
1335                 dc_setfilt_asix(sc);
1336
1337         if (DC_IS_ADMTEK(sc))
1338                 dc_setfilt_admtek(sc);
1339
1340         if (DC_IS_XIRCOM(sc))
1341                 dc_setfilt_xircom(sc);
1342 }
1343
1344 /*
1345  * In order to fiddle with the
1346  * 'full-duplex' and '100Mbps' bits in the netconfig register, we
1347  * first have to put the transmit and/or receive logic in the idle state.
1348  */
1349 static void
1350 dc_setcfg(struct dc_softc *sc, int media)
1351 {
1352         int                     i, restart = 0;
1353         u_int32_t               isr;
1354
1355         if (IFM_SUBTYPE(media) == IFM_NONE)
1356                 return;
1357
1358         if (CSR_READ_4(sc, DC_NETCFG) & (DC_NETCFG_TX_ON|DC_NETCFG_RX_ON)) {
1359                 restart = 1;
1360                 DC_CLRBIT(sc, DC_NETCFG, (DC_NETCFG_TX_ON|DC_NETCFG_RX_ON));
1361
1362                 for (i = 0; i < DC_TIMEOUT; i++) {
1363                         isr = CSR_READ_4(sc, DC_ISR);
1364                         if ((isr & DC_ISR_TX_IDLE) &&
1365                             ((isr & DC_ISR_RX_STATE) == DC_RXSTATE_STOPPED ||
1366                              (isr & DC_ISR_RX_STATE) == DC_RXSTATE_WAIT))
1367                                 break;
1368                         DELAY(10);
1369                 }
1370
1371                 if (i == DC_TIMEOUT) {
1372                         if_printf(&sc->arpcom.ac_if, 
1373                             "failed to force tx and rx to idle state\n");
1374                 }
1375         }
1376
1377         if (IFM_SUBTYPE(media) == IFM_100_TX) {
1378                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_SPEEDSEL);
1379                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_HEARTBEAT);
1380                 if (sc->dc_pmode == DC_PMODE_MII) {
1381                         int     watchdogreg;
1382
1383                         if (DC_IS_INTEL(sc)) {
1384                         /* there's a write enable bit here that reads as 1 */
1385                                 watchdogreg = CSR_READ_4(sc, DC_WATCHDOG);
1386                                 watchdogreg &= ~DC_WDOG_CTLWREN;
1387                                 watchdogreg |= DC_WDOG_JABBERDIS;
1388                                 CSR_WRITE_4(sc, DC_WATCHDOG, watchdogreg);
1389                         } else {
1390                                 DC_SETBIT(sc, DC_WATCHDOG, DC_WDOG_JABBERDIS);
1391                         }
1392                         DC_CLRBIT(sc, DC_NETCFG, (DC_NETCFG_PCS|
1393                             DC_NETCFG_PORTSEL|DC_NETCFG_SCRAMBLER));
1394                         if (sc->dc_type == DC_TYPE_98713)
1395                                 DC_SETBIT(sc, DC_NETCFG, (DC_NETCFG_PCS|
1396                                     DC_NETCFG_SCRAMBLER));
1397                         if (!DC_IS_DAVICOM(sc))
1398                                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_PORTSEL);
1399                         DC_CLRBIT(sc, DC_10BTCTRL, 0xFFFF);
1400                         if (DC_IS_INTEL(sc))
1401                                 dc_apply_fixup(sc, IFM_AUTO);
1402                 } else {
1403                         if (DC_IS_PNIC(sc)) {
1404                                 DC_PN_GPIO_SETBIT(sc, DC_PN_GPIO_SPEEDSEL);
1405                                 DC_PN_GPIO_SETBIT(sc, DC_PN_GPIO_100TX_LOOP);
1406                                 DC_SETBIT(sc, DC_PN_NWAY, DC_PN_NWAY_SPEEDSEL);
1407                         }
1408                         DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_PORTSEL);
1409                         DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_PCS);
1410                         DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_SCRAMBLER);
1411                         if (DC_IS_INTEL(sc))
1412                                 dc_apply_fixup(sc,
1413                                     (media & IFM_GMASK) == IFM_FDX ?
1414                                     IFM_100_TX|IFM_FDX : IFM_100_TX);
1415                 }
1416         }
1417
1418         if (IFM_SUBTYPE(media) == IFM_10_T) {
1419                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_SPEEDSEL);
1420                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_HEARTBEAT);
1421                 if (sc->dc_pmode == DC_PMODE_MII) {
1422                         int     watchdogreg;
1423
1424                         /* there's a write enable bit here that reads as 1 */
1425                         if (DC_IS_INTEL(sc)) {
1426                                 watchdogreg = CSR_READ_4(sc, DC_WATCHDOG);
1427                                 watchdogreg &= ~DC_WDOG_CTLWREN;
1428                                 watchdogreg |= DC_WDOG_JABBERDIS;
1429                                 CSR_WRITE_4(sc, DC_WATCHDOG, watchdogreg);
1430                         } else {
1431                                 DC_SETBIT(sc, DC_WATCHDOG, DC_WDOG_JABBERDIS);
1432                         }
1433                         DC_CLRBIT(sc, DC_NETCFG, (DC_NETCFG_PCS|
1434                             DC_NETCFG_PORTSEL|DC_NETCFG_SCRAMBLER));
1435                         if (sc->dc_type == DC_TYPE_98713)
1436                                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_PCS);
1437                         if (!DC_IS_DAVICOM(sc))
1438                                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_PORTSEL);
1439                         DC_CLRBIT(sc, DC_10BTCTRL, 0xFFFF);
1440                         if (DC_IS_INTEL(sc))
1441                                 dc_apply_fixup(sc, IFM_AUTO);
1442                 } else {
1443                         if (DC_IS_PNIC(sc)) {
1444                                 DC_PN_GPIO_CLRBIT(sc, DC_PN_GPIO_SPEEDSEL);
1445                                 DC_PN_GPIO_SETBIT(sc, DC_PN_GPIO_100TX_LOOP);
1446                                 DC_CLRBIT(sc, DC_PN_NWAY, DC_PN_NWAY_SPEEDSEL);
1447                         }
1448                         DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_PORTSEL);
1449                         DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_PCS);
1450                         DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_SCRAMBLER);
1451                         if (DC_IS_INTEL(sc)) {
1452                                 DC_CLRBIT(sc, DC_SIARESET, DC_SIA_RESET);
1453                                 DC_CLRBIT(sc, DC_10BTCTRL, 0xFFFF);
1454                                 if ((media & IFM_GMASK) == IFM_FDX)
1455                                         DC_SETBIT(sc, DC_10BTCTRL, 0x7F3D);
1456                                 else
1457                                         DC_SETBIT(sc, DC_10BTCTRL, 0x7F3F);
1458                                 DC_SETBIT(sc, DC_SIARESET, DC_SIA_RESET);
1459                                 DC_CLRBIT(sc, DC_10BTCTRL,
1460                                     DC_TCTL_AUTONEGENBL);
1461                                 dc_apply_fixup(sc,
1462                                     (media & IFM_GMASK) == IFM_FDX ?
1463                                     IFM_10_T|IFM_FDX : IFM_10_T);
1464                                 DELAY(20000);
1465                         }
1466                 }
1467         }
1468
1469         /*
1470          * If this is a Davicom DM9102A card with a DM9801 HomePNA
1471          * PHY and we want HomePNA mode, set the portsel bit to turn
1472          * on the external MII port.
1473          */
1474         if (DC_IS_DAVICOM(sc)) {
1475                 if (IFM_SUBTYPE(media) == IFM_HPNA_1) {
1476                         DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_PORTSEL);
1477                         sc->dc_link = 1;
1478                 } else {
1479                         DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_PORTSEL);
1480                 }
1481         }
1482
1483         if ((media & IFM_GMASK) == IFM_FDX) {
1484                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_FULLDUPLEX);
1485                 if (sc->dc_pmode == DC_PMODE_SYM && DC_IS_PNIC(sc))
1486                         DC_SETBIT(sc, DC_PN_NWAY, DC_PN_NWAY_DUPLEX);
1487         } else {
1488                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_FULLDUPLEX);
1489                 if (sc->dc_pmode == DC_PMODE_SYM && DC_IS_PNIC(sc))
1490                         DC_CLRBIT(sc, DC_PN_NWAY, DC_PN_NWAY_DUPLEX);
1491         }
1492
1493         if (restart)
1494                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_TX_ON|DC_NETCFG_RX_ON);
1495
1496         return;
1497 }
1498
1499 static void
1500 dc_reset(struct dc_softc *sc)
1501 {
1502         int             i;
1503
1504         DC_SETBIT(sc, DC_BUSCTL, DC_BUSCTL_RESET);
1505
1506         for (i = 0; i < DC_TIMEOUT; i++) {
1507                 DELAY(10);
1508                 if (!(CSR_READ_4(sc, DC_BUSCTL) & DC_BUSCTL_RESET))
1509                         break;
1510         }
1511
1512         if (DC_IS_ASIX(sc) || DC_IS_ADMTEK(sc) || DC_IS_XIRCOM(sc) ||
1513             DC_IS_CONEXANT(sc)) {
1514                 DELAY(10000);
1515                 DC_CLRBIT(sc, DC_BUSCTL, DC_BUSCTL_RESET);
1516                 i = 0;
1517         }
1518
1519         if (i == DC_TIMEOUT)
1520                 if_printf(&sc->arpcom.ac_if, "reset never completed!\n");
1521
1522         /* Wait a little while for the chip to get its brains in order. */
1523         DELAY(1000);
1524
1525         CSR_WRITE_4(sc, DC_IMR, 0x00000000);
1526         CSR_WRITE_4(sc, DC_BUSCTL, 0x00000000);
1527         CSR_WRITE_4(sc, DC_NETCFG, 0x00000000);
1528
1529         /*
1530          * Bring the SIA out of reset. In some cases, it looks
1531          * like failing to unreset the SIA soon enough gets it
1532          * into a state where it will never come out of reset
1533          * until we reset the whole chip again.
1534          */
1535         if (DC_IS_INTEL(sc)) {
1536                 DC_SETBIT(sc, DC_SIARESET, DC_SIA_RESET);
1537                 CSR_WRITE_4(sc, DC_10BTCTRL, 0);
1538                 CSR_WRITE_4(sc, DC_WATCHDOG, 0);
1539         }
1540
1541         return;
1542 }
1543
1544 static const struct dc_type *
1545 dc_devtype(device_t dev)
1546 {
1547         const struct dc_type    *t;
1548         u_int32_t               rev;
1549
1550         t = dc_devs;
1551
1552         while(t->dc_name != NULL) {
1553                 if ((pci_get_vendor(dev) == t->dc_vid) &&
1554                     (pci_get_device(dev) == t->dc_did)) {
1555                         /* Check the PCI revision */
1556                         rev = pci_get_revid(dev);
1557                         if (t->dc_did == DC_DEVICEID_98713 &&
1558                             rev >= DC_REVISION_98713A)
1559                                 t++;
1560                         if (t->dc_did == DC_DEVICEID_98713_CP &&
1561                             rev >= DC_REVISION_98713A)
1562                                 t++;
1563                         if (t->dc_did == DC_DEVICEID_987x5 &&
1564                             rev >= DC_REVISION_98715AEC_C)
1565                                 t++;
1566                         if (t->dc_did == DC_DEVICEID_987x5 &&
1567                             rev >= DC_REVISION_98725)
1568                                 t++;
1569                         if (t->dc_did == DC_DEVICEID_AX88140A &&
1570                             rev >= DC_REVISION_88141)
1571                                 t++;
1572                         if (t->dc_did == DC_DEVICEID_82C168 &&
1573                             rev >= DC_REVISION_82C169)
1574                                 t++;
1575                         if (t->dc_did == DC_DEVICEID_DM9102 &&
1576                             rev >= DC_REVISION_DM9102A)
1577                                 t++;
1578                         return(t);
1579                 }
1580                 t++;
1581         }
1582
1583         return(NULL);
1584 }
1585
1586 /*
1587  * Probe for a 21143 or clone chip. Check the PCI vendor and device
1588  * IDs against our list and return a device name if we find a match.
1589  * We do a little bit of extra work to identify the exact type of
1590  * chip. The MX98713 and MX98713A have the same PCI vendor/device ID,
1591  * but different revision IDs. The same is true for 98715/98715A
1592  * chips and the 98725, as well as the ASIX and ADMtek chips. In some
1593  * cases, the exact chip revision affects driver behavior.
1594  */
1595 static int
1596 dc_probe(device_t dev)
1597 {
1598         const struct dc_type *t;
1599
1600         t = dc_devtype(dev);
1601         if (t != NULL) {
1602                 struct dc_softc *sc = device_get_softc(dev);
1603
1604                 /* Need this info to decide on a chip type. */
1605                 sc->dc_info = t;
1606                 device_set_desc(dev, t->dc_name);
1607                 return(0);
1608         }
1609
1610         return(ENXIO);
1611 }
1612
1613 static void
1614 dc_acpi(device_t dev)
1615 {
1616         if (pci_get_powerstate(dev) != PCI_POWERSTATE_D0) {
1617                 uint32_t iobase, membase, irq;
1618                 struct dc_softc *sc;
1619
1620                 /* Save important PCI config data. */
1621                 iobase = pci_read_config(dev, DC_PCI_CFBIO, 4);
1622                 membase = pci_read_config(dev, DC_PCI_CFBMA, 4);
1623                 irq = pci_read_config(dev, DC_PCI_CFIT, 4);
1624
1625                 sc = device_get_softc(dev);
1626                 /* Reset the power state. */
1627                 if_printf(&sc->arpcom.ac_if,
1628                           "chip is in D%d power mode "
1629                           "-- setting to D0\n", pci_get_powerstate(dev));
1630                 pci_set_powerstate(dev, PCI_POWERSTATE_D0);
1631
1632                 /* Restore PCI config data. */
1633                 pci_write_config(dev, DC_PCI_CFBIO, iobase, 4);
1634                 pci_write_config(dev, DC_PCI_CFBMA, membase, 4);
1635                 pci_write_config(dev, DC_PCI_CFIT, irq, 4);
1636         }
1637 }
1638
1639 static void
1640 dc_apply_fixup(struct dc_softc *sc, int media)
1641 {
1642         struct dc_mediainfo     *m;
1643         u_int8_t                *p;
1644         int                     i;
1645         u_int32_t               reg;
1646
1647         m = sc->dc_mi;
1648
1649         while (m != NULL) {
1650                 if (m->dc_media == media)
1651                         break;
1652                 m = m->dc_next;
1653         }
1654
1655         if (m == NULL)
1656                 return;
1657
1658         for (i = 0, p = m->dc_reset_ptr; i < m->dc_reset_len; i++, p += 2) {
1659                 reg = (p[0] | (p[1] << 8)) << 16;
1660                 CSR_WRITE_4(sc, DC_WATCHDOG, reg);
1661         }
1662
1663         for (i = 0, p = m->dc_gp_ptr; i < m->dc_gp_len; i++, p += 2) {
1664                 reg = (p[0] | (p[1] << 8)) << 16;
1665                 CSR_WRITE_4(sc, DC_WATCHDOG, reg);
1666         }
1667
1668         return;
1669 }
1670
1671 static void
1672 dc_decode_leaf_sia(struct dc_softc *sc, struct dc_eblock_sia *l)
1673 {
1674         struct dc_mediainfo     *m;
1675
1676         m = kmalloc(sizeof(struct dc_mediainfo), M_DEVBUF, M_INTWAIT | M_ZERO);
1677         switch (l->dc_sia_code & ~DC_SIA_CODE_EXT){
1678         case DC_SIA_CODE_10BT:
1679                 m->dc_media = IFM_10_T;
1680                 break;
1681
1682         case DC_SIA_CODE_10BT_FDX:
1683                 m->dc_media = IFM_10_T|IFM_FDX;
1684                 break;
1685
1686         case DC_SIA_CODE_10B2:
1687                 m->dc_media = IFM_10_2;
1688                 break;
1689
1690         case DC_SIA_CODE_10B5:
1691                 m->dc_media = IFM_10_5;
1692                 break;
1693         }
1694         if (l->dc_sia_code & DC_SIA_CODE_EXT){
1695                 m->dc_gp_len = 2;
1696                 m->dc_gp_ptr = 
1697                   (u_int8_t *)&l->dc_un.dc_sia_ext.dc_sia_gpio_ctl;
1698         } else {
1699         m->dc_gp_len = 2;
1700         m->dc_gp_ptr =
1701                   (u_int8_t *)&l->dc_un.dc_sia_noext.dc_sia_gpio_ctl;
1702         }
1703
1704         m->dc_next = sc->dc_mi;
1705         sc->dc_mi = m;
1706
1707         sc->dc_pmode = DC_PMODE_SIA;
1708
1709         return;
1710 }
1711
1712 static void
1713 dc_decode_leaf_sym(struct dc_softc *sc, struct dc_eblock_sym *l)
1714 {
1715         struct dc_mediainfo     *m;
1716
1717         m = kmalloc(sizeof(struct dc_mediainfo), M_DEVBUF, M_INTWAIT | M_ZERO);
1718         if (l->dc_sym_code == DC_SYM_CODE_100BT)
1719                 m->dc_media = IFM_100_TX;
1720
1721         if (l->dc_sym_code == DC_SYM_CODE_100BT_FDX)
1722                 m->dc_media = IFM_100_TX|IFM_FDX;
1723
1724         m->dc_gp_len = 2;
1725         m->dc_gp_ptr = (u_int8_t *)&l->dc_sym_gpio_ctl;
1726
1727         m->dc_next = sc->dc_mi;
1728         sc->dc_mi = m;
1729
1730         sc->dc_pmode = DC_PMODE_SYM;
1731
1732         return;
1733 }
1734
1735 static void
1736 dc_decode_leaf_mii(struct dc_softc *sc, struct dc_eblock_mii *l)
1737 {
1738         u_int8_t                *p;
1739         struct dc_mediainfo     *m;
1740
1741         m = kmalloc(sizeof(struct dc_mediainfo), M_DEVBUF, M_INTWAIT | M_ZERO);
1742         /* We abuse IFM_AUTO to represent MII. */
1743         m->dc_media = IFM_AUTO;
1744         m->dc_gp_len = l->dc_gpr_len;
1745
1746         p = (u_int8_t *)l;
1747         p += sizeof(struct dc_eblock_mii);
1748         m->dc_gp_ptr = p;
1749         p += 2 * l->dc_gpr_len;
1750         m->dc_reset_len = *p;
1751         p++;
1752         m->dc_reset_ptr = p;
1753
1754         m->dc_next = sc->dc_mi;
1755         sc->dc_mi = m;
1756
1757         return;
1758 }
1759
1760 static void
1761 dc_read_srom(struct dc_softc *sc, int bits)
1762 {
1763         int size;
1764
1765         size = 2 << bits;
1766         sc->dc_srom = kmalloc(size, M_DEVBUF, M_INTWAIT);
1767         dc_read_eeprom(sc, (caddr_t)sc->dc_srom, 0, (size / 2), 0);
1768 }
1769
1770 static void
1771 dc_parse_21143_srom(struct dc_softc *sc)
1772 {
1773         struct dc_leaf_hdr      *lhdr;
1774         struct dc_eblock_hdr    *hdr;
1775         int                     i, loff;
1776         char                    *ptr;
1777         int                     have_mii;
1778
1779         have_mii = 0;
1780         loff = sc->dc_srom[27];
1781         lhdr = (struct dc_leaf_hdr *)&(sc->dc_srom[loff]);
1782
1783         ptr = (char *)lhdr;
1784         ptr += sizeof(struct dc_leaf_hdr) - 1;
1785         /*
1786          * Look if we got a MII media block.
1787          */
1788         for (i = 0; i < lhdr->dc_mcnt; i++) {
1789                 hdr = (struct dc_eblock_hdr *)ptr;
1790                 if (hdr->dc_type == DC_EBLOCK_MII)
1791                     have_mii++;
1792
1793                 ptr += (hdr->dc_len & 0x7F);
1794                 ptr++;
1795         }
1796
1797         /*
1798          * Do the same thing again. Only use SIA and SYM media
1799          * blocks if no MII media block is available.
1800          */
1801         ptr = (char *)lhdr;
1802         ptr += sizeof(struct dc_leaf_hdr) - 1;
1803         for (i = 0; i < lhdr->dc_mcnt; i++) {
1804                 hdr = (struct dc_eblock_hdr *)ptr;
1805                 switch(hdr->dc_type) {
1806                 case DC_EBLOCK_MII:
1807                         dc_decode_leaf_mii(sc, (struct dc_eblock_mii *)hdr);
1808                         break;
1809                 case DC_EBLOCK_SIA:
1810                         if (! have_mii)
1811                                 dc_decode_leaf_sia(sc,
1812                                     (struct dc_eblock_sia *)hdr);
1813                         break;
1814                 case DC_EBLOCK_SYM:
1815                         if (! have_mii)
1816                                 dc_decode_leaf_sym(sc,
1817                                     (struct dc_eblock_sym *)hdr);
1818                         break;
1819                 default:
1820                         /* Don't care. Yet. */
1821                         break;
1822                 }
1823                 ptr += (hdr->dc_len & 0x7F);
1824                 ptr++;
1825         }
1826
1827         return;
1828 }
1829
1830 /*
1831  * Attach the interface. Allocate softc structures, do ifmedia
1832  * setup and ethernet/BPF attach.
1833  */
1834 static int
1835 dc_attach(device_t dev)
1836 {
1837         int                     tmp = 0;
1838         u_char                  eaddr[ETHER_ADDR_LEN];
1839         u_int32_t               command;
1840         struct dc_softc         *sc;
1841         struct ifnet            *ifp;
1842         u_int32_t               revision;
1843         int                     error = 0, rid, mac_offset;
1844         uint8_t                 *mac;
1845
1846         sc = device_get_softc(dev);
1847         callout_init(&sc->dc_stat_timer);
1848
1849         ifp = &sc->arpcom.ac_if;
1850         if_initname(ifp, device_get_name(dev), device_get_unit(dev));
1851
1852         /*
1853          * Handle power management nonsense.
1854          */
1855         dc_acpi(dev);
1856
1857         /*
1858          * Map control/status registers.
1859          */
1860         pci_enable_busmaster(dev);
1861
1862         rid = DC_RID;
1863         sc->dc_res = bus_alloc_resource_any(dev, DC_RES, &rid, RF_ACTIVE);
1864
1865         if (sc->dc_res == NULL) {
1866                 device_printf(dev, "couldn't map ports/memory\n");
1867                 error = ENXIO;
1868                 goto fail;
1869         }
1870
1871         sc->dc_btag = rman_get_bustag(sc->dc_res);
1872         sc->dc_bhandle = rman_get_bushandle(sc->dc_res);
1873
1874         /* Allocate interrupt */
1875         rid = 0;
1876         sc->dc_irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &rid,
1877             RF_SHAREABLE | RF_ACTIVE);
1878
1879         if (sc->dc_irq == NULL) {
1880                 device_printf(dev, "couldn't map interrupt\n");
1881                 error = ENXIO;
1882                 goto fail;
1883         }
1884         
1885         revision = pci_get_revid(dev);
1886
1887         /* Get the eeprom width, but PNIC and XIRCOM have diff eeprom */
1888         if (sc->dc_info->dc_did != DC_DEVICEID_82C168 &&
1889             sc->dc_info->dc_did != DC_DEVICEID_X3201)
1890                 dc_eeprom_width(sc);
1891
1892         switch(sc->dc_info->dc_did) {
1893         case DC_DEVICEID_21143:
1894                 sc->dc_type = DC_TYPE_21143;
1895                 sc->dc_flags |= DC_TX_POLL|DC_TX_USE_TX_INTR;
1896                 sc->dc_flags |= DC_REDUCED_MII_POLL;
1897                 /* Save EEPROM contents so we can parse them later. */
1898                 dc_read_srom(sc, sc->dc_romwidth);
1899                 break;
1900         case DC_DEVICEID_DM9009:
1901         case DC_DEVICEID_DM9100:
1902         case DC_DEVICEID_DM9102:
1903                 sc->dc_type = DC_TYPE_DM9102;
1904                 sc->dc_flags |= DC_TX_COALESCE|DC_TX_INTR_ALWAYS;
1905                 sc->dc_flags |= DC_REDUCED_MII_POLL|DC_TX_STORENFWD;
1906                 sc->dc_flags |= DC_TX_ALIGN;
1907                 sc->dc_pmode = DC_PMODE_MII;
1908                 /* Increase the latency timer value. */
1909                 command = pci_read_config(dev, DC_PCI_CFLT, 4);
1910                 command &= 0xFFFF00FF;
1911                 command |= 0x00008000;
1912                 pci_write_config(dev, DC_PCI_CFLT, command, 4);
1913                 break;
1914         case DC_DEVICEID_AL981:
1915                 sc->dc_type = DC_TYPE_AL981;
1916                 sc->dc_flags |= DC_TX_USE_TX_INTR;
1917                 sc->dc_flags |= DC_TX_ADMTEK_WAR;
1918                 sc->dc_pmode = DC_PMODE_MII;
1919                 dc_read_srom(sc, sc->dc_romwidth);
1920                 break;
1921         case DC_DEVICEID_AN985:
1922         case DC_DEVICEID_FE2500:
1923         case DC_DEVICEID_ADM9511:
1924         case DC_DEVICEID_ADM9513:
1925         case DC_DEVICEID_FA511:
1926         case DC_DEVICEID_EN2242:
1927         case DC_DEVICEID_3CSOHOB:
1928                 sc->dc_type = DC_TYPE_AN985;
1929                 sc->dc_flags |= DC_64BIT_HASH;
1930                 sc->dc_flags |= DC_TX_USE_TX_INTR;
1931                 sc->dc_flags |= DC_TX_ADMTEK_WAR;
1932                 sc->dc_pmode = DC_PMODE_MII;
1933                 break;
1934         case DC_DEVICEID_98713:
1935         case DC_DEVICEID_98713_CP:
1936                 if (revision < DC_REVISION_98713A) {
1937                         sc->dc_type = DC_TYPE_98713;
1938                 }
1939                 if (revision >= DC_REVISION_98713A) {
1940                         sc->dc_type = DC_TYPE_98713A;
1941                         sc->dc_flags |= DC_21143_NWAY;
1942                 }
1943                 sc->dc_flags |= DC_REDUCED_MII_POLL;
1944                 sc->dc_flags |= DC_TX_POLL|DC_TX_USE_TX_INTR;
1945                 break;
1946         case DC_DEVICEID_987x5:
1947         case DC_DEVICEID_EN1217:
1948                 /*
1949                  * Macronix MX98715AEC-C/D/E parts have only a
1950                  * 128-bit hash table. We need to deal with these
1951                  * in the same manner as the PNIC II so that we
1952                  * get the right number of bits out of the
1953                  * CRC routine.
1954                  */
1955                 if (revision >= DC_REVISION_98715AEC_C &&
1956                     revision < DC_REVISION_98725)
1957                         sc->dc_flags |= DC_128BIT_HASH;
1958                 sc->dc_type = DC_TYPE_987x5;
1959                 sc->dc_flags |= DC_TX_POLL|DC_TX_USE_TX_INTR;
1960                 sc->dc_flags |= DC_REDUCED_MII_POLL|DC_21143_NWAY;
1961                 break;
1962         case DC_DEVICEID_98727:
1963                 sc->dc_type = DC_TYPE_987x5;
1964                 sc->dc_flags |= DC_TX_POLL|DC_TX_USE_TX_INTR;
1965                 sc->dc_flags |= DC_REDUCED_MII_POLL|DC_21143_NWAY;
1966                 break;
1967         case DC_DEVICEID_82C115:
1968                 sc->dc_type = DC_TYPE_PNICII;
1969                 sc->dc_flags |= DC_TX_POLL|DC_TX_USE_TX_INTR|DC_128BIT_HASH;
1970                 sc->dc_flags |= DC_REDUCED_MII_POLL|DC_21143_NWAY;
1971                 break;
1972         case DC_DEVICEID_82C168:
1973                 sc->dc_type = DC_TYPE_PNIC;
1974                 sc->dc_flags |= DC_TX_STORENFWD|DC_TX_INTR_ALWAYS;
1975                 sc->dc_flags |= DC_PNIC_RX_BUG_WAR;
1976                 sc->dc_pnic_rx_buf = kmalloc(DC_RXLEN * 5, M_DEVBUF, M_WAITOK);
1977                 if (revision < DC_REVISION_82C169)
1978                         sc->dc_pmode = DC_PMODE_SYM;
1979                 break;
1980         case DC_DEVICEID_AX88140A:
1981                 sc->dc_type = DC_TYPE_ASIX;
1982                 sc->dc_flags |= DC_TX_USE_TX_INTR|DC_TX_INTR_FIRSTFRAG;
1983                 sc->dc_flags |= DC_REDUCED_MII_POLL;
1984                 sc->dc_pmode = DC_PMODE_MII;
1985                 break;
1986         case DC_DEVICEID_RS7112:
1987                 sc->dc_type = DC_TYPE_CONEXANT;
1988                 sc->dc_flags |= DC_TX_INTR_ALWAYS;
1989                 sc->dc_flags |= DC_REDUCED_MII_POLL;
1990                 sc->dc_pmode = DC_PMODE_MII;
1991                 dc_read_srom(sc, sc->dc_romwidth);
1992                 break;
1993         case DC_DEVICEID_X3201:
1994                 sc->dc_type = DC_TYPE_XIRCOM;
1995                 sc->dc_flags |= (DC_TX_INTR_ALWAYS | DC_TX_COALESCE |
1996                                  DC_TX_ALIGN);
1997                 /*
1998                  * We don't actually need to coalesce, but we're doing
1999                  * it to obtain a double word aligned buffer.
2000                  * The DC_TX_COALESCE flag is required.
2001                  */
2002                 sc->dc_pmode = DC_PMODE_MII;
2003                 break;
2004         default:
2005                 device_printf(dev, "unknown device: %x\n", sc->dc_info->dc_did);
2006                 break;
2007         }
2008
2009         /* Save the cache line size. */
2010         if (DC_IS_DAVICOM(sc))
2011                 sc->dc_cachesize = 0;
2012         else
2013                 sc->dc_cachesize = pci_read_config(dev,
2014                     DC_PCI_CFLT, 4) & 0xFF;
2015
2016         /* Reset the adapter. */
2017         dc_reset(sc);
2018
2019         /* Take 21143 out of snooze mode */
2020         if (DC_IS_INTEL(sc) || DC_IS_XIRCOM(sc)) {
2021                 command = pci_read_config(dev, DC_PCI_CFDD, 4);
2022                 command &= ~(DC_CFDD_SNOOZE_MODE|DC_CFDD_SLEEP_MODE);
2023                 pci_write_config(dev, DC_PCI_CFDD, command, 4);
2024         }
2025
2026         /*
2027          * Try to learn something about the supported media.
2028          * We know that ASIX and ADMtek and Davicom devices
2029          * will *always* be using MII media, so that's a no-brainer.
2030          * The tricky ones are the Macronix/PNIC II and the
2031          * Intel 21143.
2032          */
2033         if (DC_IS_INTEL(sc))
2034                 dc_parse_21143_srom(sc);
2035         else if (DC_IS_MACRONIX(sc) || DC_IS_PNICII(sc)) {
2036                 if (sc->dc_type == DC_TYPE_98713)
2037                         sc->dc_pmode = DC_PMODE_MII;
2038                 else
2039                         sc->dc_pmode = DC_PMODE_SYM;
2040         } else if (!sc->dc_pmode)
2041                 sc->dc_pmode = DC_PMODE_MII;
2042
2043         /*
2044          * Get station address from the EEPROM.
2045          */
2046         switch(sc->dc_type) {
2047         case DC_TYPE_98713:
2048         case DC_TYPE_98713A:
2049         case DC_TYPE_987x5:
2050         case DC_TYPE_PNICII:
2051                 dc_read_eeprom(sc, (caddr_t)&mac_offset,
2052                     (DC_EE_NODEADDR_OFFSET / 2), 1, 0);
2053                 dc_read_eeprom(sc, (caddr_t)&eaddr, (mac_offset / 2), 3, 0);
2054                 break;
2055         case DC_TYPE_PNIC:
2056                 dc_read_eeprom(sc, (caddr_t)&eaddr, 0, 3, 1);
2057                 break;
2058         case DC_TYPE_DM9102:
2059         case DC_TYPE_21143:
2060         case DC_TYPE_ASIX:
2061                 dc_read_eeprom(sc, (caddr_t)&eaddr, DC_EE_NODEADDR, 3, 0);
2062                 break;
2063         case DC_TYPE_AL981:
2064         case DC_TYPE_AN985:
2065                 *(u_int32_t *)(&eaddr[0]) = CSR_READ_4(sc,DC_AL_PAR0);
2066                 *(u_int16_t *)(&eaddr[4]) = CSR_READ_4(sc,DC_AL_PAR1);
2067                 break;
2068         case DC_TYPE_CONEXANT:
2069                 bcopy(sc->dc_srom + DC_CONEXANT_EE_NODEADDR, &eaddr, 6);
2070                 break;
2071         case DC_TYPE_XIRCOM:
2072                 /* The MAC comes from the CIS */
2073                 mac = pci_get_ether(dev);
2074                 if (!mac) {
2075                         device_printf(dev, "No station address in CIS!\n");
2076                         error = ENXIO;
2077                         goto fail;
2078                 }
2079                 bcopy(mac, eaddr, ETHER_ADDR_LEN);
2080                 break;
2081         default:
2082                 dc_read_eeprom(sc, (caddr_t)&eaddr, DC_EE_NODEADDR, 3, 0);
2083                 break;
2084         }
2085
2086         sc->dc_ldata = contigmalloc(sizeof(struct dc_list_data), M_DEVBUF,
2087             M_WAITOK | M_ZERO, 0, 0xffffffff, PAGE_SIZE, 0);
2088
2089         if (sc->dc_ldata == NULL) {
2090                 device_printf(dev, "no memory for list buffers!\n");
2091                 error = ENXIO;
2092                 goto fail;
2093         }
2094
2095         ifp->if_softc = sc;
2096         ifp->if_mtu = ETHERMTU;
2097         ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
2098         ifp->if_ioctl = dc_ioctl;
2099         ifp->if_start = dc_start;
2100 #ifdef IFPOLL_ENABLE
2101         ifp->if_npoll = dc_npoll;
2102 #endif
2103         ifp->if_watchdog = dc_watchdog;
2104         ifp->if_init = dc_init;
2105         ifp->if_baudrate = 10000000;
2106         ifq_set_maxlen(&ifp->if_snd, DC_TX_LIST_CNT - 1);
2107         ifq_set_ready(&ifp->if_snd);
2108
2109         /*
2110          * Do MII setup. If this is a 21143, check for a PHY on the
2111          * MII bus after applying any necessary fixups to twiddle the
2112          * GPIO bits. If we don't end up finding a PHY, restore the
2113          * old selection (SIA only or SIA/SYM) and attach the dcphy
2114          * driver instead.
2115          */
2116         if (DC_IS_INTEL(sc)) {
2117                 dc_apply_fixup(sc, IFM_AUTO);
2118                 tmp = sc->dc_pmode;
2119                 sc->dc_pmode = DC_PMODE_MII;
2120         }
2121
2122         /*
2123          * Setup General Purpose port mode and data so the tulip can talk
2124          * to the MII.  This needs to be done before mii_phy_probe so that
2125          * we can actually see them.
2126          */
2127         if (DC_IS_XIRCOM(sc)) {
2128                 CSR_WRITE_4(sc, DC_SIAGP, DC_SIAGP_WRITE_EN | DC_SIAGP_INT1_EN |
2129                     DC_SIAGP_MD_GP2_OUTPUT | DC_SIAGP_MD_GP0_OUTPUT);
2130                 DELAY(10);
2131                 CSR_WRITE_4(sc, DC_SIAGP, DC_SIAGP_INT1_EN |
2132                     DC_SIAGP_MD_GP2_OUTPUT | DC_SIAGP_MD_GP0_OUTPUT);
2133                 DELAY(10);
2134         }
2135
2136         error = mii_phy_probe(dev, &sc->dc_miibus,
2137             dc_ifmedia_upd, dc_ifmedia_sts);
2138
2139         if (error && DC_IS_INTEL(sc)) {
2140                 sc->dc_pmode = tmp;
2141                 if (sc->dc_pmode != DC_PMODE_SIA)
2142                         sc->dc_pmode = DC_PMODE_SYM;
2143                 sc->dc_flags |= DC_21143_NWAY;
2144                 mii_phy_probe(dev, &sc->dc_miibus,
2145                     dc_ifmedia_upd, dc_ifmedia_sts);
2146                 /*
2147                  * For non-MII cards, we need to have the 21143
2148                  * drive the LEDs. Except there are some systems
2149                  * like the NEC VersaPro NoteBook PC which have no
2150                  * LEDs, and twiddling these bits has adverse effects
2151                  * on them. (I.e. you suddenly can't get a link.)
2152                  */
2153                 if (pci_read_config(dev, DC_PCI_CSID, 4) != 0x80281033)
2154                         sc->dc_flags |= DC_TULIP_LEDS;
2155                 error = 0;
2156         }
2157
2158         if (error) {
2159                 device_printf(dev, "MII without any PHY!\n");
2160                 error = ENXIO;
2161                 goto fail;
2162         }
2163
2164         /*
2165          * Call MI attach routine.
2166          */
2167         ether_ifattach(ifp, eaddr, NULL);
2168
2169         if (DC_IS_ADMTEK(sc)) {
2170                 /*
2171                  * Set automatic TX underrun recovery for the ADMtek chips
2172                  */
2173                 DC_SETBIT(sc, DC_AL_CR, DC_AL_CR_ATUR);
2174         }
2175
2176         /*
2177          * Tell the upper layer(s) we support long frames.
2178          */
2179         ifp->if_data.ifi_hdrlen = sizeof(struct ether_vlan_header);
2180
2181         error = bus_setup_intr(dev, sc->dc_irq, INTR_MPSAFE,
2182                                dc_intr, sc, &sc->dc_intrhand, 
2183                                ifp->if_serializer);
2184         if (error) {
2185                 ether_ifdetach(ifp);
2186                 device_printf(dev, "couldn't set up irq\n");
2187                 goto fail;
2188         }
2189
2190         ifp->if_cpuid = rman_get_cpuid(sc->dc_irq);
2191         KKASSERT(ifp->if_cpuid >= 0 && ifp->if_cpuid < ncpus);
2192
2193         return(0);
2194
2195 fail:
2196         dc_detach(dev);
2197         return(error);
2198 }
2199
2200 static int
2201 dc_detach(device_t dev)
2202 {
2203         struct dc_softc *sc = device_get_softc(dev);
2204         struct ifnet *ifp = &sc->arpcom.ac_if;
2205         struct dc_mediainfo *m;
2206
2207         if (device_is_attached(dev)) {
2208                 lwkt_serialize_enter(ifp->if_serializer);
2209                 dc_stop(sc);
2210                 bus_teardown_intr(dev, sc->dc_irq, sc->dc_intrhand);
2211                 lwkt_serialize_exit(ifp->if_serializer);
2212
2213                 ether_ifdetach(ifp);
2214         }
2215
2216         if (sc->dc_miibus)
2217                 device_delete_child(dev, sc->dc_miibus);
2218         bus_generic_detach(dev);
2219
2220         if (sc->dc_irq)
2221                 bus_release_resource(dev, SYS_RES_IRQ, 0, sc->dc_irq);
2222         if (sc->dc_res)
2223                 bus_release_resource(dev, DC_RES, DC_RID, sc->dc_res);
2224
2225         if (sc->dc_ldata)
2226                 contigfree(sc->dc_ldata, sizeof(struct dc_list_data), M_DEVBUF);
2227         if (sc->dc_pnic_rx_buf != NULL)
2228                 kfree(sc->dc_pnic_rx_buf, M_DEVBUF);
2229
2230         while (sc->dc_mi != NULL) {
2231                 m = sc->dc_mi->dc_next;
2232                 kfree(sc->dc_mi, M_DEVBUF);
2233                 sc->dc_mi = m;
2234         }
2235
2236         if (sc->dc_srom)
2237                 kfree(sc->dc_srom, M_DEVBUF);
2238
2239         return(0);
2240 }
2241
2242 /*
2243  * Initialize the transmit descriptors.
2244  */
2245 static int
2246 dc_list_tx_init(struct dc_softc *sc)
2247 {
2248         struct dc_chain_data    *cd;
2249         struct dc_list_data     *ld;
2250         int                     i;
2251
2252         cd = &sc->dc_cdata;
2253         ld = sc->dc_ldata;
2254         for (i = 0; i < DC_TX_LIST_CNT; i++) {
2255                 if (i == (DC_TX_LIST_CNT - 1)) {
2256                         ld->dc_tx_list[i].dc_next =
2257                             vtophys(&ld->dc_tx_list[0]);
2258                 } else {
2259                         ld->dc_tx_list[i].dc_next =
2260                             vtophys(&ld->dc_tx_list[i + 1]);
2261                 }
2262                 cd->dc_tx_chain[i] = NULL;
2263                 ld->dc_tx_list[i].dc_data = 0;
2264                 ld->dc_tx_list[i].dc_ctl = 0;
2265         }
2266
2267         cd->dc_tx_prod = cd->dc_tx_cons = cd->dc_tx_cnt = 0;
2268
2269         return(0);
2270 }
2271
2272
2273 /*
2274  * Initialize the RX descriptors and allocate mbufs for them. Note that
2275  * we arrange the descriptors in a closed ring, so that the last descriptor
2276  * points back to the first.
2277  */
2278 static int
2279 dc_list_rx_init(struct dc_softc *sc)
2280 {
2281         struct dc_chain_data    *cd;
2282         struct dc_list_data     *ld;
2283         int                     i;
2284
2285         cd = &sc->dc_cdata;
2286         ld = sc->dc_ldata;
2287
2288         for (i = 0; i < DC_RX_LIST_CNT; i++) {
2289                 if (dc_newbuf(sc, i, NULL) == ENOBUFS)
2290                         return(ENOBUFS);
2291                 if (i == (DC_RX_LIST_CNT - 1)) {
2292                         ld->dc_rx_list[i].dc_next =
2293                             vtophys(&ld->dc_rx_list[0]);
2294                 } else {
2295                         ld->dc_rx_list[i].dc_next =
2296                             vtophys(&ld->dc_rx_list[i + 1]);
2297                 }
2298         }
2299
2300         cd->dc_rx_prod = 0;
2301
2302         return(0);
2303 }
2304
2305 /*
2306  * Initialize an RX descriptor and attach an MBUF cluster.
2307  */
2308 static int
2309 dc_newbuf(struct dc_softc *sc, int i, struct mbuf *m)
2310 {
2311         struct mbuf             *m_new = NULL;
2312         struct dc_desc          *c;
2313
2314         c = &sc->dc_ldata->dc_rx_list[i];
2315
2316         if (m == NULL) {
2317                 m_new = m_getcl(MB_DONTWAIT, MT_DATA, M_PKTHDR);
2318                 if (m_new == NULL)
2319                         return (ENOBUFS);
2320                 m_new->m_len = m_new->m_pkthdr.len = MCLBYTES;
2321         } else {
2322                 m_new = m;
2323                 m_new->m_len = m_new->m_pkthdr.len = MCLBYTES;
2324                 m_new->m_data = m_new->m_ext.ext_buf;
2325         }
2326
2327         m_adj(m_new, sizeof(u_int64_t));
2328
2329         /*
2330          * If this is a PNIC chip, zero the buffer. This is part
2331          * of the workaround for the receive bug in the 82c168 and
2332          * 82c169 chips.
2333          */
2334         if (sc->dc_flags & DC_PNIC_RX_BUG_WAR)
2335                 bzero((char *)mtod(m_new, char *), m_new->m_len);
2336
2337         sc->dc_cdata.dc_rx_chain[i] = m_new;
2338         c->dc_data = vtophys(mtod(m_new, caddr_t));
2339         c->dc_ctl = DC_RXCTL_RLINK | DC_RXLEN;
2340         c->dc_status = DC_RXSTAT_OWN;
2341
2342         return(0);
2343 }
2344
2345 /*
2346  * Grrrrr.
2347  * The PNIC chip has a terrible bug in it that manifests itself during
2348  * periods of heavy activity. The exact mode of failure if difficult to
2349  * pinpoint: sometimes it only happens in promiscuous mode, sometimes it
2350  * will happen on slow machines. The bug is that sometimes instead of
2351  * uploading one complete frame during reception, it uploads what looks
2352  * like the entire contents of its FIFO memory. The frame we want is at
2353  * the end of the whole mess, but we never know exactly how much data has
2354  * been uploaded, so salvaging the frame is hard.
2355  *
2356  * There is only one way to do it reliably, and it's disgusting.
2357  * Here's what we know:
2358  *
2359  * - We know there will always be somewhere between one and three extra
2360  *   descriptors uploaded.
2361  *
2362  * - We know the desired received frame will always be at the end of the
2363  *   total data upload.
2364  *
2365  * - We know the size of the desired received frame because it will be
2366  *   provided in the length field of the status word in the last descriptor.
2367  *
2368  * Here's what we do:
2369  *
2370  * - When we allocate buffers for the receive ring, we bzero() them.
2371  *   This means that we know that the buffer contents should be all
2372  *   zeros, except for data uploaded by the chip.
2373  *
2374  * - We also force the PNIC chip to upload frames that include the
2375  *   ethernet CRC at the end.
2376  *
2377  * - We gather all of the bogus frame data into a single buffer.
2378  *
2379  * - We then position a pointer at the end of this buffer and scan
2380  *   backwards until we encounter the first non-zero byte of data.
2381  *   This is the end of the received frame. We know we will encounter
2382  *   some data at the end of the frame because the CRC will always be
2383  *   there, so even if the sender transmits a packet of all zeros,
2384  *   we won't be fooled.
2385  *
2386  * - We know the size of the actual received frame, so we subtract
2387  *   that value from the current pointer location. This brings us
2388  *   to the start of the actual received packet.
2389  *
2390  * - We copy this into an mbuf and pass it on, along with the actual
2391  *   frame length.
2392  *
2393  * The performance hit is tremendous, but it beats dropping frames all
2394  * the time.
2395  */
2396
2397 #define DC_WHOLEFRAME   (DC_RXSTAT_FIRSTFRAG|DC_RXSTAT_LASTFRAG)
2398 static void
2399 dc_pnic_rx_bug_war(struct dc_softc *sc, int idx)
2400 {
2401         struct dc_desc          *cur_rx;
2402         struct dc_desc          *c = NULL;
2403         struct mbuf             *m = NULL;
2404         unsigned char           *ptr;
2405         int                     i, total_len;
2406         u_int32_t               rxstat = 0;
2407
2408         i = sc->dc_pnic_rx_bug_save;
2409         cur_rx = &sc->dc_ldata->dc_rx_list[idx];
2410         ptr = sc->dc_pnic_rx_buf;
2411         bzero(ptr, DC_RXLEN * 5);
2412
2413         /* Copy all the bytes from the bogus buffers. */
2414         while (1) {
2415                 c = &sc->dc_ldata->dc_rx_list[i];
2416                 rxstat = c->dc_status;
2417                 m = sc->dc_cdata.dc_rx_chain[i];
2418                 bcopy(mtod(m, char *), ptr, DC_RXLEN);
2419                 ptr += DC_RXLEN;
2420                 /* If this is the last buffer, break out. */
2421                 if (i == idx || rxstat & DC_RXSTAT_LASTFRAG)
2422                         break;
2423                 dc_newbuf(sc, i, m);
2424                 DC_INC(i, DC_RX_LIST_CNT);
2425         }
2426
2427         /* Find the length of the actual receive frame. */
2428         total_len = DC_RXBYTES(rxstat);
2429
2430         /* Scan backwards until we hit a non-zero byte. */
2431         while(*ptr == 0x00)
2432                 ptr--;
2433
2434         /* Round off. */
2435         if ((uintptr_t)(ptr) & 0x3)
2436                 ptr -= 1;
2437
2438         /* Now find the start of the frame. */
2439         ptr -= total_len;
2440         if (ptr < sc->dc_pnic_rx_buf)
2441                 ptr = sc->dc_pnic_rx_buf;
2442
2443         /*
2444          * Now copy the salvaged frame to the last mbuf and fake up
2445          * the status word to make it look like a successful
2446          * frame reception.
2447          */
2448         dc_newbuf(sc, i, m);
2449         bcopy(ptr, mtod(m, char *), total_len); 
2450         cur_rx->dc_status = rxstat | DC_RXSTAT_FIRSTFRAG;
2451
2452         return;
2453 }
2454
2455 /*
2456  * This routine searches the RX ring for dirty descriptors in the
2457  * event that the rxeof routine falls out of sync with the chip's
2458  * current descriptor pointer. This may happen sometimes as a result
2459  * of a "no RX buffer available" condition that happens when the chip
2460  * consumes all of the RX buffers before the driver has a chance to
2461  * process the RX ring. This routine may need to be called more than
2462  * once to bring the driver back in sync with the chip, however we
2463  * should still be getting RX DONE interrupts to drive the search
2464  * for new packets in the RX ring, so we should catch up eventually.
2465  */
2466 static int
2467 dc_rx_resync(struct dc_softc *sc)
2468 {
2469         int                     i, pos;
2470         struct dc_desc          *cur_rx;
2471
2472         pos = sc->dc_cdata.dc_rx_prod;
2473
2474         for (i = 0; i < DC_RX_LIST_CNT; i++) {
2475                 cur_rx = &sc->dc_ldata->dc_rx_list[pos];
2476                 if (!(cur_rx->dc_status & DC_RXSTAT_OWN))
2477                         break;
2478                 DC_INC(pos, DC_RX_LIST_CNT);
2479         }
2480
2481         /* If the ring really is empty, then just return. */
2482         if (i == DC_RX_LIST_CNT)
2483                 return(0);
2484
2485         /* We've fallen behing the chip: catch it. */
2486         sc->dc_cdata.dc_rx_prod = pos;
2487
2488         return(EAGAIN);
2489 }
2490
2491 /*
2492  * A frame has been uploaded: pass the resulting mbuf chain up to
2493  * the higher level protocols.
2494  */
2495 static void
2496 dc_rxeof(struct dc_softc *sc)
2497 {
2498         struct mbuf             *m;
2499         struct ifnet            *ifp;
2500         struct dc_desc          *cur_rx;
2501         int                     i, total_len = 0;
2502         u_int32_t               rxstat;
2503
2504         ifp = &sc->arpcom.ac_if;
2505         i = sc->dc_cdata.dc_rx_prod;
2506
2507         while(!(sc->dc_ldata->dc_rx_list[i].dc_status & DC_RXSTAT_OWN)) {
2508
2509 #ifdef IFPOLL_ENABLE
2510                 if (ifp->if_flags & IFF_NPOLLING) {
2511                         if (sc->rxcycles <= 0)
2512                                 break;
2513                         sc->rxcycles--;
2514                 }
2515 #endif /* IFPOLL_ENABLE */
2516                 cur_rx = &sc->dc_ldata->dc_rx_list[i];
2517                 rxstat = cur_rx->dc_status;
2518                 m = sc->dc_cdata.dc_rx_chain[i];
2519                 total_len = DC_RXBYTES(rxstat);
2520
2521                 if (sc->dc_flags & DC_PNIC_RX_BUG_WAR) {
2522                         if ((rxstat & DC_WHOLEFRAME) != DC_WHOLEFRAME) {
2523                                 if (rxstat & DC_RXSTAT_FIRSTFRAG)
2524                                         sc->dc_pnic_rx_bug_save = i;
2525                                 if ((rxstat & DC_RXSTAT_LASTFRAG) == 0) {
2526                                         DC_INC(i, DC_RX_LIST_CNT);
2527                                         continue;
2528                                 }
2529                                 dc_pnic_rx_bug_war(sc, i);
2530                                 rxstat = cur_rx->dc_status;
2531                                 total_len = DC_RXBYTES(rxstat);
2532                         }
2533                 }
2534
2535                 sc->dc_cdata.dc_rx_chain[i] = NULL;
2536
2537                 /*
2538                  * If an error occurs, update stats, clear the
2539                  * status word and leave the mbuf cluster in place:
2540                  * it should simply get re-used next time this descriptor
2541                  * comes up in the ring.  However, don't report long
2542                  * frames as errors since they could be vlans
2543                  */
2544                 if ((rxstat & DC_RXSTAT_RXERR)){ 
2545                         if (!(rxstat & DC_RXSTAT_GIANT) ||
2546                             (rxstat & (DC_RXSTAT_CRCERR | DC_RXSTAT_DRIBBLE |
2547                                        DC_RXSTAT_MIIERE | DC_RXSTAT_COLLSEEN |
2548                                        DC_RXSTAT_RUNT   | DC_RXSTAT_DE))) {
2549                                 ifp->if_ierrors++;
2550                                 if (rxstat & DC_RXSTAT_COLLSEEN)
2551                                         ifp->if_collisions++;
2552                                 dc_newbuf(sc, i, m);
2553                                 if (rxstat & DC_RXSTAT_CRCERR) {
2554                                         DC_INC(i, DC_RX_LIST_CNT);
2555                                         continue;
2556                                 } else {
2557                                         dc_init(sc);
2558                                         return;
2559                                 }
2560                         }
2561                 }
2562
2563                 /* No errors; receive the packet. */    
2564                 total_len -= ETHER_CRC_LEN;
2565
2566 #ifdef __i386__
2567                 /*
2568                  * On the x86 we do not have alignment problems, so try to
2569                  * allocate a new buffer for the receive ring, and pass up
2570                  * the one where the packet is already, saving the expensive
2571                  * copy done in m_devget().
2572                  * If we are on an architecture with alignment problems, or
2573                  * if the allocation fails, then use m_devget and leave the
2574                  * existing buffer in the receive ring.
2575                  */
2576                 if (dc_quick && dc_newbuf(sc, i, NULL) == 0) {
2577                         m->m_pkthdr.rcvif = ifp;
2578                         m->m_pkthdr.len = m->m_len = total_len;
2579                         DC_INC(i, DC_RX_LIST_CNT);
2580                 } else
2581 #endif
2582                 {
2583                         struct mbuf *m0;
2584
2585                         m0 = m_devget(mtod(m, char *) - ETHER_ALIGN,
2586                             total_len + ETHER_ALIGN, 0, ifp, NULL);
2587                         dc_newbuf(sc, i, m);
2588                         DC_INC(i, DC_RX_LIST_CNT);
2589                         if (m0 == NULL) {
2590                                 ifp->if_ierrors++;
2591                                 continue;
2592                         }
2593                         m_adj(m0, ETHER_ALIGN);
2594                         m = m0;
2595                 }
2596
2597                 ifp->if_ipackets++;
2598                 ifp->if_input(ifp, m);
2599         }
2600
2601         sc->dc_cdata.dc_rx_prod = i;
2602 }
2603
2604 /*
2605  * A frame was downloaded to the chip. It's safe for us to clean up
2606  * the list buffers.
2607  */
2608
2609 static void
2610 dc_txeof(struct dc_softc *sc)
2611 {
2612         struct dc_desc          *cur_tx = NULL;
2613         struct ifnet            *ifp;
2614         int                     idx;
2615
2616         ifp = &sc->arpcom.ac_if;
2617
2618         /*
2619          * Go through our tx list and free mbufs for those
2620          * frames that have been transmitted.
2621          */
2622         idx = sc->dc_cdata.dc_tx_cons;
2623         while(idx != sc->dc_cdata.dc_tx_prod) {
2624                 u_int32_t               txstat;
2625
2626                 cur_tx = &sc->dc_ldata->dc_tx_list[idx];
2627                 txstat = cur_tx->dc_status;
2628
2629                 if (txstat & DC_TXSTAT_OWN)
2630                         break;
2631
2632                 if (!(cur_tx->dc_ctl & DC_TXCTL_LASTFRAG) ||
2633                     cur_tx->dc_ctl & DC_TXCTL_SETUP) {
2634                         if (cur_tx->dc_ctl & DC_TXCTL_SETUP) {
2635                                 /*
2636                                  * Yes, the PNIC is so brain damaged
2637                                  * that it will sometimes generate a TX
2638                                  * underrun error while DMAing the RX
2639                                  * filter setup frame. If we detect this,
2640                                  * we have to send the setup frame again,
2641                                  * or else the filter won't be programmed
2642                                  * correctly.
2643                                  */
2644                                 if (DC_IS_PNIC(sc)) {
2645                                         if (txstat & DC_TXSTAT_ERRSUM)
2646                                                 dc_setfilt(sc);
2647                                 }
2648                                 sc->dc_cdata.dc_tx_chain[idx] = NULL;
2649                         }
2650                         sc->dc_cdata.dc_tx_cnt--;
2651                         DC_INC(idx, DC_TX_LIST_CNT);
2652                         continue;
2653                 }
2654
2655                 if (DC_IS_XIRCOM(sc) || DC_IS_CONEXANT(sc)) {
2656                         /*
2657                          * XXX: Why does my Xircom taunt me so?
2658                          * For some reason Conexant chips like
2659                          * setting the CARRLOST flag even when
2660                          * the carrier is there. In CURRENT we
2661                          * have the same problem for Xircom
2662                          * cards !
2663                          */
2664                         if (/*sc->dc_type == DC_TYPE_21143 &&*/
2665                             sc->dc_pmode == DC_PMODE_MII &&
2666                             ((txstat & 0xFFFF) & ~(DC_TXSTAT_ERRSUM|
2667                             DC_TXSTAT_NOCARRIER)))
2668                                 txstat &= ~DC_TXSTAT_ERRSUM;
2669                 } else {
2670                         if (/*sc->dc_type == DC_TYPE_21143 &&*/
2671                             sc->dc_pmode == DC_PMODE_MII &&
2672                             ((txstat & 0xFFFF) & ~(DC_TXSTAT_ERRSUM|
2673                             DC_TXSTAT_NOCARRIER|DC_TXSTAT_CARRLOST)))
2674                                 txstat &= ~DC_TXSTAT_ERRSUM;
2675                 }
2676
2677                 if (txstat & DC_TXSTAT_ERRSUM) {
2678                         ifp->if_oerrors++;
2679                         if (txstat & DC_TXSTAT_EXCESSCOLL)
2680                                 ifp->if_collisions++;
2681                         if (txstat & DC_TXSTAT_LATECOLL)
2682                                 ifp->if_collisions++;
2683                         if (!(txstat & DC_TXSTAT_UNDERRUN)) {
2684                                 dc_init(sc);
2685                                 return;
2686                         }
2687                 }
2688
2689                 ifp->if_collisions += (txstat & DC_TXSTAT_COLLCNT) >> 3;
2690
2691                 ifp->if_opackets++;
2692                 if (sc->dc_cdata.dc_tx_chain[idx] != NULL) {
2693                         m_freem(sc->dc_cdata.dc_tx_chain[idx]);
2694                         sc->dc_cdata.dc_tx_chain[idx] = NULL;
2695                 }
2696
2697                 sc->dc_cdata.dc_tx_cnt--;
2698                 DC_INC(idx, DC_TX_LIST_CNT);
2699         }
2700
2701         if (idx != sc->dc_cdata.dc_tx_cons) {
2702                 /* some buffers have been freed */
2703                 sc->dc_cdata.dc_tx_cons = idx;
2704                 ifp->if_flags &= ~IFF_OACTIVE;
2705         }
2706         ifp->if_timer = (sc->dc_cdata.dc_tx_cnt == 0) ? 0 : 5;
2707
2708         return;
2709 }
2710
2711 static void
2712 dc_tick(void *xsc)
2713 {
2714         struct dc_softc *sc = xsc;
2715         struct ifnet *ifp = &sc->arpcom.ac_if;
2716         struct mii_data *mii;
2717         u_int32_t r;
2718
2719         lwkt_serialize_enter(ifp->if_serializer);
2720
2721         mii = device_get_softc(sc->dc_miibus);
2722
2723         if (sc->dc_flags & DC_REDUCED_MII_POLL) {
2724                 if (sc->dc_flags & DC_21143_NWAY) {
2725                         r = CSR_READ_4(sc, DC_10BTSTAT);
2726                         if (IFM_SUBTYPE(mii->mii_media_active) ==
2727                             IFM_100_TX && (r & DC_TSTAT_LS100)) {
2728                                 sc->dc_link = 0;
2729                                 mii_mediachg(mii);
2730                         }
2731                         if (IFM_SUBTYPE(mii->mii_media_active) ==
2732                             IFM_10_T && (r & DC_TSTAT_LS10)) {
2733                                 sc->dc_link = 0;
2734                                 mii_mediachg(mii);
2735                         }
2736                         if (sc->dc_link == 0)
2737                                 mii_tick(mii);
2738                 } else {
2739                         r = CSR_READ_4(sc, DC_ISR);
2740                         if ((r & DC_ISR_RX_STATE) == DC_RXSTATE_WAIT &&
2741                             sc->dc_cdata.dc_tx_cnt == 0) {
2742                                 mii_tick(mii);
2743                                 if (!(mii->mii_media_status & IFM_ACTIVE))
2744                                         sc->dc_link = 0;
2745                         }
2746                 }
2747         } else {
2748                 mii_tick(mii);
2749         }
2750
2751         /*
2752          * When the init routine completes, we expect to be able to send
2753          * packets right away, and in fact the network code will send a
2754          * gratuitous ARP the moment the init routine marks the interface
2755          * as running. However, even though the MAC may have been initialized,
2756          * there may be a delay of a few seconds before the PHY completes
2757          * autonegotiation and the link is brought up. Any transmissions
2758          * made during that delay will be lost. Dealing with this is tricky:
2759          * we can't just pause in the init routine while waiting for the
2760          * PHY to come ready since that would bring the whole system to
2761          * a screeching halt for several seconds.
2762          *
2763          * What we do here is prevent the TX start routine from sending
2764          * any packets until a link has been established. After the
2765          * interface has been initialized, the tick routine will poll
2766          * the state of the PHY until the IFM_ACTIVE flag is set. Until
2767          * that time, packets will stay in the send queue, and once the
2768          * link comes up, they will be flushed out to the wire.
2769          */
2770         if (!sc->dc_link) {
2771                 mii_pollstat(mii);
2772                 if (mii->mii_media_status & IFM_ACTIVE &&
2773                     IFM_SUBTYPE(mii->mii_media_active) != IFM_NONE) {
2774                         sc->dc_link++;
2775                         if (!ifq_is_empty(&ifp->if_snd))
2776                                 if_devstart(ifp);
2777                 }
2778         }
2779
2780         if (sc->dc_flags & DC_21143_NWAY && !sc->dc_link)
2781                 callout_reset(&sc->dc_stat_timer, hz / 10, dc_tick, sc);
2782         else
2783                 callout_reset(&sc->dc_stat_timer, hz, dc_tick, sc);
2784
2785         lwkt_serialize_exit(ifp->if_serializer);
2786 }
2787
2788 /*
2789  * A transmit underrun has occurred.  Back off the transmit threshold,
2790  * or switch to store and forward mode if we have to.
2791  */
2792 static void
2793 dc_tx_underrun(struct dc_softc *sc)
2794 {
2795         u_int32_t               isr;
2796         int                     i;
2797
2798         if (DC_IS_DAVICOM(sc))
2799                 dc_init(sc);
2800
2801         if (DC_IS_INTEL(sc)) {
2802                 /*
2803                  * The real 21143 requires that the transmitter be idle
2804                  * in order to change the transmit threshold or store
2805                  * and forward state.
2806                  */
2807                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_TX_ON);
2808
2809                 for (i = 0; i < DC_TIMEOUT; i++) {
2810                         isr = CSR_READ_4(sc, DC_ISR);
2811                         if (isr & DC_ISR_TX_IDLE)
2812                                 break;
2813                         DELAY(10);
2814                 }
2815                 if (i == DC_TIMEOUT) {
2816                         if_printf(&sc->arpcom.ac_if,
2817                                   "failed to force tx to idle state\n");
2818                         dc_init(sc);
2819                 }
2820         }
2821
2822         if_printf(&sc->arpcom.ac_if, "TX underrun -- ");
2823         sc->dc_txthresh += DC_TXTHRESH_INC;
2824         if (sc->dc_txthresh > DC_TXTHRESH_MAX) {
2825                 kprintf("using store and forward mode\n");
2826                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_STORENFWD);
2827         } else {
2828                 kprintf("increasing TX threshold\n");
2829                 DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_TX_THRESH);
2830                 DC_SETBIT(sc, DC_NETCFG, sc->dc_txthresh);
2831         }
2832
2833         if (DC_IS_INTEL(sc))
2834                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_TX_ON);
2835
2836         return;
2837 }
2838
2839 #ifdef IFPOLL_ENABLE
2840
2841 static void
2842 dc_npoll_compat(struct ifnet *ifp, void *arg __unused, int count)
2843 {
2844         struct dc_softc *sc = ifp->if_softc;
2845
2846         ASSERT_SERIALIZED(ifp->if_serializer);
2847
2848         sc->rxcycles = count;
2849         dc_rxeof(sc);
2850         dc_txeof(sc);
2851         if (!ifq_is_empty(&ifp->if_snd))
2852                 if_devstart(ifp);
2853
2854         if (sc->dc_npoll.ifpc_stcount-- == 0) {
2855                 uint32_t status;
2856
2857                 sc->dc_npoll.ifpc_stcount = sc->dc_npoll.ifpc_stfrac;
2858
2859                 status = CSR_READ_4(sc, DC_ISR);
2860                 status &= (DC_ISR_RX_WATDOGTIMEO|DC_ISR_RX_NOBUF|
2861                         DC_ISR_TX_NOBUF|DC_ISR_TX_IDLE|DC_ISR_TX_UNDERRUN|
2862                         DC_ISR_BUS_ERR);
2863                 if (!status)
2864                         return;
2865                 /* ack what we have */
2866                 CSR_WRITE_4(sc, DC_ISR, status);
2867
2868                 if (status & (DC_ISR_RX_WATDOGTIMEO|DC_ISR_RX_NOBUF) ) {
2869                         u_int32_t r = CSR_READ_4(sc, DC_FRAMESDISCARDED);
2870                         ifp->if_ierrors += (r & 0xffff) + ((r >> 17) & 0x7ff);
2871
2872                         if (dc_rx_resync(sc))
2873                                 dc_rxeof(sc);
2874                 }
2875                 /* restart transmit unit if necessary */
2876                 if (status & DC_ISR_TX_IDLE && sc->dc_cdata.dc_tx_cnt)
2877                         CSR_WRITE_4(sc, DC_TXSTART, 0xFFFFFFFF);
2878
2879                 if (status & DC_ISR_TX_UNDERRUN)
2880                         dc_tx_underrun(sc);
2881
2882                 if (status & DC_ISR_BUS_ERR) {
2883                         if_printf(ifp, "dc_poll: bus error\n");
2884                         dc_reset(sc);
2885                         dc_init(sc);
2886                 }
2887         }
2888 }
2889
2890 static void
2891 dc_npoll(struct ifnet *ifp, struct ifpoll_info *info)
2892 {
2893         struct dc_softc *sc = ifp->if_softc;
2894
2895         ASSERT_SERIALIZED(ifp->if_serializer);
2896
2897         if (info != NULL) {
2898                 int cpuid = sc->dc_npoll.ifpc_cpuid;
2899
2900                 info->ifpi_rx[cpuid].poll_func = dc_npoll_compat;
2901                 info->ifpi_rx[cpuid].arg = NULL;
2902                 info->ifpi_rx[cpuid].serializer = ifp->if_serializer;
2903
2904                 if (ifp->if_flags & IFF_RUNNING) {
2905                         /* Disable interrupts */
2906                         CSR_WRITE_4(sc, DC_IMR, 0x00000000);
2907                         sc->dc_npoll.ifpc_stcount = 0;
2908                 }
2909                 ifp->if_npoll_cpuid = cpuid;
2910         } else {
2911                 if (ifp->if_flags & IFF_RUNNING) {
2912                         /* Re-enable interrupts. */
2913                         CSR_WRITE_4(sc, DC_IMR, DC_INTRS);
2914                 }
2915                 ifp->if_npoll_cpuid = -1;
2916         }
2917 }
2918
2919 #endif /* IFPOLL_ENABLE */
2920
2921 static void
2922 dc_intr(void *arg)
2923 {
2924         struct dc_softc         *sc;
2925         struct ifnet            *ifp;
2926         u_int32_t               status;
2927
2928         sc = arg;
2929
2930         if (sc->suspended) {
2931                 return;
2932         }
2933
2934         ifp = &sc->arpcom.ac_if;
2935
2936         if ( (CSR_READ_4(sc, DC_ISR) & DC_INTRS) == 0)
2937                 return ;
2938
2939         /* Suppress unwanted interrupts */
2940         if ((ifp->if_flags & IFF_RUNNING) == 0) {
2941                 if (CSR_READ_4(sc, DC_ISR) & DC_INTRS)
2942                         dc_stop(sc);
2943                 return;
2944         }
2945
2946         /* Disable interrupts. */
2947         CSR_WRITE_4(sc, DC_IMR, 0x00000000);
2948
2949         while(((status = CSR_READ_4(sc, DC_ISR)) & DC_INTRS) &&
2950               status != 0xFFFFFFFF) {
2951
2952                 CSR_WRITE_4(sc, DC_ISR, status);
2953
2954                 if (status & DC_ISR_RX_OK) {
2955                         int             curpkts;
2956                         curpkts = ifp->if_ipackets;
2957                         dc_rxeof(sc);
2958                         if (curpkts == ifp->if_ipackets) {
2959                                 while(dc_rx_resync(sc))
2960                                         dc_rxeof(sc);
2961                         }
2962                 }
2963
2964                 if (status & (DC_ISR_TX_OK|DC_ISR_TX_NOBUF))
2965                         dc_txeof(sc);
2966
2967                 if (status & DC_ISR_TX_IDLE) {
2968                         dc_txeof(sc);
2969                         if (sc->dc_cdata.dc_tx_cnt) {
2970                                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_TX_ON);
2971                                 CSR_WRITE_4(sc, DC_TXSTART, 0xFFFFFFFF);
2972                         }
2973                 }
2974
2975                 if (status & DC_ISR_TX_UNDERRUN)
2976                         dc_tx_underrun(sc);
2977
2978                 if ((status & DC_ISR_RX_WATDOGTIMEO)
2979                     || (status & DC_ISR_RX_NOBUF)) {
2980                         int             curpkts;
2981                         curpkts = ifp->if_ipackets;
2982                         dc_rxeof(sc);
2983                         if (curpkts == ifp->if_ipackets) {
2984                                 while(dc_rx_resync(sc))
2985                                         dc_rxeof(sc);
2986                         }
2987                 }
2988
2989                 if (status & DC_ISR_BUS_ERR) {
2990                         dc_reset(sc);
2991                         dc_init(sc);
2992                 }
2993         }
2994
2995         /* Re-enable interrupts. */
2996         CSR_WRITE_4(sc, DC_IMR, DC_INTRS);
2997
2998         if (!ifq_is_empty(&ifp->if_snd))
2999                 if_devstart(ifp);
3000 }
3001
3002 /*
3003  * Encapsulate an mbuf chain in a descriptor by coupling the mbuf data
3004  * pointers to the fragment pointers.
3005  */
3006 static int
3007 dc_encap(struct dc_softc *sc, struct mbuf *m_head, u_int32_t *txidx)
3008 {
3009         struct dc_desc          *f = NULL;
3010         struct mbuf             *m;
3011         int                     frag, cur, cnt = 0;
3012
3013         /*
3014          * Start packing the mbufs in this chain into
3015          * the fragment pointers. Stop when we run out
3016          * of fragments or hit the end of the mbuf chain.
3017          */
3018         m = m_head;
3019         cur = frag = *txidx;
3020
3021         for (m = m_head; m != NULL; m = m->m_next) {
3022                 if (m->m_len != 0) {
3023                         if (sc->dc_flags & DC_TX_ADMTEK_WAR) {
3024                                 if (*txidx != sc->dc_cdata.dc_tx_prod &&
3025                                     frag == (DC_TX_LIST_CNT - 1))
3026                                         return(ENOBUFS);
3027                         }
3028                         if ((DC_TX_LIST_CNT -
3029                             (sc->dc_cdata.dc_tx_cnt + cnt)) < 5)
3030                                 return(ENOBUFS);
3031
3032                         f = &sc->dc_ldata->dc_tx_list[frag];
3033                         f->dc_ctl = DC_TXCTL_TLINK | m->m_len;
3034                         if (cnt == 0) {
3035                                 f->dc_status = 0;
3036                                 f->dc_ctl |= DC_TXCTL_FIRSTFRAG;
3037                         } else
3038                                 f->dc_status = DC_TXSTAT_OWN;
3039                         f->dc_data = vtophys(mtod(m, vm_offset_t));
3040                         cur = frag;
3041                         DC_INC(frag, DC_TX_LIST_CNT);
3042                         cnt++;
3043                 }
3044         }
3045
3046         if (m != NULL)
3047                 return(ENOBUFS);
3048
3049         sc->dc_cdata.dc_tx_cnt += cnt;
3050         sc->dc_cdata.dc_tx_chain[cur] = m_head;
3051         sc->dc_ldata->dc_tx_list[cur].dc_ctl |= DC_TXCTL_LASTFRAG;
3052         if (sc->dc_flags & DC_TX_INTR_FIRSTFRAG)
3053                 sc->dc_ldata->dc_tx_list[*txidx].dc_ctl |= DC_TXCTL_FINT;
3054         if (sc->dc_flags & DC_TX_INTR_ALWAYS)
3055                 sc->dc_ldata->dc_tx_list[cur].dc_ctl |= DC_TXCTL_FINT;
3056         if (sc->dc_flags & DC_TX_USE_TX_INTR && sc->dc_cdata.dc_tx_cnt > 64)
3057                 sc->dc_ldata->dc_tx_list[cur].dc_ctl |= DC_TXCTL_FINT;
3058         sc->dc_ldata->dc_tx_list[*txidx].dc_status = DC_TXSTAT_OWN;
3059         *txidx = frag;
3060
3061         return(0);
3062 }
3063
3064 /*
3065  * Main transmit routine. To avoid having to do mbuf copies, we put pointers
3066  * to the mbuf data regions directly in the transmit lists. We also save a
3067  * copy of the pointers since the transmit list fragment pointers are
3068  * physical addresses.
3069  */
3070
3071 static void
3072 dc_start(struct ifnet *ifp)
3073 {
3074         struct dc_softc *sc;
3075         struct mbuf *m_head, *m_defragged;
3076         int idx, need_trans;
3077
3078         sc = ifp->if_softc;
3079
3080         if (!sc->dc_link) {
3081                 ifq_purge(&ifp->if_snd);
3082                 return;
3083         }
3084
3085         if (ifp->if_flags & IFF_OACTIVE)
3086                 return;
3087
3088         idx = sc->dc_cdata.dc_tx_prod;
3089
3090         need_trans = 0;
3091         while(sc->dc_cdata.dc_tx_chain[idx] == NULL) {
3092                 m_defragged = NULL;
3093                 m_head = ifq_dequeue(&ifp->if_snd, NULL);
3094                 if (m_head == NULL)
3095                         break;
3096
3097                 if ((sc->dc_flags & DC_TX_COALESCE) &&
3098                     (m_head->m_next != NULL || (sc->dc_flags & DC_TX_ALIGN))) {
3099                         /*
3100                          * Check first if coalescing allows us to queue
3101                          * the packet. We don't want to loose it if
3102                          * the TX queue is full.
3103                          */ 
3104                         if ((sc->dc_flags & DC_TX_ADMTEK_WAR) &&
3105                             idx != sc->dc_cdata.dc_tx_prod &&
3106                             idx == (DC_TX_LIST_CNT - 1)) {
3107                                 ifp->if_flags |= IFF_OACTIVE;
3108                                 ifq_prepend(&ifp->if_snd, m_head);
3109                                 break;
3110                         }
3111                         if ((DC_TX_LIST_CNT - sc->dc_cdata.dc_tx_cnt) < 5) {
3112                                 ifp->if_flags |= IFF_OACTIVE;
3113                                 ifq_prepend(&ifp->if_snd, m_head);
3114                                 break;
3115                         }
3116
3117                         /* only coalesce if have >1 mbufs */
3118                         m_defragged = m_defrag(m_head, MB_DONTWAIT);
3119                         if (m_defragged == NULL) {
3120                                 ifp->if_flags |= IFF_OACTIVE;
3121                                 ifq_prepend(&ifp->if_snd, m_head);
3122                                 break;
3123                         }
3124                         m_head = m_defragged;
3125                 }
3126
3127                 if (dc_encap(sc, m_head, &idx)) {
3128                         if (m_defragged) {
3129                                 /*
3130                                  * Throw away the original packet if the
3131                                  * defragged packet could not be encapsulated,
3132                                  * as well as the defragged packet.
3133                                  */
3134                                 m_freem(m_head);
3135                         } else {
3136                                 ifq_prepend(&ifp->if_snd, m_head);
3137                         }
3138                         ifp->if_flags |= IFF_OACTIVE;
3139                         break;
3140                 }
3141
3142                 need_trans = 1;
3143
3144                 /*
3145                  * If there's a BPF listener, bounce a copy of this frame
3146                  * to him.
3147                  */
3148                 BPF_MTAP(ifp, m_head);
3149
3150                 if (sc->dc_flags & DC_TX_ONE) {
3151                         ifp->if_flags |= IFF_OACTIVE;
3152                         break;
3153                 }
3154         }
3155
3156         if (!need_trans)
3157                 return;
3158
3159         /* Transmit */
3160         sc->dc_cdata.dc_tx_prod = idx;
3161         if (!(sc->dc_flags & DC_TX_POLL))
3162                 CSR_WRITE_4(sc, DC_TXSTART, 0xFFFFFFFF);
3163
3164         /*
3165          * Set a timeout in case the chip goes out to lunch.
3166          */
3167         ifp->if_timer = 5;
3168 }
3169
3170 static void
3171 dc_init(void *xsc)
3172 {
3173         struct dc_softc         *sc = xsc;
3174         struct ifnet            *ifp = &sc->arpcom.ac_if;
3175         struct mii_data         *mii;
3176
3177         mii = device_get_softc(sc->dc_miibus);
3178
3179         /*
3180          * Cancel pending I/O and free all RX/TX buffers.
3181          */
3182         dc_stop(sc);
3183         dc_reset(sc);
3184
3185         /*
3186          * Set cache alignment and burst length.
3187          */
3188         if (DC_IS_ASIX(sc) || DC_IS_DAVICOM(sc))
3189                 CSR_WRITE_4(sc, DC_BUSCTL, 0);
3190         else
3191                 CSR_WRITE_4(sc, DC_BUSCTL, DC_BUSCTL_MRME|DC_BUSCTL_MRLE);
3192         /*
3193          * Evenly share the bus between receive and transmit process.
3194          */
3195         if (DC_IS_INTEL(sc))
3196                 DC_SETBIT(sc, DC_BUSCTL, DC_BUSCTL_ARBITRATION);
3197         if (DC_IS_DAVICOM(sc) || DC_IS_INTEL(sc)) {
3198                 DC_SETBIT(sc, DC_BUSCTL, DC_BURSTLEN_USECA);
3199         } else {
3200                 DC_SETBIT(sc, DC_BUSCTL, DC_BURSTLEN_16LONG);
3201         }
3202         if (sc->dc_flags & DC_TX_POLL)
3203                 DC_SETBIT(sc, DC_BUSCTL, DC_TXPOLL_1);
3204         switch(sc->dc_cachesize) {
3205         case 32:
3206                 DC_SETBIT(sc, DC_BUSCTL, DC_CACHEALIGN_32LONG);
3207                 break;
3208         case 16:
3209                 DC_SETBIT(sc, DC_BUSCTL, DC_CACHEALIGN_16LONG);
3210                 break; 
3211         case 8:
3212                 DC_SETBIT(sc, DC_BUSCTL, DC_CACHEALIGN_8LONG);
3213                 break;  
3214         case 0:
3215         default:
3216                 DC_SETBIT(sc, DC_BUSCTL, DC_CACHEALIGN_NONE);
3217                 break;
3218         }
3219
3220         if (sc->dc_flags & DC_TX_STORENFWD)
3221                 DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_STORENFWD);
3222         else {
3223                 if (sc->dc_txthresh > DC_TXTHRESH_MAX) {
3224                         DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_STORENFWD);
3225                 } else {
3226                         DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_STORENFWD);
3227                         DC_SETBIT(sc, DC_NETCFG, sc->dc_txthresh);
3228                 }
3229         }
3230
3231         DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_NO_RXCRC);
3232         DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_TX_BACKOFF);
3233
3234         if (DC_IS_MACRONIX(sc) || DC_IS_PNICII(sc)) {
3235                 /*
3236                  * The app notes for the 98713 and 98715A say that
3237                  * in order to have the chips operate properly, a magic
3238                  * number must be written to CSR16. Macronix does not
3239                  * document the meaning of these bits so there's no way
3240                  * to know exactly what they do. The 98713 has a magic
3241                  * number all its own; the rest all use a different one.
3242                  */
3243                 DC_CLRBIT(sc, DC_MX_MAGICPACKET, 0xFFFF0000);
3244                 if (sc->dc_type == DC_TYPE_98713)
3245                         DC_SETBIT(sc, DC_MX_MAGICPACKET, DC_MX_MAGIC_98713);
3246                 else
3247                         DC_SETBIT(sc, DC_MX_MAGICPACKET, DC_MX_MAGIC_98715);
3248         }
3249
3250         if (DC_IS_XIRCOM(sc)) {
3251                 /*
3252                  * Setup General Purpose Port mode and data so the tulip
3253                  * can talk to the MII.
3254                  */
3255                 CSR_WRITE_4(sc, DC_SIAGP, DC_SIAGP_WRITE_EN | DC_SIAGP_INT1_EN |
3256                            DC_SIAGP_MD_GP2_OUTPUT | DC_SIAGP_MD_GP0_OUTPUT);
3257                 DELAY(10);
3258                 CSR_WRITE_4(sc, DC_SIAGP, DC_SIAGP_INT1_EN |
3259                            DC_SIAGP_MD_GP2_OUTPUT | DC_SIAGP_MD_GP0_OUTPUT);
3260                 DELAY(10);
3261         }
3262
3263         DC_CLRBIT(sc, DC_NETCFG, DC_NETCFG_TX_THRESH);
3264         DC_SETBIT(sc, DC_NETCFG, DC_TXTHRESH_MIN);
3265
3266         /* Init circular RX list. */
3267         if (dc_list_rx_init(sc) == ENOBUFS) {
3268                 if_printf(ifp, "initialization failed: no "
3269                           "memory for rx buffers\n");
3270                 dc_stop(sc);
3271                 return;
3272         }
3273
3274         /*
3275          * Init tx descriptors.
3276          */
3277         dc_list_tx_init(sc);
3278
3279         /*
3280          * Load the address of the RX list.
3281          */
3282         CSR_WRITE_4(sc, DC_RXADDR, vtophys(&sc->dc_ldata->dc_rx_list[0]));
3283         CSR_WRITE_4(sc, DC_TXADDR, vtophys(&sc->dc_ldata->dc_tx_list[0]));
3284
3285         /*
3286          * Enable interrupts.
3287          */
3288 #ifdef IFPOLL_ENABLE
3289         /*
3290          * ... but only if we are not polling, and make sure they are off in
3291          * the case of polling. Some cards (e.g. fxp) turn interrupts on
3292          * after a reset.
3293          */
3294         if (ifp->if_flags & IFF_NPOLLING) {
3295                 CSR_WRITE_4(sc, DC_IMR, 0x00000000);
3296                 sc->dc_npoll.ifpc_stcount = 0;
3297         } else
3298 #endif
3299         CSR_WRITE_4(sc, DC_IMR, DC_INTRS);
3300         CSR_WRITE_4(sc, DC_ISR, 0xFFFFFFFF);
3301
3302         /* Enable transmitter. */
3303         DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_TX_ON);
3304
3305         /*
3306          * If this is an Intel 21143 and we're not using the
3307          * MII port, program the LED control pins so we get
3308          * link and activity indications.
3309          */
3310         if (sc->dc_flags & DC_TULIP_LEDS) {
3311                 CSR_WRITE_4(sc, DC_WATCHDOG,
3312                     DC_WDOG_CTLWREN|DC_WDOG_LINK|DC_WDOG_ACTIVITY);   
3313                 CSR_WRITE_4(sc, DC_WATCHDOG, 0);
3314         }
3315
3316         /*
3317          * Set IFF_RUNNING here to keep the assertion in dc_setfilt()
3318          * working.
3319          */
3320         ifp->if_flags |= IFF_RUNNING;
3321         ifp->if_flags &= ~IFF_OACTIVE;
3322
3323         /*
3324          * Load the RX/multicast filter. We do this sort of late
3325          * because the filter programming scheme on the 21143 and
3326          * some clones requires DMAing a setup frame via the TX
3327          * engine, and we need the transmitter enabled for that.
3328          */
3329         dc_setfilt(sc);
3330
3331         /* Enable receiver. */
3332         DC_SETBIT(sc, DC_NETCFG, DC_NETCFG_RX_ON);
3333         CSR_WRITE_4(sc, DC_RXSTART, 0xFFFFFFFF);
3334
3335         mii_mediachg(mii);
3336         dc_setcfg(sc, sc->dc_if_media);
3337
3338         /* Don't start the ticker if this is a homePNA link. */
3339         if (IFM_SUBTYPE(mii->mii_media.ifm_media) == IFM_HPNA_1)
3340                 sc->dc_link = 1;
3341         else {
3342                 if (sc->dc_flags & DC_21143_NWAY)
3343                         callout_reset(&sc->dc_stat_timer, hz/10, dc_tick, sc);
3344                 else
3345                         callout_reset(&sc->dc_stat_timer, hz, dc_tick, sc);
3346         }
3347 }
3348
3349 /*
3350  * Set media options.
3351  */
3352 static int
3353 dc_ifmedia_upd(struct ifnet *ifp)
3354 {
3355         struct dc_softc         *sc;
3356         struct mii_data         *mii;
3357         struct ifmedia          *ifm;
3358
3359         sc = ifp->if_softc;
3360         mii = device_get_softc(sc->dc_miibus);
3361         mii_mediachg(mii);
3362         ifm = &mii->mii_media;
3363
3364         if (DC_IS_DAVICOM(sc) &&
3365             IFM_SUBTYPE(ifm->ifm_media) == IFM_HPNA_1)
3366                 dc_setcfg(sc, ifm->ifm_media);
3367         else
3368                 sc->dc_link = 0;
3369
3370         return(0);
3371 }
3372
3373 /*
3374  * Report current media status.
3375  */
3376 static void
3377 dc_ifmedia_sts(struct ifnet *ifp, struct ifmediareq *ifmr)
3378 {
3379         struct dc_softc         *sc;
3380         struct mii_data         *mii;
3381         struct ifmedia          *ifm;
3382
3383         sc = ifp->if_softc;
3384         mii = device_get_softc(sc->dc_miibus);
3385         mii_pollstat(mii);
3386         ifm = &mii->mii_media;
3387         if (DC_IS_DAVICOM(sc)) {
3388                 if (IFM_SUBTYPE(ifm->ifm_media) == IFM_HPNA_1) {
3389                         ifmr->ifm_active = ifm->ifm_media;
3390                         ifmr->ifm_status = 0;
3391                         return;
3392                 }
3393         }
3394         ifmr->ifm_active = mii->mii_media_active;
3395         ifmr->ifm_status = mii->mii_media_status;
3396
3397         return;
3398 }
3399
3400 static int
3401 dc_ioctl(struct ifnet *ifp, u_long command, caddr_t data, struct ucred *cr)
3402 {
3403         struct dc_softc         *sc = ifp->if_softc;
3404         struct ifreq            *ifr = (struct ifreq *) data;
3405         struct mii_data         *mii;
3406         int                     error = 0;
3407
3408         switch(command) {
3409         case SIOCSIFFLAGS:
3410                 if (ifp->if_flags & IFF_UP) {
3411                         int need_setfilt = (ifp->if_flags ^ sc->dc_if_flags) &
3412                                 (IFF_PROMISC | IFF_ALLMULTI);
3413                         if (ifp->if_flags & IFF_RUNNING) {
3414                                 if (need_setfilt)
3415                                         dc_setfilt(sc);
3416                         } else {
3417                                 sc->dc_txthresh = 0;
3418                                 dc_init(sc);
3419                         }
3420                 } else {
3421                         if (ifp->if_flags & IFF_RUNNING)
3422                                 dc_stop(sc);
3423                 }
3424                 sc->dc_if_flags = ifp->if_flags;
3425                 break;
3426         case SIOCADDMULTI:
3427         case SIOCDELMULTI:
3428                 if (ifp->if_flags & IFF_RUNNING)
3429                         dc_setfilt(sc);
3430                 break;
3431         case SIOCGIFMEDIA:
3432         case SIOCSIFMEDIA:
3433                 mii = device_get_softc(sc->dc_miibus);
3434                 error = ifmedia_ioctl(ifp, ifr, &mii->mii_media, command);
3435                 break;
3436         default:
3437                 error = ether_ioctl(ifp, command, data);
3438                 break;
3439         }
3440
3441         return(error);
3442 }
3443
3444 static void
3445 dc_watchdog(struct ifnet *ifp)
3446 {
3447         struct dc_softc         *sc;
3448
3449         sc = ifp->if_softc;
3450
3451         ifp->if_oerrors++;
3452         if_printf(ifp, "watchdog timeout\n");
3453
3454         dc_stop(sc);
3455         dc_reset(sc);
3456         dc_init(sc);
3457
3458         if (!ifq_is_empty(&ifp->if_snd))
3459                 if_devstart(ifp);
3460 }
3461
3462 /*
3463  * Stop the adapter and free any mbufs allocated to the
3464  * RX and TX lists.
3465  */
3466 static void
3467 dc_stop(struct dc_softc *sc)
3468 {
3469         int             i;
3470         struct ifnet            *ifp;
3471
3472         ifp = &sc->arpcom.ac_if;
3473         ifp->if_timer = 0;
3474
3475         callout_stop(&sc->dc_stat_timer);
3476
3477         ifp->if_flags &= ~(IFF_RUNNING | IFF_OACTIVE);
3478
3479         DC_CLRBIT(sc, DC_NETCFG, (DC_NETCFG_RX_ON|DC_NETCFG_TX_ON));
3480         CSR_WRITE_4(sc, DC_IMR, 0x00000000);
3481         CSR_WRITE_4(sc, DC_TXADDR, 0x00000000);
3482         CSR_WRITE_4(sc, DC_RXADDR, 0x00000000);
3483         sc->dc_link = 0;
3484
3485         /*
3486          * Free data in the RX lists.
3487          */
3488         for (i = 0; i < DC_RX_LIST_CNT; i++) {
3489                 if (sc->dc_cdata.dc_rx_chain[i] != NULL) {
3490                         m_freem(sc->dc_cdata.dc_rx_chain[i]);
3491                         sc->dc_cdata.dc_rx_chain[i] = NULL;
3492                 }
3493         }
3494         bzero((char *)&sc->dc_ldata->dc_rx_list,
3495                 sizeof(sc->dc_ldata->dc_rx_list));
3496
3497         /*
3498          * Free the TX list buffers.
3499          */
3500         for (i = 0; i < DC_TX_LIST_CNT; i++) {
3501                 if (sc->dc_cdata.dc_tx_chain[i] != NULL) {
3502                         if ((sc->dc_ldata->dc_tx_list[i].dc_ctl &
3503                             DC_TXCTL_SETUP) ||
3504                             !(sc->dc_ldata->dc_tx_list[i].dc_ctl &
3505                             DC_TXCTL_LASTFRAG)) {
3506                                 sc->dc_cdata.dc_tx_chain[i] = NULL;
3507                                 continue;
3508                         }
3509                         m_freem(sc->dc_cdata.dc_tx_chain[i]);
3510                         sc->dc_cdata.dc_tx_chain[i] = NULL;
3511                 }
3512         }
3513         bzero((char *)&sc->dc_ldata->dc_tx_list,
3514                 sizeof(sc->dc_ldata->dc_tx_list));
3515 }
3516
3517 /*
3518  * Stop all chip I/O so that the kernel's probe routines don't
3519  * get confused by errant DMAs when rebooting.
3520  */
3521 static void
3522 dc_shutdown(device_t dev)
3523 {
3524         struct dc_softc *sc;
3525         struct ifnet *ifp;
3526
3527         sc = device_get_softc(dev);
3528         ifp = &sc->arpcom.ac_if;
3529         lwkt_serialize_enter(ifp->if_serializer);
3530
3531         dc_stop(sc);
3532
3533         lwkt_serialize_exit(ifp->if_serializer);
3534 }
3535
3536 /*
3537  * Device suspend routine.  Stop the interface and save some PCI
3538  * settings in case the BIOS doesn't restore them properly on
3539  * resume.
3540  */
3541 static int
3542 dc_suspend(device_t dev)
3543 {
3544         struct dc_softc *sc = device_get_softc(dev);
3545         struct ifnet *ifp = &sc->arpcom.ac_if;
3546         int i;
3547         lwkt_serialize_enter(ifp->if_serializer);
3548
3549         dc_stop(sc);
3550         for (i = 0; i < 5; i++)
3551                 sc->saved_maps[i] = pci_read_config(dev, PCIR_MAPS + i * 4, 4);
3552         sc->saved_biosaddr = pci_read_config(dev, PCIR_BIOS, 4);
3553         sc->saved_intline = pci_read_config(dev, PCIR_INTLINE, 1);
3554         sc->saved_cachelnsz = pci_read_config(dev, PCIR_CACHELNSZ, 1);
3555         sc->saved_lattimer = pci_read_config(dev, PCIR_LATTIMER, 1);
3556
3557         sc->suspended = 1;
3558
3559         lwkt_serialize_exit(ifp->if_serializer);
3560         return (0);
3561 }
3562
3563 /*
3564  * Device resume routine.  Restore some PCI settings in case the BIOS
3565  * doesn't, re-enable busmastering, and restart the interface if
3566  * appropriate.
3567  */
3568 static int
3569 dc_resume(device_t dev)
3570 {
3571         struct dc_softc *sc = device_get_softc(dev);
3572         struct ifnet *ifp = &sc->arpcom.ac_if;
3573         int i;
3574
3575         lwkt_serialize_enter(ifp->if_serializer);
3576         dc_acpi(dev);
3577
3578         /* better way to do this? */
3579         for (i = 0; i < 5; i++)
3580                 pci_write_config(dev, PCIR_MAPS + i * 4, sc->saved_maps[i], 4);
3581         pci_write_config(dev, PCIR_BIOS, sc->saved_biosaddr, 4);
3582         pci_write_config(dev, PCIR_INTLINE, sc->saved_intline, 1);
3583         pci_write_config(dev, PCIR_CACHELNSZ, sc->saved_cachelnsz, 1);
3584         pci_write_config(dev, PCIR_LATTIMER, sc->saved_lattimer, 1);
3585
3586         /* reenable busmastering */
3587         pci_enable_busmaster(dev);
3588         pci_enable_io(dev, DC_RES);
3589
3590         /* reinitialize interface if necessary */
3591         if (ifp->if_flags & IFF_UP)
3592                 dc_init(sc);
3593
3594         sc->suspended = 0;
3595         lwkt_serialize_exit(ifp->if_serializer);
3596
3597         return (0);
3598 }
3599
3600 static uint32_t
3601 dc_mchash_xircom(struct dc_softc *sc, const uint8_t *addr)
3602 {
3603         uint32_t crc;
3604
3605         /* Compute CRC for the address value. */
3606         crc = ether_crc32_le(addr, ETHER_ADDR_LEN);
3607
3608         if ((crc & 0x180) == 0x180)
3609                 return ((crc & 0x0F) + (crc & 0x70) * 3 + (14 << 4));
3610         else
3611                 return ((crc & 0x1F) + ((crc >> 1) & 0xF0) * 3 + (12 << 4));
3612 }