Reduce ifnet.if_serializer contention on output path:
[dragonfly.git] / sys / dev / netif / nge / if_nge.c
1 /*
2  * Copyright (c) 2001 Wind River Systems
3  * Copyright (c) 1997, 1998, 1999, 2000, 2001
4  *      Bill Paul <wpaul@bsdi.com>.  All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. All advertising materials mentioning features or use of this software
15  *    must display the following acknowledgement:
16  *      This product includes software developed by Bill Paul.
17  * 4. Neither the name of the author nor the names of any co-contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY Bill Paul AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL Bill Paul OR THE VOICES IN HIS HEAD
25  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
28  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
29  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
31  * THE POSSIBILITY OF SUCH DAMAGE.
32  *
33  * $FreeBSD: src/sys/dev/nge/if_nge.c,v 1.13.2.13 2003/02/05 22:03:57 mbr Exp $
34  * $DragonFly: src/sys/dev/netif/nge/if_nge.c,v 1.47 2008/05/14 11:59:21 sephe Exp $
35  */
36
37 /*
38  * National Semiconductor DP83820/DP83821 gigabit ethernet driver
39  * for FreeBSD. Datasheets are available from:
40  *
41  * http://www.national.com/ds/DP/DP83820.pdf
42  * http://www.national.com/ds/DP/DP83821.pdf
43  *
44  * These chips are used on several low cost gigabit ethernet NICs
45  * sold by D-Link, Addtron, SMC and Asante. Both parts are
46  * virtually the same, except the 83820 is a 64-bit/32-bit part,
47  * while the 83821 is 32-bit only.
48  *
49  * Many cards also use National gigE transceivers, such as the
50  * DP83891, DP83861 and DP83862 gigPHYTER parts. The DP83861 datasheet
51  * contains a full register description that applies to all of these
52  * components:
53  *
54  * http://www.national.com/ds/DP/DP83861.pdf
55  *
56  * Written by Bill Paul <wpaul@bsdi.com>
57  * BSDi Open Source Solutions
58  */
59
60 /*
61  * The NatSemi DP83820 and 83821 controllers are enhanced versions
62  * of the NatSemi MacPHYTER 10/100 devices. They support 10, 100
63  * and 1000Mbps speeds with 1000baseX (ten bit interface), MII and GMII
64  * ports. Other features include 8K TX FIFO and 32K RX FIFO, TCP/IP
65  * hardware checksum offload (IPv4 only), VLAN tagging and filtering,
66  * priority TX and RX queues, a 2048 bit multicast hash filter, 4 RX pattern
67  * matching buffers, one perfect address filter buffer and interrupt
68  * moderation. The 83820 supports both 64-bit and 32-bit addressing
69  * and data transfers: the 64-bit support can be toggled on or off
70  * via software. This affects the size of certain fields in the DMA
71  * descriptors.
72  *
73  * There are two bugs/misfeatures in the 83820/83821 that I have
74  * discovered so far:
75  *
76  * - Receive buffers must be aligned on 64-bit boundaries, which means
77  *   you must resort to copying data in order to fix up the payload
78  *   alignment.
79  *
80  * - In order to transmit jumbo frames larger than 8170 bytes, you have
81  *   to turn off transmit checksum offloading, because the chip can't
82  *   compute the checksum on an outgoing frame unless it fits entirely
83  *   within the TX FIFO, which is only 8192 bytes in size. If you have
84  *   TX checksum offload enabled and you transmit attempt to transmit a
85  *   frame larger than 8170 bytes, the transmitter will wedge.
86  *
87  * To work around the latter problem, TX checksum offload is disabled
88  * if the user selects an MTU larger than 8152 (8170 - 18).
89  */
90
91 #include "opt_polling.h"
92
93 #include <sys/param.h>
94 #include <sys/systm.h>
95 #include <sys/sockio.h>
96 #include <sys/mbuf.h>
97 #include <sys/malloc.h>
98 #include <sys/kernel.h>
99 #include <sys/interrupt.h>
100 #include <sys/socket.h>
101 #include <sys/serialize.h>
102 #include <sys/bus.h>
103 #include <sys/rman.h>
104 #include <sys/thread2.h>
105
106 #include <net/if.h>
107 #include <net/ifq_var.h>
108 #include <net/if_arp.h>
109 #include <net/ethernet.h>
110 #include <net/if_dl.h>
111 #include <net/if_media.h>
112 #include <net/if_types.h>
113 #include <net/vlan/if_vlan_var.h>
114 #include <net/vlan/if_vlan_ether.h>
115
116 #include <net/bpf.h>
117
118 #include <vm/vm.h>              /* for vtophys */
119 #include <vm/pmap.h>            /* for vtophys */
120
121 #include <dev/netif/mii_layer/mii.h>
122 #include <dev/netif/mii_layer/miivar.h>
123
124 #include <bus/pci/pcidevs.h>
125 #include <bus/pci/pcireg.h>
126 #include <bus/pci/pcivar.h>
127
128 #define NGE_USEIOSPACE
129
130 #include "if_ngereg.h"
131
132
133 /* "controller miibus0" required.  See GENERIC if you get errors here. */
134 #include "miibus_if.h"
135
136 #define NGE_CSUM_FEATURES       (CSUM_IP | CSUM_TCP | CSUM_UDP)
137
138 /*
139  * Various supported device vendors/types and their names.
140  */
141 static struct nge_type nge_devs[] = {
142         { PCI_VENDOR_NS, PCI_PRODUCT_NS_DP83820,
143             "National Semiconductor Gigabit Ethernet" },
144         { 0, 0, NULL }
145 };
146
147 static int      nge_probe(device_t);
148 static int      nge_attach(device_t);
149 static int      nge_detach(device_t);
150
151 static int      nge_alloc_jumbo_mem(struct nge_softc *);
152 static struct nge_jslot
153                 *nge_jalloc(struct nge_softc *);
154 static void     nge_jfree(void *);
155 static void     nge_jref(void *);
156
157 static int      nge_newbuf(struct nge_softc *, struct nge_desc *,
158                            struct mbuf *);
159 static int      nge_encap(struct nge_softc *, struct mbuf *, uint32_t *);
160 static void     nge_rxeof(struct nge_softc *);
161 static void     nge_txeof(struct nge_softc *);
162 static void     nge_intr(void *);
163 static void     nge_tick(void *);
164 static void     nge_start(struct ifnet *);
165 static int      nge_ioctl(struct ifnet *, u_long, caddr_t, struct ucred *);
166 static void     nge_init(void *);
167 static void     nge_stop(struct nge_softc *);
168 static void     nge_watchdog(struct ifnet *);
169 static void     nge_shutdown(device_t);
170 static int      nge_ifmedia_upd(struct ifnet *);
171 static void     nge_ifmedia_sts(struct ifnet *, struct ifmediareq *);
172
173 static void     nge_delay(struct nge_softc *);
174 static void     nge_eeprom_idle(struct nge_softc *);
175 static void     nge_eeprom_putbyte(struct nge_softc *, int);
176 static void     nge_eeprom_getword(struct nge_softc *, int, uint16_t *);
177 static void     nge_read_eeprom(struct nge_softc *, void *, int, int);
178
179 static void     nge_mii_sync(struct nge_softc *);
180 static void     nge_mii_send(struct nge_softc *, uint32_t, int);
181 static int      nge_mii_readreg(struct nge_softc *, struct nge_mii_frame *);
182 static int      nge_mii_writereg(struct nge_softc *, struct nge_mii_frame *);
183
184 static int      nge_miibus_readreg(device_t, int, int);
185 static int      nge_miibus_writereg(device_t, int, int, int);
186 static void     nge_miibus_statchg(device_t);
187
188 static void     nge_setmulti(struct nge_softc *);
189 static void     nge_reset(struct nge_softc *);
190 static int      nge_list_rx_init(struct nge_softc *);
191 static int      nge_list_tx_init(struct nge_softc *);
192 #ifdef DEVICE_POLLING
193 static void     nge_poll(struct ifnet *ifp, enum poll_cmd cmd, int count);
194 #endif
195
196 #ifdef NGE_USEIOSPACE
197 #define NGE_RES                 SYS_RES_IOPORT
198 #define NGE_RID                 NGE_PCI_LOIO
199 #else
200 #define NGE_RES                 SYS_RES_MEMORY
201 #define NGE_RID                 NGE_PCI_LOMEM
202 #endif
203
204 static device_method_t nge_methods[] = {
205         /* Device interface */
206         DEVMETHOD(device_probe,         nge_probe),
207         DEVMETHOD(device_attach,        nge_attach),
208         DEVMETHOD(device_detach,        nge_detach),
209         DEVMETHOD(device_shutdown,      nge_shutdown),
210
211         /* bus interface */
212         DEVMETHOD(bus_print_child,      bus_generic_print_child),
213         DEVMETHOD(bus_driver_added,     bus_generic_driver_added),
214
215         /* MII interface */
216         DEVMETHOD(miibus_readreg,       nge_miibus_readreg),
217         DEVMETHOD(miibus_writereg,      nge_miibus_writereg),
218         DEVMETHOD(miibus_statchg,       nge_miibus_statchg),
219
220         { 0, 0 }
221 };
222
223 static DEFINE_CLASS_0(nge, nge_driver, nge_methods, sizeof(struct nge_softc));
224 static devclass_t nge_devclass;
225
226 DECLARE_DUMMY_MODULE(if_nge);
227 MODULE_DEPEND(if_nge, miibus, 1, 1, 1);
228 DRIVER_MODULE(if_nge, pci, nge_driver, nge_devclass, 0, 0);
229 DRIVER_MODULE(miibus, nge, miibus_driver, miibus_devclass, 0, 0);
230
231 #define NGE_SETBIT(sc, reg, x)                          \
232         CSR_WRITE_4(sc, reg, CSR_READ_4(sc, reg) | (x))
233
234 #define NGE_CLRBIT(sc, reg, x)                          \
235         CSR_WRITE_4(sc, reg, CSR_READ_4(sc, reg) & ~(x))
236
237 #define SIO_SET(x)                                      \
238         CSR_WRITE_4(sc, NGE_MEAR, CSR_READ_4(sc, NGE_MEAR) | (x))
239
240 #define SIO_CLR(x)                                      \
241         CSR_WRITE_4(sc, NGE_MEAR, CSR_READ_4(sc, NGE_MEAR) & ~(x))
242
243 static void
244 nge_delay(struct nge_softc *sc)
245 {
246         int idx;
247
248         for (idx = (300 / 33) + 1; idx > 0; idx--)
249                 CSR_READ_4(sc, NGE_CSR);
250 }
251
252 static void
253 nge_eeprom_idle(struct nge_softc *sc)
254 {
255         int i;
256
257         SIO_SET(NGE_MEAR_EE_CSEL);
258         nge_delay(sc);
259         SIO_SET(NGE_MEAR_EE_CLK);
260         nge_delay(sc);
261
262         for (i = 0; i < 25; i++) {
263                 SIO_CLR(NGE_MEAR_EE_CLK);
264                 nge_delay(sc);
265                 SIO_SET(NGE_MEAR_EE_CLK);
266                 nge_delay(sc);
267         }
268
269         SIO_CLR(NGE_MEAR_EE_CLK);
270         nge_delay(sc);
271         SIO_CLR(NGE_MEAR_EE_CSEL);
272         nge_delay(sc);
273         CSR_WRITE_4(sc, NGE_MEAR, 0x00000000);
274 }
275
276 /*
277  * Send a read command and address to the EEPROM, check for ACK.
278  */
279 static void
280 nge_eeprom_putbyte(struct nge_softc *sc, int addr)
281 {
282         int d, i;
283
284         d = addr | NGE_EECMD_READ;
285
286         /*
287          * Feed in each bit and stobe the clock.
288          */
289         for (i = 0x400; i; i >>= 1) {
290                 if (d & i)
291                         SIO_SET(NGE_MEAR_EE_DIN);
292                 else
293                         SIO_CLR(NGE_MEAR_EE_DIN);
294                 nge_delay(sc);
295                 SIO_SET(NGE_MEAR_EE_CLK);
296                 nge_delay(sc);
297                 SIO_CLR(NGE_MEAR_EE_CLK);
298                 nge_delay(sc);
299         }
300 }
301
302 /*
303  * Read a word of data stored in the EEPROM at address 'addr.'
304  */
305 static void
306 nge_eeprom_getword(struct nge_softc *sc, int addr, uint16_t *dest)
307 {
308         int i;
309         uint16_t word = 0;
310
311         /* Force EEPROM to idle state. */
312         nge_eeprom_idle(sc);
313
314         /* Enter EEPROM access mode. */
315         nge_delay(sc);
316         SIO_CLR(NGE_MEAR_EE_CLK);
317         nge_delay(sc);
318         SIO_SET(NGE_MEAR_EE_CSEL);
319         nge_delay(sc);
320
321         /*
322          * Send address of word we want to read.
323          */
324         nge_eeprom_putbyte(sc, addr);
325
326         /*
327          * Start reading bits from EEPROM.
328          */
329         for (i = 0x8000; i; i >>= 1) {
330                 SIO_SET(NGE_MEAR_EE_CLK);
331                 nge_delay(sc);
332                 if (CSR_READ_4(sc, NGE_MEAR) & NGE_MEAR_EE_DOUT)
333                         word |= i;
334                 nge_delay(sc);
335                 SIO_CLR(NGE_MEAR_EE_CLK);
336                 nge_delay(sc);
337         }
338
339         /* Turn off EEPROM access mode. */
340         nge_eeprom_idle(sc);
341
342         *dest = word;
343 }
344
345 /*
346  * Read a sequence of words from the EEPROM.
347  */
348 static void
349 nge_read_eeprom(struct nge_softc *sc, void *dest, int off, int cnt)
350 {
351         int i;
352         uint16_t word = 0, *ptr;
353
354         for (i = 0; i < cnt; i++) {
355                 nge_eeprom_getword(sc, off + i, &word);
356                 ptr = (uint16_t *)((uint8_t *)dest + (i * 2));
357                 *ptr = word;
358         }
359 }
360
361 /*
362  * Sync the PHYs by setting data bit and strobing the clock 32 times.
363  */
364 static void
365 nge_mii_sync(struct nge_softc *sc)
366 {
367         int i;
368
369         SIO_SET(NGE_MEAR_MII_DIR | NGE_MEAR_MII_DATA);
370
371         for (i = 0; i < 32; i++) {
372                 SIO_SET(NGE_MEAR_MII_CLK);
373                 DELAY(1);
374                 SIO_CLR(NGE_MEAR_MII_CLK);
375                 DELAY(1);
376         }
377 }
378
379 /*
380  * Clock a series of bits through the MII.
381  */
382 static void
383 nge_mii_send(struct nge_softc *sc, uint32_t bits, int cnt)
384 {
385         int i;
386
387         SIO_CLR(NGE_MEAR_MII_CLK);
388
389         for (i = (0x1 << (cnt - 1)); i; i >>= 1) {
390                 if (bits & i)
391                         SIO_SET(NGE_MEAR_MII_DATA);
392                 else
393                         SIO_CLR(NGE_MEAR_MII_DATA);
394                 DELAY(1);
395                 SIO_CLR(NGE_MEAR_MII_CLK);
396                 DELAY(1);
397                 SIO_SET(NGE_MEAR_MII_CLK);
398         }
399 }
400
401 /*
402  * Read an PHY register through the MII.
403  */
404 static int
405 nge_mii_readreg(struct nge_softc *sc, struct nge_mii_frame *frame)
406 {
407         int ack, i;
408
409         /*
410          * Set up frame for RX.
411          */
412         frame->mii_stdelim = NGE_MII_STARTDELIM;
413         frame->mii_opcode = NGE_MII_READOP;
414         frame->mii_turnaround = 0;
415         frame->mii_data = 0;
416
417         CSR_WRITE_4(sc, NGE_MEAR, 0);
418
419         /*
420          * Turn on data xmit.
421          */
422         SIO_SET(NGE_MEAR_MII_DIR);
423
424         nge_mii_sync(sc);
425
426         /*
427          * Send command/address info.
428          */
429         nge_mii_send(sc, frame->mii_stdelim, 2);
430         nge_mii_send(sc, frame->mii_opcode, 2);
431         nge_mii_send(sc, frame->mii_phyaddr, 5);
432         nge_mii_send(sc, frame->mii_regaddr, 5);
433
434         /* Idle bit */
435         SIO_CLR((NGE_MEAR_MII_CLK | NGE_MEAR_MII_DATA));
436         DELAY(1);
437         SIO_SET(NGE_MEAR_MII_CLK);
438         DELAY(1);
439
440         /* Turn off xmit. */
441         SIO_CLR(NGE_MEAR_MII_DIR);
442         /* Check for ack */
443         SIO_CLR(NGE_MEAR_MII_CLK);
444         DELAY(1);
445         ack = CSR_READ_4(sc, NGE_MEAR) & NGE_MEAR_MII_DATA;
446         SIO_SET(NGE_MEAR_MII_CLK);
447         DELAY(1);
448
449         /*
450          * Now try reading data bits. If the ack failed, we still
451          * need to clock through 16 cycles to keep the PHY(s) in sync.
452          */
453         if (ack) {
454                 for(i = 0; i < 16; i++) {
455                         SIO_CLR(NGE_MEAR_MII_CLK);
456                         DELAY(1);
457                         SIO_SET(NGE_MEAR_MII_CLK);
458                         DELAY(1);
459                 }
460                 goto fail;
461         }
462
463         for (i = 0x8000; i; i >>= 1) {
464                 SIO_CLR(NGE_MEAR_MII_CLK);
465                 DELAY(1);
466                 if (!ack) {
467                         if (CSR_READ_4(sc, NGE_MEAR) & NGE_MEAR_MII_DATA)
468                                 frame->mii_data |= i;
469                         DELAY(1);
470                 }
471                 SIO_SET(NGE_MEAR_MII_CLK);
472                 DELAY(1);
473         }
474
475 fail:
476         SIO_CLR(NGE_MEAR_MII_CLK);
477         DELAY(1);
478         SIO_SET(NGE_MEAR_MII_CLK);
479         DELAY(1);
480
481         if (ack)
482                 return(1);
483         return(0);
484 }
485
486 /*
487  * Write to a PHY register through the MII.
488  */
489 static int
490 nge_mii_writereg(struct nge_softc *sc, struct nge_mii_frame *frame)
491 {
492         /*
493          * Set up frame for TX.
494          */
495
496         frame->mii_stdelim = NGE_MII_STARTDELIM;
497         frame->mii_opcode = NGE_MII_WRITEOP;
498         frame->mii_turnaround = NGE_MII_TURNAROUND;
499         
500         /*
501          * Turn on data output.
502          */
503         SIO_SET(NGE_MEAR_MII_DIR);
504
505         nge_mii_sync(sc);
506
507         nge_mii_send(sc, frame->mii_stdelim, 2);
508         nge_mii_send(sc, frame->mii_opcode, 2);
509         nge_mii_send(sc, frame->mii_phyaddr, 5);
510         nge_mii_send(sc, frame->mii_regaddr, 5);
511         nge_mii_send(sc, frame->mii_turnaround, 2);
512         nge_mii_send(sc, frame->mii_data, 16);
513
514         /* Idle bit. */
515         SIO_SET(NGE_MEAR_MII_CLK);
516         DELAY(1);
517         SIO_CLR(NGE_MEAR_MII_CLK);
518         DELAY(1);
519
520         /*
521          * Turn off xmit.
522          */
523         SIO_CLR(NGE_MEAR_MII_DIR);
524
525         return(0);
526 }
527
528 static int
529 nge_miibus_readreg(device_t dev, int phy, int reg)
530 {
531         struct nge_softc *sc = device_get_softc(dev);
532         struct nge_mii_frame frame;
533
534         bzero((char *)&frame, sizeof(frame));
535
536         frame.mii_phyaddr = phy;
537         frame.mii_regaddr = reg;
538         nge_mii_readreg(sc, &frame);
539
540         return(frame.mii_data);
541 }
542
543 static int
544 nge_miibus_writereg(device_t dev, int phy, int reg, int data)
545 {
546         struct nge_softc *sc = device_get_softc(dev);
547         struct nge_mii_frame frame;
548
549         bzero((char *)&frame, sizeof(frame));
550
551         frame.mii_phyaddr = phy;
552         frame.mii_regaddr = reg;
553         frame.mii_data = data;
554         nge_mii_writereg(sc, &frame);
555
556         return(0);
557 }
558
559 static void
560 nge_miibus_statchg(device_t dev)
561 {
562         struct nge_softc *sc = device_get_softc(dev);
563         struct mii_data *mii;
564         int status;     
565
566         if (sc->nge_tbi) {
567                 if (IFM_SUBTYPE(sc->nge_ifmedia.ifm_cur->ifm_media)
568                     == IFM_AUTO) {
569                         status = CSR_READ_4(sc, NGE_TBI_ANLPAR);
570                         if (status == 0 || status & NGE_TBIANAR_FDX) {
571                                 NGE_SETBIT(sc, NGE_TX_CFG,
572                                     (NGE_TXCFG_IGN_HBEAT | NGE_TXCFG_IGN_CARR));
573                                 NGE_SETBIT(sc, NGE_RX_CFG, NGE_RXCFG_RX_FDX);
574                         } else {
575                                 NGE_CLRBIT(sc, NGE_TX_CFG,
576                                     (NGE_TXCFG_IGN_HBEAT | NGE_TXCFG_IGN_CARR));
577                                 NGE_CLRBIT(sc, NGE_RX_CFG, NGE_RXCFG_RX_FDX);
578                         }
579                 } else if ((sc->nge_ifmedia.ifm_cur->ifm_media & IFM_GMASK) 
580                         != IFM_FDX) {
581                         NGE_CLRBIT(sc, NGE_TX_CFG,
582                             (NGE_TXCFG_IGN_HBEAT | NGE_TXCFG_IGN_CARR));
583                         NGE_CLRBIT(sc, NGE_RX_CFG, NGE_RXCFG_RX_FDX);
584                 } else {
585                         NGE_SETBIT(sc, NGE_TX_CFG,
586                             (NGE_TXCFG_IGN_HBEAT | NGE_TXCFG_IGN_CARR));
587                         NGE_SETBIT(sc, NGE_RX_CFG, NGE_RXCFG_RX_FDX);
588                 }
589         } else {
590                 mii = device_get_softc(sc->nge_miibus);
591
592                 if ((mii->mii_media_active & IFM_GMASK) == IFM_FDX) {
593                         NGE_SETBIT(sc, NGE_TX_CFG,
594                             (NGE_TXCFG_IGN_HBEAT | NGE_TXCFG_IGN_CARR));
595                         NGE_SETBIT(sc, NGE_RX_CFG, NGE_RXCFG_RX_FDX);
596                 } else {
597                         NGE_CLRBIT(sc, NGE_TX_CFG,
598                             (NGE_TXCFG_IGN_HBEAT | NGE_TXCFG_IGN_CARR));
599                         NGE_CLRBIT(sc, NGE_RX_CFG, NGE_RXCFG_RX_FDX);
600                 }
601
602                 /* If we have a 1000Mbps link, set the mode_1000 bit. */
603                 if (IFM_SUBTYPE(mii->mii_media_active) == IFM_1000_T ||
604                     IFM_SUBTYPE(mii->mii_media_active) == IFM_1000_SX) {
605                         NGE_SETBIT(sc, NGE_CFG, NGE_CFG_MODE_1000);
606                 } else {
607                         NGE_CLRBIT(sc, NGE_CFG, NGE_CFG_MODE_1000);
608                 }
609         }
610 }
611
612 static void
613 nge_setmulti(struct nge_softc *sc)
614 {
615         struct ifnet *ifp = &sc->arpcom.ac_if;
616         struct ifmultiaddr *ifma;
617         uint32_t filtsave, h = 0, i;
618         int bit, index;
619
620         if (ifp->if_flags & IFF_ALLMULTI || ifp->if_flags & IFF_PROMISC) {
621                 NGE_CLRBIT(sc, NGE_RXFILT_CTL,
622                     NGE_RXFILTCTL_MCHASH | NGE_RXFILTCTL_UCHASH);
623                 NGE_SETBIT(sc, NGE_RXFILT_CTL, NGE_RXFILTCTL_ALLMULTI);
624                 return;
625         }
626
627         /*
628          * We have to explicitly enable the multicast hash table
629          * on the NatSemi chip if we want to use it, which we do.
630          * We also have to tell it that we don't want to use the
631          * hash table for matching unicast addresses.
632          */
633         NGE_SETBIT(sc, NGE_RXFILT_CTL, NGE_RXFILTCTL_MCHASH);
634         NGE_CLRBIT(sc, NGE_RXFILT_CTL,
635             NGE_RXFILTCTL_ALLMULTI | NGE_RXFILTCTL_UCHASH);
636
637         filtsave = CSR_READ_4(sc, NGE_RXFILT_CTL);
638
639         /* first, zot all the existing hash bits */
640         for (i = 0; i < NGE_MCAST_FILTER_LEN; i += 2) {
641                 CSR_WRITE_4(sc, NGE_RXFILT_CTL, NGE_FILTADDR_MCAST_LO + i);
642                 CSR_WRITE_4(sc, NGE_RXFILT_DATA, 0);
643         }
644
645         /*
646          * From the 11 bits returned by the crc routine, the top 7
647          * bits represent the 16-bit word in the mcast hash table
648          * that needs to be updated, and the lower 4 bits represent
649          * which bit within that byte needs to be set.
650          */
651         LIST_FOREACH(ifma, &ifp->if_multiaddrs, ifma_link) {
652                 if (ifma->ifma_addr->sa_family != AF_LINK)
653                         continue;
654                 h = ether_crc32_be(LLADDR((struct sockaddr_dl *)
655                     ifma->ifma_addr), ETHER_ADDR_LEN) >> 21;
656                 index = (h >> 4) & 0x7F;
657                 bit = h & 0xF;
658                 CSR_WRITE_4(sc, NGE_RXFILT_CTL,
659                     NGE_FILTADDR_MCAST_LO + (index * 2));
660                 NGE_SETBIT(sc, NGE_RXFILT_DATA, (1 << bit));
661         }
662
663         CSR_WRITE_4(sc, NGE_RXFILT_CTL, filtsave);
664 }
665
666 static void
667 nge_reset(struct nge_softc *sc)
668 {
669         int i;
670
671         NGE_SETBIT(sc, NGE_CSR, NGE_CSR_RESET);
672
673         for (i = 0; i < NGE_TIMEOUT; i++) {
674                 if ((CSR_READ_4(sc, NGE_CSR) & NGE_CSR_RESET) == 0)
675                         break;
676         }
677
678         if (i == NGE_TIMEOUT)
679                 kprintf("nge%d: reset never completed\n", sc->nge_unit);
680
681         /* Wait a little while for the chip to get its brains in order. */
682         DELAY(1000);
683
684         /*
685          * If this is a NetSemi chip, make sure to clear
686          * PME mode.
687          */
688         CSR_WRITE_4(sc, NGE_CLKRUN, NGE_CLKRUN_PMESTS);
689         CSR_WRITE_4(sc, NGE_CLKRUN, 0);
690 }
691
692 /*
693  * Probe for an NatSemi chip. Check the PCI vendor and device
694  * IDs against our list and return a device name if we find a match.
695  */
696 static int
697 nge_probe(device_t dev)
698 {
699         struct nge_type *t;
700         uint16_t vendor, product;
701
702         vendor = pci_get_vendor(dev);
703         product = pci_get_device(dev);
704
705         for (t = nge_devs; t->nge_name != NULL; t++) {
706                 if (vendor == t->nge_vid && product == t->nge_did) {
707                         device_set_desc(dev, t->nge_name);
708                         return(0);
709                 }
710         }
711
712         return(ENXIO);
713 }
714
715 /*
716  * Attach the interface. Allocate softc structures, do ifmedia
717  * setup and ethernet/BPF attach.
718  */
719 static int
720 nge_attach(device_t dev)
721 {
722         struct nge_softc *sc;
723         struct ifnet *ifp;
724         uint8_t eaddr[ETHER_ADDR_LEN];
725         uint32_t                command;
726         int error = 0, rid, unit;
727         const char              *sep = "";
728
729         sc = device_get_softc(dev);
730         unit = device_get_unit(dev);
731         callout_init(&sc->nge_stat_timer);
732         lwkt_serialize_init(&sc->nge_jslot_serializer);
733
734         /*
735          * Handle power management nonsense.
736          */
737         command = pci_read_config(dev, NGE_PCI_CAPID, 4) & 0x000000FF;
738         if (command == 0x01) {
739                 command = pci_read_config(dev, NGE_PCI_PWRMGMTCTRL, 4);
740                 if (command & NGE_PSTATE_MASK) {
741                         uint32_t                iobase, membase, irq;
742
743                         /* Save important PCI config data. */
744                         iobase = pci_read_config(dev, NGE_PCI_LOIO, 4);
745                         membase = pci_read_config(dev, NGE_PCI_LOMEM, 4);
746                         irq = pci_read_config(dev, NGE_PCI_INTLINE, 4);
747
748                         /* Reset the power state. */
749                         kprintf("nge%d: chip is in D%d power mode "
750                         "-- setting to D0\n", unit, command & NGE_PSTATE_MASK);
751                         command &= 0xFFFFFFFC;
752                         pci_write_config(dev, NGE_PCI_PWRMGMTCTRL, command, 4);
753
754                         /* Restore PCI config data. */
755                         pci_write_config(dev, NGE_PCI_LOIO, iobase, 4);
756                         pci_write_config(dev, NGE_PCI_LOMEM, membase, 4);
757                         pci_write_config(dev, NGE_PCI_INTLINE, irq, 4);
758                 }
759         }
760
761         /*
762          * Map control/status registers.
763          */
764         command = pci_read_config(dev, PCIR_COMMAND, 4);
765         command |= (PCIM_CMD_PORTEN|PCIM_CMD_MEMEN|PCIM_CMD_BUSMASTEREN);
766         pci_write_config(dev, PCIR_COMMAND, command, 4);
767         command = pci_read_config(dev, PCIR_COMMAND, 4);
768
769 #ifdef NGE_USEIOSPACE
770         if (!(command & PCIM_CMD_PORTEN)) {
771                 kprintf("nge%d: failed to enable I/O ports!\n", unit);
772                 error = ENXIO;
773                 return(error);
774         }
775 #else
776         if (!(command & PCIM_CMD_MEMEN)) {
777                 kprintf("nge%d: failed to enable memory mapping!\n", unit);
778                 error = ENXIO;
779                 return(error);
780         }
781 #endif
782
783         rid = NGE_RID;
784         sc->nge_res = bus_alloc_resource_any(dev, NGE_RES, &rid, RF_ACTIVE);
785
786         if (sc->nge_res == NULL) {
787                 kprintf("nge%d: couldn't map ports/memory\n", unit);
788                 error = ENXIO;
789                 return(error);
790         }
791
792         sc->nge_btag = rman_get_bustag(sc->nge_res);
793         sc->nge_bhandle = rman_get_bushandle(sc->nge_res);
794
795         /* Allocate interrupt */
796         rid = 0;
797         sc->nge_irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &rid,
798             RF_SHAREABLE | RF_ACTIVE);
799
800         if (sc->nge_irq == NULL) {
801                 kprintf("nge%d: couldn't map interrupt\n", unit);
802                 error = ENXIO;
803                 goto fail;
804         }
805
806         /* Reset the adapter. */
807         nge_reset(sc);
808
809         /*
810          * Get station address from the EEPROM.
811          */
812         nge_read_eeprom(sc, &eaddr[4], NGE_EE_NODEADDR, 1);
813         nge_read_eeprom(sc, &eaddr[2], NGE_EE_NODEADDR + 1, 1);
814         nge_read_eeprom(sc, &eaddr[0], NGE_EE_NODEADDR + 2, 1);
815
816         sc->nge_unit = unit;
817
818         sc->nge_ldata = contigmalloc(sizeof(struct nge_list_data), M_DEVBUF,
819             M_WAITOK | M_ZERO, 0, 0xffffffff, PAGE_SIZE, 0);
820
821         if (sc->nge_ldata == NULL) {
822                 kprintf("nge%d: no memory for list buffers!\n", unit);
823                 error = ENXIO;
824                 goto fail;
825         }
826
827         /* Try to allocate memory for jumbo buffers. */
828         if (nge_alloc_jumbo_mem(sc)) {
829                 kprintf("nge%d: jumbo buffer allocation failed\n",
830                     sc->nge_unit);
831                 error = ENXIO;
832                 goto fail;
833         }
834
835         ifp = &sc->arpcom.ac_if;
836         ifp->if_softc = sc;
837         if_initname(ifp, "nge", unit);
838         ifp->if_mtu = ETHERMTU;
839         ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
840         ifp->if_ioctl = nge_ioctl;
841         ifp->if_start = nge_start;
842 #ifdef DEVICE_POLLING
843         ifp->if_poll = nge_poll;
844 #endif
845         ifp->if_watchdog = nge_watchdog;
846         ifp->if_init = nge_init;
847         ifp->if_baudrate = 1000000000;
848         ifq_set_maxlen(&ifp->if_snd, NGE_TX_LIST_CNT - 1);
849         ifq_set_ready(&ifp->if_snd);
850         ifp->if_hwassist = NGE_CSUM_FEATURES;
851         ifp->if_capabilities = IFCAP_HWCSUM | IFCAP_VLAN_HWTAGGING;
852         ifp->if_capenable = ifp->if_capabilities;
853
854         /*
855          * Do MII setup.
856          */
857         if (mii_phy_probe(dev, &sc->nge_miibus,
858                           nge_ifmedia_upd, nge_ifmedia_sts)) {
859                 if (CSR_READ_4(sc, NGE_CFG) & NGE_CFG_TBI_EN) {
860                         sc->nge_tbi = 1;
861                         device_printf(dev, "Using TBI\n");
862                         
863                         sc->nge_miibus = dev;
864
865                         ifmedia_init(&sc->nge_ifmedia, 0, nge_ifmedia_upd, 
866                                 nge_ifmedia_sts);
867 #define ADD(m, c)       ifmedia_add(&sc->nge_ifmedia, (m), (c), NULL)
868 #define PRINT(s)        kprintf("%s%s", sep, s); sep = ", "
869                         ADD(IFM_MAKEWORD(IFM_ETHER, IFM_NONE, 0, 0), 0);
870                         device_printf(dev, " ");
871                         ADD(IFM_MAKEWORD(IFM_ETHER, IFM_1000_SX, 0, 0), 0);
872                         PRINT("1000baseSX");
873                         ADD(IFM_MAKEWORD(IFM_ETHER, IFM_1000_SX, IFM_FDX, 0),0);
874                         PRINT("1000baseSX-FDX");
875                         ADD(IFM_MAKEWORD(IFM_ETHER, IFM_AUTO, 0, 0), 0);
876                         PRINT("auto");
877             
878                         kprintf("\n");
879 #undef ADD
880 #undef PRINT
881                         ifmedia_set(&sc->nge_ifmedia, 
882                                 IFM_MAKEWORD(IFM_ETHER, IFM_AUTO, 0, 0));
883             
884                         CSR_WRITE_4(sc, NGE_GPIO, CSR_READ_4(sc, NGE_GPIO)
885                                 | NGE_GPIO_GP4_OUT 
886                                 | NGE_GPIO_GP1_OUTENB | NGE_GPIO_GP2_OUTENB 
887                                 | NGE_GPIO_GP3_OUTENB
888                                 | NGE_GPIO_GP3_IN | NGE_GPIO_GP4_IN);
889             
890                 } else {
891                         kprintf("nge%d: MII without any PHY!\n", sc->nge_unit);
892                         error = ENXIO;
893                         goto fail;
894                 }
895         }
896
897         /*
898          * Call MI attach routine.
899          */
900         ether_ifattach(ifp, eaddr, NULL);
901
902         error = bus_setup_intr(dev, sc->nge_irq, INTR_NETSAFE,
903                                nge_intr, sc, &sc->nge_intrhand, 
904                                ifp->if_serializer);
905         if (error) {
906                 ether_ifdetach(ifp);
907                 device_printf(dev, "couldn't set up irq\n");
908                 goto fail;
909         }
910
911         ifp->if_cpuid = ithread_cpuid(rman_get_start(sc->nge_irq));
912         KKASSERT(ifp->if_cpuid >= 0 && ifp->if_cpuid < ncpus);
913
914         return(0);
915 fail:
916         nge_detach(dev);
917         return(error);
918 }
919
920 static int
921 nge_detach(device_t dev)
922 {
923         struct nge_softc *sc = device_get_softc(dev);
924         struct ifnet *ifp = &sc->arpcom.ac_if;
925
926         if (device_is_attached(dev)) {
927                 lwkt_serialize_enter(ifp->if_serializer);
928                 nge_reset(sc);
929                 nge_stop(sc);
930                 bus_teardown_intr(dev, sc->nge_irq, sc->nge_intrhand);
931                 lwkt_serialize_exit(ifp->if_serializer);
932
933                 ether_ifdetach(ifp);
934         }
935
936         if (sc->nge_miibus)
937                 device_delete_child(dev, sc->nge_miibus);
938         bus_generic_detach(dev);
939
940         if (sc->nge_irq)
941                 bus_release_resource(dev, SYS_RES_IRQ, 0, sc->nge_irq);
942         if (sc->nge_res)
943                 bus_release_resource(dev, NGE_RES, NGE_RID, sc->nge_res);
944         if (sc->nge_ldata) {
945                 contigfree(sc->nge_ldata, sizeof(struct nge_list_data),
946                            M_DEVBUF);
947         }
948         if (sc->nge_cdata.nge_jumbo_buf)
949                 contigfree(sc->nge_cdata.nge_jumbo_buf, NGE_JMEM, M_DEVBUF);
950
951         return(0);
952 }
953
954 /*
955  * Initialize the transmit descriptors.
956  */
957 static int
958 nge_list_tx_init(struct nge_softc *sc)
959 {
960         struct nge_list_data *ld;
961         struct nge_ring_data *cd;
962         int i;
963
964         cd = &sc->nge_cdata;
965         ld = sc->nge_ldata;
966
967         for (i = 0; i < NGE_TX_LIST_CNT; i++) {
968                 if (i == (NGE_TX_LIST_CNT - 1)) {
969                         ld->nge_tx_list[i].nge_nextdesc =
970                             &ld->nge_tx_list[0];
971                         ld->nge_tx_list[i].nge_next =
972                             vtophys(&ld->nge_tx_list[0]);
973                 } else {
974                         ld->nge_tx_list[i].nge_nextdesc =
975                             &ld->nge_tx_list[i + 1];
976                         ld->nge_tx_list[i].nge_next =
977                             vtophys(&ld->nge_tx_list[i + 1]);
978                 }
979                 ld->nge_tx_list[i].nge_mbuf = NULL;
980                 ld->nge_tx_list[i].nge_ptr = 0;
981                 ld->nge_tx_list[i].nge_ctl = 0;
982         }
983
984         cd->nge_tx_prod = cd->nge_tx_cons = cd->nge_tx_cnt = 0;
985
986         return(0);
987 }
988
989
990 /*
991  * Initialize the RX descriptors and allocate mbufs for them. Note that
992  * we arrange the descriptors in a closed ring, so that the last descriptor
993  * points back to the first.
994  */
995 static int
996 nge_list_rx_init(struct nge_softc *sc)
997 {
998         struct nge_list_data *ld;
999         struct nge_ring_data *cd;
1000         int i;
1001
1002         ld = sc->nge_ldata;
1003         cd = &sc->nge_cdata;
1004
1005         for (i = 0; i < NGE_RX_LIST_CNT; i++) {
1006                 if (nge_newbuf(sc, &ld->nge_rx_list[i], NULL) == ENOBUFS)
1007                         return(ENOBUFS);
1008                 if (i == (NGE_RX_LIST_CNT - 1)) {
1009                         ld->nge_rx_list[i].nge_nextdesc =
1010                             &ld->nge_rx_list[0];
1011                         ld->nge_rx_list[i].nge_next =
1012                             vtophys(&ld->nge_rx_list[0]);
1013                 } else {
1014                         ld->nge_rx_list[i].nge_nextdesc =
1015                             &ld->nge_rx_list[i + 1];
1016                         ld->nge_rx_list[i].nge_next =
1017                             vtophys(&ld->nge_rx_list[i + 1]);
1018                 }
1019         }
1020
1021         cd->nge_rx_prod = 0;
1022
1023         return(0);
1024 }
1025
1026 /*
1027  * Initialize an RX descriptor and attach an MBUF cluster.
1028  */
1029 static int
1030 nge_newbuf(struct nge_softc *sc, struct nge_desc *c, struct mbuf *m)
1031 {
1032         struct mbuf *m_new = NULL;
1033         struct nge_jslot *buf;
1034
1035         if (m == NULL) {
1036                 MGETHDR(m_new, MB_DONTWAIT, MT_DATA);
1037                 if (m_new == NULL) {
1038                         kprintf("nge%d: no memory for rx list "
1039                             "-- packet dropped!\n", sc->nge_unit);
1040                         return(ENOBUFS);
1041                 }
1042
1043                 /* Allocate the jumbo buffer */
1044                 buf = nge_jalloc(sc);
1045                 if (buf == NULL) {
1046 #ifdef NGE_VERBOSE
1047                         kprintf("nge%d: jumbo allocation failed "
1048                             "-- packet dropped!\n", sc->nge_unit);
1049 #endif
1050                         m_freem(m_new);
1051                         return(ENOBUFS);
1052                 }
1053                 /* Attach the buffer to the mbuf */
1054                 m_new->m_ext.ext_arg = buf;
1055                 m_new->m_ext.ext_buf = buf->nge_buf;
1056                 m_new->m_ext.ext_free = nge_jfree;
1057                 m_new->m_ext.ext_ref = nge_jref;
1058                 m_new->m_ext.ext_size = NGE_JUMBO_FRAMELEN;
1059
1060                 m_new->m_data = m_new->m_ext.ext_buf;
1061                 m_new->m_flags |= M_EXT;
1062                 m_new->m_len = m_new->m_pkthdr.len = m_new->m_ext.ext_size;
1063         } else {
1064                 m_new = m;
1065                 m_new->m_len = m_new->m_pkthdr.len = NGE_JLEN;
1066                 m_new->m_data = m_new->m_ext.ext_buf;
1067         }
1068
1069         m_adj(m_new, sizeof(uint64_t));
1070
1071         c->nge_mbuf = m_new;
1072         c->nge_ptr = vtophys(mtod(m_new, caddr_t));
1073         c->nge_ctl = m_new->m_len;
1074         c->nge_extsts = 0;
1075
1076         return(0);
1077 }
1078
1079 static int
1080 nge_alloc_jumbo_mem(struct nge_softc *sc)
1081 {
1082         caddr_t ptr;
1083         int i;
1084         struct nge_jslot *entry;
1085
1086         /* Grab a big chunk o' storage. */
1087         sc->nge_cdata.nge_jumbo_buf = contigmalloc(NGE_JMEM, M_DEVBUF,
1088             M_WAITOK, 0, 0xffffffff, PAGE_SIZE, 0);
1089
1090         if (sc->nge_cdata.nge_jumbo_buf == NULL) {
1091                 kprintf("nge%d: no memory for jumbo buffers!\n", sc->nge_unit);
1092                 return(ENOBUFS);
1093         }
1094
1095         SLIST_INIT(&sc->nge_jfree_listhead);
1096
1097         /*
1098          * Now divide it up into 9K pieces and save the addresses
1099          * in an array.
1100          */
1101         ptr = sc->nge_cdata.nge_jumbo_buf;
1102         for (i = 0; i < NGE_JSLOTS; i++) {
1103                 entry = &sc->nge_cdata.nge_jslots[i];
1104                 entry->nge_sc = sc;
1105                 entry->nge_buf = ptr;
1106                 entry->nge_inuse = 0;
1107                 entry->nge_slot = i;
1108                 SLIST_INSERT_HEAD(&sc->nge_jfree_listhead, entry, jslot_link);
1109                 ptr += NGE_JLEN;
1110         }
1111
1112         return(0);
1113 }
1114
1115
1116 /*
1117  * Allocate a jumbo buffer.
1118  */
1119 static struct nge_jslot *
1120 nge_jalloc(struct nge_softc *sc)
1121 {
1122         struct nge_jslot *entry;
1123
1124         lwkt_serialize_enter(&sc->nge_jslot_serializer);
1125         entry = SLIST_FIRST(&sc->nge_jfree_listhead);
1126         if (entry) {
1127                 SLIST_REMOVE_HEAD(&sc->nge_jfree_listhead, jslot_link);
1128                 entry->nge_inuse = 1;
1129         } else {
1130 #ifdef NGE_VERBOSE
1131                 kprintf("nge%d: no free jumbo buffers\n", sc->nge_unit);
1132 #endif
1133         }
1134         lwkt_serialize_exit(&sc->nge_jslot_serializer);
1135         return(entry);
1136 }
1137
1138 /*
1139  * Adjust usage count on a jumbo buffer. In general this doesn't
1140  * get used much because our jumbo buffers don't get passed around
1141  * a lot, but it's implemented for correctness.
1142  */
1143 static void
1144 nge_jref(void *arg)
1145 {
1146         struct nge_jslot *entry = (struct nge_jslot *)arg;
1147         struct nge_softc *sc = entry->nge_sc;
1148
1149         if (sc == NULL)
1150                 panic("nge_jref: can't find softc pointer!");
1151
1152         if (&sc->nge_cdata.nge_jslots[entry->nge_slot] != entry)
1153                 panic("nge_jref: asked to reference buffer "
1154                     "that we don't manage!");
1155         else if (entry->nge_inuse == 0)
1156                 panic("nge_jref: buffer already free!");
1157         else
1158                 atomic_add_int(&entry->nge_inuse, 1);
1159 }
1160
1161 /*
1162  * Release a jumbo buffer.
1163  */
1164 static void
1165 nge_jfree(void *arg)
1166 {
1167         struct nge_jslot *entry = (struct nge_jslot *)arg;
1168         struct nge_softc *sc = entry->nge_sc;
1169
1170         if (sc == NULL)
1171                 panic("nge_jref: can't find softc pointer!");
1172
1173         if (&sc->nge_cdata.nge_jslots[entry->nge_slot] != entry) {
1174                 panic("nge_jref: asked to reference buffer "
1175                     "that we don't manage!");
1176         } else if (entry->nge_inuse == 0) {
1177                 panic("nge_jref: buffer already free!");
1178         } else {
1179                 lwkt_serialize_enter(&sc->nge_jslot_serializer);
1180                 atomic_subtract_int(&entry->nge_inuse, 1);
1181                 if (entry->nge_inuse == 0) {
1182                         SLIST_INSERT_HEAD(&sc->nge_jfree_listhead, 
1183                                           entry, jslot_link);
1184                 }
1185                 lwkt_serialize_exit(&sc->nge_jslot_serializer);
1186         }
1187 }
1188 /*
1189  * A frame has been uploaded: pass the resulting mbuf chain up to
1190  * the higher level protocols.
1191  */
1192 static void
1193 nge_rxeof(struct nge_softc *sc)
1194 {
1195         struct mbuf *m;
1196         struct ifnet *ifp = &sc->arpcom.ac_if;
1197         struct nge_desc *cur_rx;
1198         int i, total_len = 0;
1199         uint32_t rxstat;
1200
1201         i = sc->nge_cdata.nge_rx_prod;
1202
1203         while(NGE_OWNDESC(&sc->nge_ldata->nge_rx_list[i])) {
1204                 struct mbuf *m0 = NULL;
1205                 uint32_t extsts;
1206
1207 #ifdef DEVICE_POLLING
1208                 if (ifp->if_flags & IFF_POLLING) {
1209                         if (sc->rxcycles <= 0)
1210                                 break;
1211                         sc->rxcycles--;
1212                 }
1213 #endif /* DEVICE_POLLING */
1214
1215                 cur_rx = &sc->nge_ldata->nge_rx_list[i];
1216                 rxstat = cur_rx->nge_rxstat;
1217                 extsts = cur_rx->nge_extsts;
1218                 m = cur_rx->nge_mbuf;
1219                 cur_rx->nge_mbuf = NULL;
1220                 total_len = NGE_RXBYTES(cur_rx);
1221                 NGE_INC(i, NGE_RX_LIST_CNT);
1222                 /*
1223                  * If an error occurs, update stats, clear the
1224                  * status word and leave the mbuf cluster in place:
1225                  * it should simply get re-used next time this descriptor
1226                  * comes up in the ring.
1227                  */
1228                 if ((rxstat & NGE_CMDSTS_PKT_OK) == 0) {
1229                         ifp->if_ierrors++;
1230                         nge_newbuf(sc, cur_rx, m);
1231                         continue;
1232                 }
1233
1234                 /*
1235                  * Ok. NatSemi really screwed up here. This is the
1236                  * only gigE chip I know of with alignment constraints
1237                  * on receive buffers. RX buffers must be 64-bit aligned.
1238                  */
1239 #ifdef __i386__
1240                 /*
1241                  * By popular demand, ignore the alignment problems
1242                  * on the Intel x86 platform. The performance hit
1243                  * incurred due to unaligned accesses is much smaller
1244                  * than the hit produced by forcing buffer copies all
1245                  * the time, especially with jumbo frames. We still
1246                  * need to fix up the alignment everywhere else though.
1247                  */
1248                 if (nge_newbuf(sc, cur_rx, NULL) == ENOBUFS) {
1249 #endif
1250                         m0 = m_devget(mtod(m, char *) - ETHER_ALIGN,
1251                             total_len + ETHER_ALIGN, 0, ifp, NULL);
1252                         nge_newbuf(sc, cur_rx, m);
1253                         if (m0 == NULL) {
1254                                 kprintf("nge%d: no receive buffers "
1255                                     "available -- packet dropped!\n",
1256                                     sc->nge_unit);
1257                                 ifp->if_ierrors++;
1258                                 continue;
1259                         }
1260                         m_adj(m0, ETHER_ALIGN);
1261                         m = m0;
1262 #ifdef __i386__
1263                 } else {
1264                         m->m_pkthdr.rcvif = ifp;
1265                         m->m_pkthdr.len = m->m_len = total_len;
1266                 }
1267 #endif
1268
1269                 ifp->if_ipackets++;
1270
1271                 /* Do IP checksum checking. */
1272                 if (extsts & NGE_RXEXTSTS_IPPKT)
1273                         m->m_pkthdr.csum_flags |= CSUM_IP_CHECKED;
1274                 if (!(extsts & NGE_RXEXTSTS_IPCSUMERR))
1275                         m->m_pkthdr.csum_flags |= CSUM_IP_VALID;
1276                 if ((extsts & NGE_RXEXTSTS_TCPPKT &&
1277                     (extsts & NGE_RXEXTSTS_TCPCSUMERR) == 0) ||
1278                     (extsts & NGE_RXEXTSTS_UDPPKT &&
1279                     (extsts & NGE_RXEXTSTS_UDPCSUMERR) == 0)) {
1280                         m->m_pkthdr.csum_flags |=
1281                             CSUM_DATA_VALID|CSUM_PSEUDO_HDR|
1282                             CSUM_FRAG_NOT_CHECKED;
1283                         m->m_pkthdr.csum_data = 0xffff;
1284                 }
1285
1286                 /*
1287                  * If we received a packet with a vlan tag, pass it
1288                  * to vlan_input() instead of ether_input().
1289                  */
1290                 if (extsts & NGE_RXEXTSTS_VLANPKT)
1291                         VLAN_INPUT_TAG(m, extsts & NGE_RXEXTSTS_VTCI);
1292                 else
1293                         ifp->if_input(ifp, m);
1294         }
1295
1296         sc->nge_cdata.nge_rx_prod = i;
1297 }
1298
1299 /*
1300  * A frame was downloaded to the chip. It's safe for us to clean up
1301  * the list buffers.
1302  */
1303 static void
1304 nge_txeof(struct nge_softc *sc)
1305 {
1306         struct ifnet *ifp = &sc->arpcom.ac_if;
1307         struct nge_desc *cur_tx = NULL;
1308         uint32_t idx;
1309
1310         /* Clear the timeout timer. */
1311         ifp->if_timer = 0;
1312
1313         /*
1314          * Go through our tx list and free mbufs for those
1315          * frames that have been transmitted.
1316          */
1317         idx = sc->nge_cdata.nge_tx_cons;
1318         while (idx != sc->nge_cdata.nge_tx_prod) {
1319                 cur_tx = &sc->nge_ldata->nge_tx_list[idx];
1320
1321                 if (NGE_OWNDESC(cur_tx))
1322                         break;
1323
1324                 if (cur_tx->nge_ctl & NGE_CMDSTS_MORE) {
1325                         sc->nge_cdata.nge_tx_cnt--;
1326                         NGE_INC(idx, NGE_TX_LIST_CNT);
1327                         continue;
1328                 }
1329
1330                 if (!(cur_tx->nge_ctl & NGE_CMDSTS_PKT_OK)) {
1331                         ifp->if_oerrors++;
1332                         if (cur_tx->nge_txstat & NGE_TXSTAT_EXCESSCOLLS)
1333                                 ifp->if_collisions++;
1334                         if (cur_tx->nge_txstat & NGE_TXSTAT_OUTOFWINCOLL)
1335                                 ifp->if_collisions++;
1336                 }
1337
1338                 ifp->if_collisions +=
1339                     (cur_tx->nge_txstat & NGE_TXSTAT_COLLCNT) >> 16;
1340
1341                 ifp->if_opackets++;
1342                 if (cur_tx->nge_mbuf != NULL) {
1343                         m_freem(cur_tx->nge_mbuf);
1344                         cur_tx->nge_mbuf = NULL;
1345                 }
1346
1347                 sc->nge_cdata.nge_tx_cnt--;
1348                 NGE_INC(idx, NGE_TX_LIST_CNT);
1349                 ifp->if_timer = 0;
1350         }
1351
1352         sc->nge_cdata.nge_tx_cons = idx;
1353
1354         if (cur_tx != NULL)
1355                 ifp->if_flags &= ~IFF_OACTIVE;
1356 }
1357
1358 static void
1359 nge_tick(void *xsc)
1360 {
1361         struct nge_softc *sc = xsc;
1362         struct ifnet *ifp = &sc->arpcom.ac_if;
1363         struct mii_data *mii;
1364
1365         lwkt_serialize_enter(ifp->if_serializer);
1366
1367         if (sc->nge_tbi) {
1368                 if (sc->nge_link == 0) {
1369                         if (CSR_READ_4(sc, NGE_TBI_BMSR) 
1370                             & NGE_TBIBMSR_ANEG_DONE) {
1371                                 kprintf("nge%d: gigabit link up\n",
1372                                     sc->nge_unit);
1373                                 nge_miibus_statchg(sc->nge_miibus);
1374                                 sc->nge_link++;
1375                                 if (!ifq_is_empty(&ifp->if_snd))
1376                                         if_devstart(ifp);
1377                         }
1378                 }
1379         } else {
1380                 mii = device_get_softc(sc->nge_miibus);
1381                 mii_tick(mii);
1382
1383                 if (sc->nge_link == 0) {
1384                         if (mii->mii_media_status & IFM_ACTIVE &&
1385                             IFM_SUBTYPE(mii->mii_media_active) != IFM_NONE) {
1386                                 sc->nge_link++;
1387                                 if (IFM_SUBTYPE(mii->mii_media_active) 
1388                                     == IFM_1000_T)
1389                                         kprintf("nge%d: gigabit link up\n",
1390                                             sc->nge_unit);
1391                                 if (!ifq_is_empty(&ifp->if_snd))
1392                                         if_devstart(ifp);
1393                         }
1394                 }
1395         }
1396         callout_reset(&sc->nge_stat_timer, hz, nge_tick, sc);
1397
1398         lwkt_serialize_exit(ifp->if_serializer);
1399 }
1400
1401 #ifdef DEVICE_POLLING
1402
1403 static void
1404 nge_poll(struct ifnet *ifp, enum poll_cmd cmd, int count)
1405 {
1406         struct nge_softc *sc = ifp->if_softc;
1407
1408         switch(cmd) {
1409         case POLL_REGISTER:
1410                 /* disable interrupts */
1411                 CSR_WRITE_4(sc, NGE_IER, 0);
1412                 break;
1413         case POLL_DEREGISTER:
1414                 /* enable interrupts */
1415                 CSR_WRITE_4(sc, NGE_IER, 1);
1416                 break;
1417         default:
1418                 /*
1419                  * On the nge, reading the status register also clears it.
1420                  * So before returning to intr mode we must make sure that all
1421                  * possible pending sources of interrupts have been served.
1422                  * In practice this means run to completion the *eof routines,
1423                  * and then call the interrupt routine
1424                  */
1425                 sc->rxcycles = count;
1426                 nge_rxeof(sc);
1427                 nge_txeof(sc);
1428                 if (!ifq_is_empty(&ifp->if_snd))
1429                         if_devstart(ifp);
1430
1431                 if (sc->rxcycles > 0 || cmd == POLL_AND_CHECK_STATUS) {
1432                         uint32_t status;
1433
1434                         /* Reading the ISR register clears all interrupts. */
1435                         status = CSR_READ_4(sc, NGE_ISR);
1436
1437                         if (status & (NGE_ISR_RX_ERR|NGE_ISR_RX_OFLOW))
1438                                 nge_rxeof(sc);
1439
1440                         if (status & (NGE_ISR_RX_IDLE))
1441                                 NGE_SETBIT(sc, NGE_CSR, NGE_CSR_RX_ENABLE);
1442
1443                         if (status & NGE_ISR_SYSERR) {
1444                                 nge_reset(sc);
1445                                 nge_init(sc);
1446                         }
1447                 }
1448                 break;
1449         }
1450 }
1451
1452 #endif /* DEVICE_POLLING */
1453
1454 static void
1455 nge_intr(void *arg)
1456 {
1457         struct nge_softc *sc = arg;
1458         struct ifnet *ifp = &sc->arpcom.ac_if;
1459         uint32_t status;
1460
1461         /* Supress unwanted interrupts */
1462         if (!(ifp->if_flags & IFF_UP)) {
1463                 nge_stop(sc);
1464                 return;
1465         }
1466
1467         /* Disable interrupts. */
1468         CSR_WRITE_4(sc, NGE_IER, 0);
1469
1470         /* Data LED on for TBI mode */
1471         if(sc->nge_tbi)
1472                  CSR_WRITE_4(sc, NGE_GPIO, CSR_READ_4(sc, NGE_GPIO)
1473                              | NGE_GPIO_GP3_OUT);
1474
1475         for (;;) {
1476                 /* Reading the ISR register clears all interrupts. */
1477                 status = CSR_READ_4(sc, NGE_ISR);
1478
1479                 if ((status & NGE_INTRS) == 0)
1480                         break;
1481
1482                 if ((status & NGE_ISR_TX_DESC_OK) ||
1483                     (status & NGE_ISR_TX_ERR) ||
1484                     (status & NGE_ISR_TX_OK) ||
1485                     (status & NGE_ISR_TX_IDLE))
1486                         nge_txeof(sc);
1487
1488                 if ((status & NGE_ISR_RX_DESC_OK) ||
1489                     (status & NGE_ISR_RX_ERR) ||
1490                     (status & NGE_ISR_RX_OFLOW) ||
1491                     (status & NGE_ISR_RX_FIFO_OFLOW) ||
1492                     (status & NGE_ISR_RX_IDLE) ||
1493                     (status & NGE_ISR_RX_OK))
1494                         nge_rxeof(sc);
1495
1496                 if ((status & NGE_ISR_RX_IDLE))
1497                         NGE_SETBIT(sc, NGE_CSR, NGE_CSR_RX_ENABLE);
1498
1499                 if (status & NGE_ISR_SYSERR) {
1500                         nge_reset(sc);
1501                         ifp->if_flags &= ~IFF_RUNNING;
1502                         nge_init(sc);
1503                 }
1504
1505 #ifdef notyet
1506                 /* mii_tick should only be called once per second */
1507                 if (status & NGE_ISR_PHY_INTR) {
1508                         sc->nge_link = 0;
1509                         nge_tick_serialized(sc);
1510                 }
1511 #endif
1512         }
1513
1514         /* Re-enable interrupts. */
1515         CSR_WRITE_4(sc, NGE_IER, 1);
1516
1517         if (!ifq_is_empty(&ifp->if_snd))
1518                 if_devstart(ifp);
1519
1520         /* Data LED off for TBI mode */
1521
1522         if(sc->nge_tbi)
1523                 CSR_WRITE_4(sc, NGE_GPIO, CSR_READ_4(sc, NGE_GPIO)
1524                             & ~NGE_GPIO_GP3_OUT);
1525 }
1526
1527 /*
1528  * Encapsulate an mbuf chain in a descriptor by coupling the mbuf data
1529  * pointers to the fragment pointers.
1530  */
1531 static int
1532 nge_encap(struct nge_softc *sc, struct mbuf *m_head, uint32_t *txidx)
1533 {
1534         struct nge_desc *f = NULL;
1535         struct mbuf *m;
1536         int frag, cur, cnt = 0;
1537
1538         /*
1539          * Start packing the mbufs in this chain into
1540          * the fragment pointers. Stop when we run out
1541          * of fragments or hit the end of the mbuf chain.
1542          */
1543         cur = frag = *txidx;
1544
1545         for (m = m_head; m != NULL; m = m->m_next) {
1546                 if (m->m_len != 0) {
1547                         if ((NGE_TX_LIST_CNT -
1548                             (sc->nge_cdata.nge_tx_cnt + cnt)) < 2)
1549                                 break;
1550                         f = &sc->nge_ldata->nge_tx_list[frag];
1551                         f->nge_ctl = NGE_CMDSTS_MORE | m->m_len;
1552                         f->nge_ptr = vtophys(mtod(m, vm_offset_t));
1553                         if (cnt != 0)
1554                                 f->nge_ctl |= NGE_CMDSTS_OWN;
1555                         cur = frag;
1556                         NGE_INC(frag, NGE_TX_LIST_CNT);
1557                         cnt++;
1558                 }
1559         }
1560         /* Caller should make sure that 'm_head' is not excessive fragmented */
1561         KASSERT(m == NULL, ("too many fragments\n"));
1562
1563         sc->nge_ldata->nge_tx_list[*txidx].nge_extsts = 0;
1564         if (m_head->m_pkthdr.csum_flags) {
1565                 if (m_head->m_pkthdr.csum_flags & CSUM_IP)
1566                         sc->nge_ldata->nge_tx_list[*txidx].nge_extsts |=
1567                             NGE_TXEXTSTS_IPCSUM;
1568                 if (m_head->m_pkthdr.csum_flags & CSUM_TCP)
1569                         sc->nge_ldata->nge_tx_list[*txidx].nge_extsts |=
1570                             NGE_TXEXTSTS_TCPCSUM;
1571                 if (m_head->m_pkthdr.csum_flags & CSUM_UDP)
1572                         sc->nge_ldata->nge_tx_list[*txidx].nge_extsts |=
1573                             NGE_TXEXTSTS_UDPCSUM;
1574         }
1575
1576         if (m_head->m_flags & M_VLANTAG) {
1577                 sc->nge_ldata->nge_tx_list[cur].nge_extsts |=
1578                         (NGE_TXEXTSTS_VLANPKT|m_head->m_pkthdr.ether_vlantag);
1579         }
1580
1581         sc->nge_ldata->nge_tx_list[cur].nge_mbuf = m_head;
1582         sc->nge_ldata->nge_tx_list[cur].nge_ctl &= ~NGE_CMDSTS_MORE;
1583         sc->nge_ldata->nge_tx_list[*txidx].nge_ctl |= NGE_CMDSTS_OWN;
1584         sc->nge_cdata.nge_tx_cnt += cnt;
1585         *txidx = frag;
1586
1587         return(0);
1588 }
1589
1590 /*
1591  * Main transmit routine. To avoid having to do mbuf copies, we put pointers
1592  * to the mbuf data regions directly in the transmit lists. We also save a
1593  * copy of the pointers since the transmit list fragment pointers are
1594  * physical addresses.
1595  */
1596
1597 static void
1598 nge_start(struct ifnet *ifp)
1599 {
1600         struct nge_softc *sc = ifp->if_softc;
1601         struct mbuf *m_head = NULL, *m_defragged;
1602         uint32_t idx;
1603         int need_trans;
1604
1605         if (!sc->nge_link) {
1606                 ifq_purge(&ifp->if_snd);
1607                 return;
1608         }
1609
1610         idx = sc->nge_cdata.nge_tx_prod;
1611
1612         if ((ifp->if_flags & (IFF_OACTIVE | IFF_RUNNING)) != IFF_RUNNING)
1613                 return;
1614
1615         need_trans = 0;
1616         while (sc->nge_ldata->nge_tx_list[idx].nge_mbuf == NULL) {
1617                 struct mbuf *m;
1618                 int cnt;
1619
1620                 m_defragged = NULL;
1621                 m_head = ifq_dequeue(&ifp->if_snd, NULL);
1622                 if (m_head == NULL)
1623                         break;
1624
1625 again:
1626                 cnt = 0;
1627                 for (m = m_head; m != NULL; m = m->m_next)
1628                         ++cnt;
1629                 if ((NGE_TX_LIST_CNT -
1630                     (sc->nge_cdata.nge_tx_cnt + cnt)) < 2) {
1631                         if (m_defragged != NULL) {
1632                                 /*
1633                                  * Even after defragmentation, there
1634                                  * are still too many fragments, so
1635                                  * drop this packet.
1636                                  */
1637                                 m_freem(m_head);
1638                                 ifp->if_flags |= IFF_OACTIVE;
1639                                 break;
1640                         }
1641
1642                         m_defragged = m_defrag(m_head, MB_DONTWAIT);
1643                         if (m_defragged == NULL) {
1644                                 m_freem(m_head);
1645                                 continue;
1646                         }
1647                         m_head = m_defragged;
1648
1649                         /* Recount # of fragments */
1650                         goto again;
1651                 }
1652
1653                 nge_encap(sc, m_head, &idx);
1654                 need_trans = 1;
1655
1656                 ETHER_BPF_MTAP(ifp, m_head);
1657         }
1658
1659         if (!need_trans)
1660                 return;
1661
1662         /* Transmit */
1663         sc->nge_cdata.nge_tx_prod = idx;
1664         NGE_SETBIT(sc, NGE_CSR, NGE_CSR_TX_ENABLE);
1665
1666         /*
1667          * Set a timeout in case the chip goes out to lunch.
1668          */
1669         ifp->if_timer = 5;
1670 }
1671
1672 static void
1673 nge_init(void *xsc)
1674 {
1675         struct nge_softc *sc = xsc;
1676         struct ifnet *ifp = &sc->arpcom.ac_if;
1677         struct mii_data *mii;
1678
1679         if (ifp->if_flags & IFF_RUNNING) {
1680                 return;
1681         }
1682
1683         /*
1684          * Cancel pending I/O and free all RX/TX buffers.
1685          */
1686         nge_stop(sc);
1687         callout_reset(&sc->nge_stat_timer, hz, nge_tick, sc);
1688
1689         if (sc->nge_tbi)
1690                 mii = NULL;
1691         else
1692                 mii = device_get_softc(sc->nge_miibus);
1693
1694         /* Set MAC address */
1695         CSR_WRITE_4(sc, NGE_RXFILT_CTL, NGE_FILTADDR_PAR0);
1696         CSR_WRITE_4(sc, NGE_RXFILT_DATA,
1697             ((uint16_t *)sc->arpcom.ac_enaddr)[0]);
1698         CSR_WRITE_4(sc, NGE_RXFILT_CTL, NGE_FILTADDR_PAR1);
1699         CSR_WRITE_4(sc, NGE_RXFILT_DATA,
1700             ((uint16_t *)sc->arpcom.ac_enaddr)[1]);
1701         CSR_WRITE_4(sc, NGE_RXFILT_CTL, NGE_FILTADDR_PAR2);
1702         CSR_WRITE_4(sc, NGE_RXFILT_DATA,
1703             ((uint16_t *)sc->arpcom.ac_enaddr)[2]);
1704
1705         /* Init circular RX list. */
1706         if (nge_list_rx_init(sc) == ENOBUFS) {
1707                 kprintf("nge%d: initialization failed: no "
1708                         "memory for rx buffers\n", sc->nge_unit);
1709                 nge_stop(sc);
1710                 return;
1711         }
1712
1713         /*
1714          * Init tx descriptors.
1715          */
1716         nge_list_tx_init(sc);
1717
1718         /*
1719          * For the NatSemi chip, we have to explicitly enable the
1720          * reception of ARP frames, as well as turn on the 'perfect
1721          * match' filter where we store the station address, otherwise
1722          * we won't receive unicasts meant for this host.
1723          */
1724         NGE_SETBIT(sc, NGE_RXFILT_CTL, NGE_RXFILTCTL_ARP);
1725         NGE_SETBIT(sc, NGE_RXFILT_CTL, NGE_RXFILTCTL_PERFECT);
1726
1727          /* If we want promiscuous mode, set the allframes bit. */
1728         if (ifp->if_flags & IFF_PROMISC)
1729                 NGE_SETBIT(sc, NGE_RXFILT_CTL, NGE_RXFILTCTL_ALLPHYS);
1730         else
1731                 NGE_CLRBIT(sc, NGE_RXFILT_CTL, NGE_RXFILTCTL_ALLPHYS);
1732
1733         /*
1734          * Set the capture broadcast bit to capture broadcast frames.
1735          */
1736         if (ifp->if_flags & IFF_BROADCAST)
1737                 NGE_SETBIT(sc, NGE_RXFILT_CTL, NGE_RXFILTCTL_BROAD);
1738         else
1739                 NGE_CLRBIT(sc, NGE_RXFILT_CTL, NGE_RXFILTCTL_BROAD);
1740
1741         /*
1742          * Load the multicast filter.
1743          */
1744         nge_setmulti(sc);
1745
1746         /* Turn the receive filter on */
1747         NGE_SETBIT(sc, NGE_RXFILT_CTL, NGE_RXFILTCTL_ENABLE);
1748
1749         /*
1750          * Load the address of the RX and TX lists.
1751          */
1752         CSR_WRITE_4(sc, NGE_RX_LISTPTR,
1753             vtophys(&sc->nge_ldata->nge_rx_list[0]));
1754         CSR_WRITE_4(sc, NGE_TX_LISTPTR,
1755             vtophys(&sc->nge_ldata->nge_tx_list[0]));
1756
1757         /* Set RX configuration */
1758         CSR_WRITE_4(sc, NGE_RX_CFG, NGE_RXCFG);
1759         /*
1760          * Enable hardware checksum validation for all IPv4
1761          * packets, do not reject packets with bad checksums.
1762          */
1763         CSR_WRITE_4(sc, NGE_VLAN_IP_RXCTL, NGE_VIPRXCTL_IPCSUM_ENB);
1764
1765         /*
1766          * Tell the chip to detect and strip VLAN tag info from
1767          * received frames. The tag will be provided in the extsts
1768          * field in the RX descriptors.
1769          */
1770         NGE_SETBIT(sc, NGE_VLAN_IP_RXCTL,
1771             NGE_VIPRXCTL_TAG_DETECT_ENB|NGE_VIPRXCTL_TAG_STRIP_ENB);
1772
1773         /* Set TX configuration */
1774         CSR_WRITE_4(sc, NGE_TX_CFG, NGE_TXCFG);
1775
1776         /*
1777          * Enable TX IPv4 checksumming on a per-packet basis.
1778          */
1779         CSR_WRITE_4(sc, NGE_VLAN_IP_TXCTL, NGE_VIPTXCTL_CSUM_PER_PKT);
1780
1781         /*
1782          * Tell the chip to insert VLAN tags on a per-packet basis as
1783          * dictated by the code in the frame encapsulation routine.
1784          */
1785         NGE_SETBIT(sc, NGE_VLAN_IP_TXCTL, NGE_VIPTXCTL_TAG_PER_PKT);
1786
1787         /* Set full/half duplex mode. */
1788         if (sc->nge_tbi) {
1789                 if ((sc->nge_ifmedia.ifm_cur->ifm_media & IFM_GMASK) 
1790                     == IFM_FDX) {
1791                         NGE_SETBIT(sc, NGE_TX_CFG,
1792                             (NGE_TXCFG_IGN_HBEAT | NGE_TXCFG_IGN_CARR));
1793                         NGE_SETBIT(sc, NGE_RX_CFG, NGE_RXCFG_RX_FDX);
1794                 } else {
1795                         NGE_CLRBIT(sc, NGE_TX_CFG,
1796                             (NGE_TXCFG_IGN_HBEAT | NGE_TXCFG_IGN_CARR));
1797                         NGE_CLRBIT(sc, NGE_RX_CFG, NGE_RXCFG_RX_FDX);
1798                 }
1799         } else {
1800                 if ((mii->mii_media_active & IFM_GMASK) == IFM_FDX) {
1801                         NGE_SETBIT(sc, NGE_TX_CFG,
1802                             (NGE_TXCFG_IGN_HBEAT | NGE_TXCFG_IGN_CARR));
1803                         NGE_SETBIT(sc, NGE_RX_CFG, NGE_RXCFG_RX_FDX);
1804                 } else {
1805                         NGE_CLRBIT(sc, NGE_TX_CFG,
1806                             (NGE_TXCFG_IGN_HBEAT | NGE_TXCFG_IGN_CARR));
1807                         NGE_CLRBIT(sc, NGE_RX_CFG, NGE_RXCFG_RX_FDX);
1808                 }
1809         }
1810
1811         /*
1812          * Enable the delivery of PHY interrupts based on
1813          * link/speed/duplex status changes. Also enable the
1814          * extsts field in the DMA descriptors (needed for
1815          * TCP/IP checksum offload on transmit).
1816          */
1817         NGE_SETBIT(sc, NGE_CFG, NGE_CFG_PHYINTR_SPD |
1818             NGE_CFG_PHYINTR_LNK | NGE_CFG_PHYINTR_DUP | NGE_CFG_EXTSTS_ENB);
1819
1820         /*
1821          * Configure interrupt holdoff (moderation). We can
1822          * have the chip delay interrupt delivery for a certain
1823          * period. Units are in 100us, and the max setting
1824          * is 25500us (0xFF x 100us). Default is a 100us holdoff.
1825          */
1826         CSR_WRITE_4(sc, NGE_IHR, 0x01);
1827
1828         /*
1829          * Enable interrupts.
1830          */
1831         CSR_WRITE_4(sc, NGE_IMR, NGE_INTRS);
1832 #ifdef DEVICE_POLLING
1833         /*
1834          * ... only enable interrupts if we are not polling, make sure
1835          * they are off otherwise.
1836          */
1837         if (ifp->if_flags & IFF_POLLING)
1838                 CSR_WRITE_4(sc, NGE_IER, 0);
1839         else
1840 #endif /* DEVICE_POLLING */
1841         CSR_WRITE_4(sc, NGE_IER, 1);
1842
1843         /* Enable receiver and transmitter. */
1844         NGE_CLRBIT(sc, NGE_CSR, NGE_CSR_TX_DISABLE | NGE_CSR_RX_DISABLE);
1845         NGE_SETBIT(sc, NGE_CSR, NGE_CSR_RX_ENABLE);
1846
1847         nge_ifmedia_upd(ifp);
1848
1849         ifp->if_flags |= IFF_RUNNING;
1850         ifp->if_flags &= ~IFF_OACTIVE;
1851 }
1852
1853 /*
1854  * Set media options.
1855  */
1856 static int
1857 nge_ifmedia_upd(struct ifnet *ifp)
1858 {
1859         struct nge_softc *sc = ifp->if_softc;
1860         struct mii_data *mii;
1861
1862         if (sc->nge_tbi) {
1863                 if (IFM_SUBTYPE(sc->nge_ifmedia.ifm_cur->ifm_media) 
1864                      == IFM_AUTO) {
1865                         CSR_WRITE_4(sc, NGE_TBI_ANAR, 
1866                                 CSR_READ_4(sc, NGE_TBI_ANAR)
1867                                         | NGE_TBIANAR_HDX | NGE_TBIANAR_FDX
1868                                         | NGE_TBIANAR_PS1 | NGE_TBIANAR_PS2);
1869                         CSR_WRITE_4(sc, NGE_TBI_BMCR, NGE_TBIBMCR_ENABLE_ANEG
1870                                 | NGE_TBIBMCR_RESTART_ANEG);
1871                         CSR_WRITE_4(sc, NGE_TBI_BMCR, NGE_TBIBMCR_ENABLE_ANEG);
1872                 } else if ((sc->nge_ifmedia.ifm_cur->ifm_media 
1873                             & IFM_GMASK) == IFM_FDX) {
1874                         NGE_SETBIT(sc, NGE_TX_CFG,
1875                             (NGE_TXCFG_IGN_HBEAT|NGE_TXCFG_IGN_CARR));
1876                         NGE_SETBIT(sc, NGE_RX_CFG, NGE_RXCFG_RX_FDX);
1877
1878                         CSR_WRITE_4(sc, NGE_TBI_ANAR, 0);
1879                         CSR_WRITE_4(sc, NGE_TBI_BMCR, 0);
1880                 } else {
1881                         NGE_CLRBIT(sc, NGE_TX_CFG,
1882                             (NGE_TXCFG_IGN_HBEAT|NGE_TXCFG_IGN_CARR));
1883                         NGE_CLRBIT(sc, NGE_RX_CFG, NGE_RXCFG_RX_FDX);
1884
1885                         CSR_WRITE_4(sc, NGE_TBI_ANAR, 0);
1886                         CSR_WRITE_4(sc, NGE_TBI_BMCR, 0);
1887                 }
1888                         
1889                 CSR_WRITE_4(sc, NGE_GPIO, CSR_READ_4(sc, NGE_GPIO)
1890                             & ~NGE_GPIO_GP3_OUT);
1891         } else {
1892                 mii = device_get_softc(sc->nge_miibus);
1893                 sc->nge_link = 0;
1894                 if (mii->mii_instance) {
1895                         struct mii_softc        *miisc;
1896                         for (miisc = LIST_FIRST(&mii->mii_phys); miisc != NULL;
1897                             miisc = LIST_NEXT(miisc, mii_list))
1898                                 mii_phy_reset(miisc);
1899                 }
1900                 mii_mediachg(mii);
1901         }
1902
1903         return(0);
1904 }
1905
1906 /*
1907  * Report current media status.
1908  */
1909 static void
1910 nge_ifmedia_sts(struct ifnet *ifp, struct ifmediareq *ifmr)
1911 {
1912         struct nge_softc *sc = ifp->if_softc;
1913         struct mii_data *mii;
1914
1915         if (sc->nge_tbi) {
1916                 ifmr->ifm_status = IFM_AVALID;
1917                 ifmr->ifm_active = IFM_ETHER;
1918
1919                 if (CSR_READ_4(sc, NGE_TBI_BMSR) & NGE_TBIBMSR_ANEG_DONE)
1920                         ifmr->ifm_status |= IFM_ACTIVE;
1921                 if (CSR_READ_4(sc, NGE_TBI_BMCR) & NGE_TBIBMCR_LOOPBACK)
1922                         ifmr->ifm_active |= IFM_LOOP;
1923                 if (!CSR_READ_4(sc, NGE_TBI_BMSR) & NGE_TBIBMSR_ANEG_DONE) {
1924                         ifmr->ifm_active |= IFM_NONE;
1925                         ifmr->ifm_status = 0;
1926                         return;
1927                 } 
1928                 ifmr->ifm_active |= IFM_1000_SX;
1929                 if (IFM_SUBTYPE(sc->nge_ifmedia.ifm_cur->ifm_media)
1930                     == IFM_AUTO) {
1931                         ifmr->ifm_active |= IFM_AUTO;
1932                         if (CSR_READ_4(sc, NGE_TBI_ANLPAR)
1933                             & NGE_TBIANAR_FDX) {
1934                                 ifmr->ifm_active |= IFM_FDX;
1935                         }else if (CSR_READ_4(sc, NGE_TBI_ANLPAR)
1936                                   & NGE_TBIANAR_HDX) {
1937                                 ifmr->ifm_active |= IFM_HDX;
1938                         }
1939                 } else if ((sc->nge_ifmedia.ifm_cur->ifm_media & IFM_GMASK) 
1940                         == IFM_FDX)
1941                         ifmr->ifm_active |= IFM_FDX;
1942                 else
1943                         ifmr->ifm_active |= IFM_HDX;
1944  
1945         } else {
1946                 mii = device_get_softc(sc->nge_miibus);
1947                 mii_pollstat(mii);
1948                 ifmr->ifm_active = mii->mii_media_active;
1949                 ifmr->ifm_status = mii->mii_media_status;
1950         }
1951 }
1952
1953 static int
1954 nge_ioctl(struct ifnet *ifp, u_long command, caddr_t data, struct ucred *cr)
1955 {
1956         struct nge_softc *sc = ifp->if_softc;
1957         struct ifreq *ifr = (struct ifreq *) data;
1958         struct mii_data *mii;
1959         int error = 0;
1960
1961         switch(command) {
1962         case SIOCSIFMTU:
1963                 if (ifr->ifr_mtu > NGE_JUMBO_MTU) {
1964                         error = EINVAL;
1965                 } else {
1966                         ifp->if_mtu = ifr->ifr_mtu;
1967                         /*
1968                          * Workaround: if the MTU is larger than
1969                          * 8152 (TX FIFO size minus 64 minus 18), turn off
1970                          * TX checksum offloading.
1971                          */
1972                         if (ifr->ifr_mtu >= 8152)
1973                                 ifp->if_hwassist = 0;
1974                         else
1975                                 ifp->if_hwassist = NGE_CSUM_FEATURES;
1976                 }
1977                 break;
1978         case SIOCSIFFLAGS:
1979                 if (ifp->if_flags & IFF_UP) {
1980                         if (ifp->if_flags & IFF_RUNNING &&
1981                             ifp->if_flags & IFF_PROMISC &&
1982                             !(sc->nge_if_flags & IFF_PROMISC)) {
1983                                 NGE_SETBIT(sc, NGE_RXFILT_CTL,
1984                                     NGE_RXFILTCTL_ALLPHYS|
1985                                     NGE_RXFILTCTL_ALLMULTI);
1986                         } else if (ifp->if_flags & IFF_RUNNING &&
1987                             !(ifp->if_flags & IFF_PROMISC) &&
1988                             sc->nge_if_flags & IFF_PROMISC) {
1989                                 NGE_CLRBIT(sc, NGE_RXFILT_CTL,
1990                                     NGE_RXFILTCTL_ALLPHYS);
1991                                 if (!(ifp->if_flags & IFF_ALLMULTI))
1992                                         NGE_CLRBIT(sc, NGE_RXFILT_CTL,
1993                                             NGE_RXFILTCTL_ALLMULTI);
1994                         } else {
1995                                 ifp->if_flags &= ~IFF_RUNNING;
1996                                 nge_init(sc);
1997                         }
1998                 } else {
1999                         if (ifp->if_flags & IFF_RUNNING)
2000                                 nge_stop(sc);
2001                 }
2002                 sc->nge_if_flags = ifp->if_flags;
2003                 error = 0;
2004                 break;
2005         case SIOCADDMULTI:
2006         case SIOCDELMULTI:
2007                 nge_setmulti(sc);
2008                 error = 0;
2009                 break;
2010         case SIOCGIFMEDIA:
2011         case SIOCSIFMEDIA:
2012                 if (sc->nge_tbi) {
2013                         error = ifmedia_ioctl(ifp, ifr, &sc->nge_ifmedia, 
2014                                               command);
2015                 } else {
2016                         mii = device_get_softc(sc->nge_miibus);
2017                         error = ifmedia_ioctl(ifp, ifr, &mii->mii_media, 
2018                                               command);
2019                 }
2020                 break;
2021         default:
2022                 error = ether_ioctl(ifp, command, data);
2023                 break;
2024         }
2025         return(error);
2026 }
2027
2028 static void
2029 nge_watchdog(struct ifnet *ifp)
2030 {
2031         struct nge_softc *sc = ifp->if_softc;
2032
2033         ifp->if_oerrors++;
2034         kprintf("nge%d: watchdog timeout\n", sc->nge_unit);
2035
2036         nge_stop(sc);
2037         nge_reset(sc);
2038         ifp->if_flags &= ~IFF_RUNNING;
2039         nge_init(sc);
2040
2041         if (!ifq_is_empty(&ifp->if_snd))
2042                 if_devstart(ifp);
2043 }
2044
2045 /*
2046  * Stop the adapter and free any mbufs allocated to the
2047  * RX and TX lists.
2048  */
2049 static void
2050 nge_stop(struct nge_softc *sc)
2051 {
2052         struct ifnet *ifp = &sc->arpcom.ac_if;
2053         struct ifmedia_entry *ifm;
2054         struct mii_data *mii;
2055         int i, itmp, mtmp, dtmp;
2056
2057         ifp->if_timer = 0;
2058         if (sc->nge_tbi)
2059                 mii = NULL;
2060         else
2061                 mii = device_get_softc(sc->nge_miibus);
2062
2063         callout_stop(&sc->nge_stat_timer);
2064         CSR_WRITE_4(sc, NGE_IER, 0);
2065         CSR_WRITE_4(sc, NGE_IMR, 0);
2066         NGE_SETBIT(sc, NGE_CSR, NGE_CSR_TX_DISABLE|NGE_CSR_RX_DISABLE);
2067         DELAY(1000);
2068         CSR_WRITE_4(sc, NGE_TX_LISTPTR, 0);
2069         CSR_WRITE_4(sc, NGE_RX_LISTPTR, 0);
2070
2071         /*
2072          * Isolate/power down the PHY, but leave the media selection
2073          * unchanged so that things will be put back to normal when
2074          * we bring the interface back up.
2075          */
2076         itmp = ifp->if_flags;
2077         ifp->if_flags |= IFF_UP;
2078
2079         if (sc->nge_tbi)
2080                 ifm = sc->nge_ifmedia.ifm_cur;
2081         else
2082                 ifm = mii->mii_media.ifm_cur;
2083
2084         mtmp = ifm->ifm_media;
2085         dtmp = ifm->ifm_data;
2086         ifm->ifm_media = IFM_ETHER|IFM_NONE;
2087         ifm->ifm_data = MII_MEDIA_NONE;
2088
2089         if (!sc->nge_tbi)
2090                 mii_mediachg(mii);
2091         ifm->ifm_media = mtmp;
2092         ifm->ifm_data = dtmp;
2093         ifp->if_flags = itmp;
2094
2095         sc->nge_link = 0;
2096
2097         /*
2098          * Free data in the RX lists.
2099          */
2100         for (i = 0; i < NGE_RX_LIST_CNT; i++) {
2101                 if (sc->nge_ldata->nge_rx_list[i].nge_mbuf != NULL) {
2102                         m_freem(sc->nge_ldata->nge_rx_list[i].nge_mbuf);
2103                         sc->nge_ldata->nge_rx_list[i].nge_mbuf = NULL;
2104                 }
2105         }
2106         bzero(&sc->nge_ldata->nge_rx_list,
2107                 sizeof(sc->nge_ldata->nge_rx_list));
2108
2109         /*
2110          * Free the TX list buffers.
2111          */
2112         for (i = 0; i < NGE_TX_LIST_CNT; i++) {
2113                 if (sc->nge_ldata->nge_tx_list[i].nge_mbuf != NULL) {
2114                         m_freem(sc->nge_ldata->nge_tx_list[i].nge_mbuf);
2115                         sc->nge_ldata->nge_tx_list[i].nge_mbuf = NULL;
2116                 }
2117         }
2118
2119         bzero(&sc->nge_ldata->nge_tx_list,
2120                 sizeof(sc->nge_ldata->nge_tx_list));
2121
2122         ifp->if_flags &= ~(IFF_RUNNING | IFF_OACTIVE);
2123 }
2124
2125 /*
2126  * Stop all chip I/O so that the kernel's probe routines don't
2127  * get confused by errant DMAs when rebooting.
2128  */
2129 static void
2130 nge_shutdown(device_t dev)
2131 {
2132         struct nge_softc *sc = device_get_softc(dev);
2133         struct ifnet *ifp = &sc->arpcom.ac_if;
2134
2135         lwkt_serialize_enter(ifp->if_serializer);
2136         nge_reset(sc);
2137         nge_stop(sc);
2138         lwkt_serialize_exit(ifp->if_serializer);
2139 }
2140