if_tl.c revision 113548
136270Swpaul/* 236270Swpaul * Copyright (c) 1997, 1998 336270Swpaul * Bill Paul <wpaul@ctr.columbia.edu>. All rights reserved. 436270Swpaul * 536270Swpaul * Redistribution and use in source and binary forms, with or without 636270Swpaul * modification, are permitted provided that the following conditions 736270Swpaul * are met: 836270Swpaul * 1. Redistributions of source code must retain the above copyright 936270Swpaul * notice, this list of conditions and the following disclaimer. 1036270Swpaul * 2. Redistributions in binary form must reproduce the above copyright 1136270Swpaul * notice, this list of conditions and the following disclaimer in the 1236270Swpaul * documentation and/or other materials provided with the distribution. 1336270Swpaul * 3. All advertising materials mentioning features or use of this software 1436270Swpaul * must display the following acknowledgement: 1536270Swpaul * This product includes software developed by Bill Paul. 1636270Swpaul * 4. Neither the name of the author nor the names of any co-contributors 1736270Swpaul * may be used to endorse or promote products derived from this software 1836270Swpaul * without specific prior written permission. 1936270Swpaul * 2036270Swpaul * THIS SOFTWARE IS PROVIDED BY Bill Paul AND CONTRIBUTORS ``AS IS'' AND 2136270Swpaul * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 2236270Swpaul * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 2336270Swpaul * ARE DISCLAIMED. IN NO EVENT SHALL Bill Paul OR THE VOICES IN HIS HEAD 2436270Swpaul * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 2536270Swpaul * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 2636270Swpaul * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 2736270Swpaul * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 2836270Swpaul * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 2936270Swpaul * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF 3036270Swpaul * THE POSSIBILITY OF SUCH DAMAGE. 3136270Swpaul */ 3236270Swpaul 3336270Swpaul/* 3436270Swpaul * Texas Instruments ThunderLAN driver for FreeBSD 2.2.6 and 3.x. 3536270Swpaul * Supports many Compaq PCI NICs based on the ThunderLAN ethernet controller, 3636270Swpaul * the National Semiconductor DP83840A physical interface and the 3736270Swpaul * Microchip Technology 24Cxx series serial EEPROM. 3836270Swpaul * 3939583Swpaul * Written using the following four documents: 4036270Swpaul * 4136270Swpaul * Texas Instruments ThunderLAN Programmer's Guide (www.ti.com) 4236270Swpaul * National Semiconductor DP83840A data sheet (www.national.com) 4336270Swpaul * Microchip Technology 24C02C data sheet (www.microchip.com) 4439583Swpaul * Micro Linear ML6692 100BaseTX only PHY data sheet (www.microlinear.com) 4536270Swpaul * 4636270Swpaul * Written by Bill Paul <wpaul@ctr.columbia.edu> 4736270Swpaul * Electrical Engineering Department 4836270Swpaul * Columbia University, New York City 4936270Swpaul */ 5036270Swpaul 5136270Swpaul/* 5236270Swpaul * Some notes about the ThunderLAN: 5336270Swpaul * 5436270Swpaul * The ThunderLAN controller is a single chip containing PCI controller 5536270Swpaul * logic, approximately 3K of on-board SRAM, a LAN controller, and media 5639583Swpaul * independent interface (MII) bus. The MII allows the ThunderLAN chip to 5736270Swpaul * control up to 32 different physical interfaces (PHYs). The ThunderLAN 5836270Swpaul * also has a built-in 10baseT PHY, allowing a single ThunderLAN controller 5936270Swpaul * to act as a complete ethernet interface. 6036270Swpaul * 6136270Swpaul * Other PHYs may be attached to the ThunderLAN; the Compaq 10/100 cards 6236270Swpaul * use a National Semiconductor DP83840A PHY that supports 10 or 100Mb/sec 6336270Swpaul * in full or half duplex. Some of the Compaq Deskpro machines use a 6439583Swpaul * Level 1 LXT970 PHY with the same capabilities. Certain Olicom adapters 6539583Swpaul * use a Micro Linear ML6692 100BaseTX only PHY, which can be used in 6639583Swpaul * concert with the ThunderLAN's internal PHY to provide full 10/100 6739583Swpaul * support. This is cheaper than using a standalone external PHY for both 6839583Swpaul * 10/100 modes and letting the ThunderLAN's internal PHY go to waste. 6939583Swpaul * A serial EEPROM is also attached to the ThunderLAN chip to provide 7039583Swpaul * power-up default register settings and for storing the adapter's 7139583Swpaul * station address. Although not supported by this driver, the ThunderLAN 7239583Swpaul * chip can also be connected to token ring PHYs. 7336270Swpaul * 7436270Swpaul * The ThunderLAN has a set of registers which can be used to issue 7539583Swpaul * commands, acknowledge interrupts, and to manipulate other internal 7636270Swpaul * registers on its DIO bus. The primary registers can be accessed 7736270Swpaul * using either programmed I/O (inb/outb) or via PCI memory mapping, 7836270Swpaul * depending on how the card is configured during the PCI probing 7936270Swpaul * phase. It is even possible to have both PIO and memory mapped 8036270Swpaul * access turned on at the same time. 8136270Swpaul * 8236270Swpaul * Frame reception and transmission with the ThunderLAN chip is done 8336270Swpaul * using frame 'lists.' A list structure looks more or less like this: 8436270Swpaul * 8536270Swpaul * struct tl_frag { 8636270Swpaul * u_int32_t fragment_address; 8736270Swpaul * u_int32_t fragment_size; 8836270Swpaul * }; 8936270Swpaul * struct tl_list { 9036270Swpaul * u_int32_t forward_pointer; 9136270Swpaul * u_int16_t cstat; 9236270Swpaul * u_int16_t frame_size; 9336270Swpaul * struct tl_frag fragments[10]; 9436270Swpaul * }; 9536270Swpaul * 9636270Swpaul * The forward pointer in the list header can be either a 0 or the address 9736270Swpaul * of another list, which allows several lists to be linked together. Each 9836270Swpaul * list contains up to 10 fragment descriptors. This means the chip allows 9936270Swpaul * ethernet frames to be broken up into up to 10 chunks for transfer to 10036270Swpaul * and from the SRAM. Note that the forward pointer and fragment buffer 10136270Swpaul * addresses are physical memory addresses, not virtual. Note also that 10236270Swpaul * a single ethernet frame can not span lists: if the host wants to 10336270Swpaul * transmit a frame and the frame data is split up over more than 10 10436270Swpaul * buffers, the frame has to collapsed before it can be transmitted. 10536270Swpaul * 10636270Swpaul * To receive frames, the driver sets up a number of lists and populates 10736270Swpaul * the fragment descriptors, then it sends an RX GO command to the chip. 10836270Swpaul * When a frame is received, the chip will DMA it into the memory regions 10936270Swpaul * specified by the fragment descriptors and then trigger an RX 'end of 11036270Swpaul * frame interrupt' when done. The driver may choose to use only one 11136270Swpaul * fragment per list; this may result is slighltly less efficient use 11236270Swpaul * of memory in exchange for improving performance. 11336270Swpaul * 11436270Swpaul * To transmit frames, the driver again sets up lists and fragment 11536270Swpaul * descriptors, only this time the buffers contain frame data that 11636270Swpaul * is to be DMA'ed into the chip instead of out of it. Once the chip 11736270Swpaul * has transfered the data into its on-board SRAM, it will trigger a 11836270Swpaul * TX 'end of frame' interrupt. It will also generate an 'end of channel' 11936270Swpaul * interrupt when it reaches the end of the list. 12036270Swpaul */ 12136270Swpaul 12236270Swpaul/* 12336270Swpaul * Some notes about this driver: 12436270Swpaul * 12536270Swpaul * The ThunderLAN chip provides a couple of different ways to organize 12636270Swpaul * reception, transmission and interrupt handling. The simplest approach 12736270Swpaul * is to use one list each for transmission and reception. In this mode, 12836270Swpaul * the ThunderLAN will generate two interrupts for every received frame 12936270Swpaul * (one RX EOF and one RX EOC) and two for each transmitted frame (one 13036270Swpaul * TX EOF and one TX EOC). This may make the driver simpler but it hurts 13136270Swpaul * performance to have to handle so many interrupts. 13236270Swpaul * 13336270Swpaul * Initially I wanted to create a circular list of receive buffers so 13436270Swpaul * that the ThunderLAN chip would think there was an infinitely long 13536270Swpaul * receive channel and never deliver an RXEOC interrupt. However this 13636270Swpaul * doesn't work correctly under heavy load: while the manual says the 13736270Swpaul * chip will trigger an RXEOF interrupt each time a frame is copied into 13836270Swpaul * memory, you can't count on the chip waiting around for you to acknowledge 13936270Swpaul * the interrupt before it starts trying to DMA the next frame. The result 14036270Swpaul * is that the chip might traverse the entire circular list and then wrap 14136270Swpaul * around before you have a chance to do anything about it. Consequently, 14236270Swpaul * the receive list is terminated (with a 0 in the forward pointer in the 14336270Swpaul * last element). Each time an RXEOF interrupt arrives, the used list 14436270Swpaul * is shifted to the end of the list. This gives the appearance of an 14536270Swpaul * infinitely large RX chain so long as the driver doesn't fall behind 14636270Swpaul * the chip and allow all of the lists to be filled up. 14736270Swpaul * 14836270Swpaul * If all the lists are filled, the adapter will deliver an RX 'end of 14936270Swpaul * channel' interrupt when it hits the 0 forward pointer at the end of 15036270Swpaul * the chain. The RXEOC handler then cleans out the RX chain and resets 15136270Swpaul * the list head pointer in the ch_parm register and restarts the receiver. 15236270Swpaul * 15336270Swpaul * For frame transmission, it is possible to program the ThunderLAN's 15436270Swpaul * transmit interrupt threshold so that the chip can acknowledge multiple 15536270Swpaul * lists with only a single TX EOF interrupt. This allows the driver to 15636270Swpaul * queue several frames in one shot, and only have to handle a total 15736270Swpaul * two interrupts (one TX EOF and one TX EOC) no matter how many frames 15836270Swpaul * are transmitted. Frame transmission is done directly out of the 15936270Swpaul * mbufs passed to the tl_start() routine via the interface send queue. 16036270Swpaul * The driver simply sets up the fragment descriptors in the transmit 16136270Swpaul * lists to point to the mbuf data regions and sends a TX GO command. 16236270Swpaul * 16336270Swpaul * Note that since the RX and TX lists themselves are always used 16436270Swpaul * only by the driver, the are malloc()ed once at driver initialization 16536270Swpaul * time and never free()ed. 16636270Swpaul * 16736270Swpaul * Also, in order to remain as platform independent as possible, this 16836270Swpaul * driver uses memory mapped register access to manipulate the card 16936270Swpaul * as opposed to programmed I/O. This avoids the use of the inb/outb 17036270Swpaul * (and related) instructions which are specific to the i386 platform. 17136270Swpaul * 17236270Swpaul * Using these techniques, this driver achieves very high performance 17336270Swpaul * by minimizing the amount of interrupts generated during large 17436270Swpaul * transfers and by completely avoiding buffer copies. Frame transfer 17536270Swpaul * to and from the ThunderLAN chip is performed entirely by the chip 17636270Swpaul * itself thereby reducing the load on the host CPU. 17736270Swpaul */ 17836270Swpaul 179113038Sobrien#include <sys/cdefs.h> 180113038Sobrien__FBSDID("$FreeBSD: head/sys/pci/if_tl.c 113548 2003-04-16 06:51:26Z mdodd $"); 181113038Sobrien 18236270Swpaul#include <sys/param.h> 18336270Swpaul#include <sys/systm.h> 18436270Swpaul#include <sys/sockio.h> 18536270Swpaul#include <sys/mbuf.h> 18636270Swpaul#include <sys/malloc.h> 18736270Swpaul#include <sys/kernel.h> 18836270Swpaul#include <sys/socket.h> 18936270Swpaul 19036270Swpaul#include <net/if.h> 19136270Swpaul#include <net/if_arp.h> 19236270Swpaul#include <net/ethernet.h> 19336270Swpaul#include <net/if_dl.h> 19436270Swpaul#include <net/if_media.h> 19536270Swpaul 19636270Swpaul#include <net/bpf.h> 19736270Swpaul 19836270Swpaul#include <vm/vm.h> /* for vtophys */ 19936270Swpaul#include <vm/pmap.h> /* for vtophys */ 20045155Swpaul#include <machine/bus_memio.h> 20145155Swpaul#include <machine/bus_pio.h> 20245155Swpaul#include <machine/bus.h> 20348992Swpaul#include <machine/resource.h> 20448992Swpaul#include <sys/bus.h> 20548992Swpaul#include <sys/rman.h> 20636270Swpaul 20750462Swpaul#include <dev/mii/mii.h> 20850462Swpaul#include <dev/mii/miivar.h> 20950462Swpaul 21036270Swpaul#include <pci/pcireg.h> 21136270Swpaul#include <pci/pcivar.h> 21236270Swpaul 21339957Swpaul/* 21439957Swpaul * Default to using PIO register access mode to pacify certain 21539957Swpaul * laptop docking stations with built-in ThunderLAN chips that 21639957Swpaul * don't seem to handle memory mapped mode properly. 21739957Swpaul */ 21839957Swpaul#define TL_USEIOSPACE 21939957Swpaul 22036270Swpaul#include <pci/if_tlreg.h> 22136270Swpaul 222113506SmdoddMODULE_DEPEND(tl, pci, 1, 1, 1); 223113506SmdoddMODULE_DEPEND(tl, ether, 1, 1, 1); 22459758SpeterMODULE_DEPEND(tl, miibus, 1, 1, 1); 22559758Speter 22651089Speter/* "controller miibus0" required. See GENERIC if you get errors here. */ 22750462Swpaul#include "miibus_if.h" 22850462Swpaul 22936270Swpaul/* 23036270Swpaul * Various supported device vendors/types and their names. 23136270Swpaul */ 23236270Swpaul 23336270Swpaulstatic struct tl_type tl_devs[] = { 23436270Swpaul { TI_VENDORID, TI_DEVICEID_THUNDERLAN, 23536270Swpaul "Texas Instruments ThunderLAN" }, 23636270Swpaul { COMPAQ_VENDORID, COMPAQ_DEVICEID_NETEL_10, 23736270Swpaul "Compaq Netelligent 10" }, 23836270Swpaul { COMPAQ_VENDORID, COMPAQ_DEVICEID_NETEL_10_100, 23936270Swpaul "Compaq Netelligent 10/100" }, 24036270Swpaul { COMPAQ_VENDORID, COMPAQ_DEVICEID_NETEL_10_100_PROLIANT, 24136270Swpaul "Compaq Netelligent 10/100 Proliant" }, 24236270Swpaul { COMPAQ_VENDORID, COMPAQ_DEVICEID_NETEL_10_100_DUAL, 24336270Swpaul "Compaq Netelligent 10/100 Dual Port" }, 24436270Swpaul { COMPAQ_VENDORID, COMPAQ_DEVICEID_NETFLEX_3P_INTEGRATED, 24536270Swpaul "Compaq NetFlex-3/P Integrated" }, 24636270Swpaul { COMPAQ_VENDORID, COMPAQ_DEVICEID_NETFLEX_3P, 24736270Swpaul "Compaq NetFlex-3/P" }, 24836270Swpaul { COMPAQ_VENDORID, COMPAQ_DEVICEID_NETFLEX_3P_BNC, 24936270Swpaul "Compaq NetFlex 3/P w/ BNC" }, 25037626Swpaul { COMPAQ_VENDORID, COMPAQ_DEVICEID_NETEL_10_100_EMBEDDED, 25137626Swpaul "Compaq Netelligent 10/100 TX Embedded UTP" }, 25237626Swpaul { COMPAQ_VENDORID, COMPAQ_DEVICEID_NETEL_10_T2_UTP_COAX, 25337626Swpaul "Compaq Netelligent 10 T/2 PCI UTP/Coax" }, 25437626Swpaul { COMPAQ_VENDORID, COMPAQ_DEVICEID_NETEL_10_100_TX_UTP, 25537626Swpaul "Compaq Netelligent 10/100 TX UTP" }, 25637626Swpaul { OLICOM_VENDORID, OLICOM_DEVICEID_OC2183, 25737626Swpaul "Olicom OC-2183/2185" }, 25837626Swpaul { OLICOM_VENDORID, OLICOM_DEVICEID_OC2325, 25937626Swpaul "Olicom OC-2325" }, 26037626Swpaul { OLICOM_VENDORID, OLICOM_DEVICEID_OC2326, 26137626Swpaul "Olicom OC-2326 10/100 TX UTP" }, 26236270Swpaul { 0, 0, NULL } 26336270Swpaul}; 26436270Swpaul 26592739Salfredstatic int tl_probe (device_t); 26692739Salfredstatic int tl_attach (device_t); 26792739Salfredstatic int tl_detach (device_t); 26892739Salfredstatic int tl_intvec_rxeoc (void *, u_int32_t); 26992739Salfredstatic int tl_intvec_txeoc (void *, u_int32_t); 27092739Salfredstatic int tl_intvec_txeof (void *, u_int32_t); 27192739Salfredstatic int tl_intvec_rxeof (void *, u_int32_t); 27292739Salfredstatic int tl_intvec_adchk (void *, u_int32_t); 27392739Salfredstatic int tl_intvec_netsts (void *, u_int32_t); 27436270Swpaul 27592739Salfredstatic int tl_newbuf (struct tl_softc *, struct tl_chain_onefrag *); 27692739Salfredstatic void tl_stats_update (void *); 27792739Salfredstatic int tl_encap (struct tl_softc *, struct tl_chain *, 27892739Salfred struct mbuf *); 27936270Swpaul 28092739Salfredstatic void tl_intr (void *); 28192739Salfredstatic void tl_start (struct ifnet *); 28292739Salfredstatic int tl_ioctl (struct ifnet *, u_long, caddr_t); 28392739Salfredstatic void tl_init (void *); 28492739Salfredstatic void tl_stop (struct tl_softc *); 28592739Salfredstatic void tl_watchdog (struct ifnet *); 28692739Salfredstatic void tl_shutdown (device_t); 28792739Salfredstatic int tl_ifmedia_upd (struct ifnet *); 28892739Salfredstatic void tl_ifmedia_sts (struct ifnet *, struct ifmediareq *); 28936270Swpaul 29092739Salfredstatic u_int8_t tl_eeprom_putbyte (struct tl_softc *, int); 29192739Salfredstatic u_int8_t tl_eeprom_getbyte (struct tl_softc *, int, u_int8_t *); 29292739Salfredstatic int tl_read_eeprom (struct tl_softc *, caddr_t, int, int); 29336270Swpaul 29492739Salfredstatic void tl_mii_sync (struct tl_softc *); 29592739Salfredstatic void tl_mii_send (struct tl_softc *, u_int32_t, int); 29692739Salfredstatic int tl_mii_readreg (struct tl_softc *, struct tl_mii_frame *); 29792739Salfredstatic int tl_mii_writereg (struct tl_softc *, struct tl_mii_frame *); 29892739Salfredstatic int tl_miibus_readreg (device_t, int, int); 29992739Salfredstatic int tl_miibus_writereg (device_t, int, int, int); 30092739Salfredstatic void tl_miibus_statchg (device_t); 30136270Swpaul 30292739Salfredstatic void tl_setmode (struct tl_softc *, int); 30392739Salfredstatic int tl_calchash (caddr_t); 30492739Salfredstatic void tl_setmulti (struct tl_softc *); 30592739Salfredstatic void tl_setfilt (struct tl_softc *, caddr_t, int); 30692739Salfredstatic void tl_softreset (struct tl_softc *, int); 30792739Salfredstatic void tl_hardreset (device_t); 30892739Salfredstatic int tl_list_rx_init (struct tl_softc *); 30992739Salfredstatic int tl_list_tx_init (struct tl_softc *); 31036270Swpaul 31192739Salfredstatic u_int8_t tl_dio_read8 (struct tl_softc *, int); 31292739Salfredstatic u_int16_t tl_dio_read16 (struct tl_softc *, int); 31392739Salfredstatic u_int32_t tl_dio_read32 (struct tl_softc *, int); 31492739Salfredstatic void tl_dio_write8 (struct tl_softc *, int, int); 31592739Salfredstatic void tl_dio_write16 (struct tl_softc *, int, int); 31692739Salfredstatic void tl_dio_write32 (struct tl_softc *, int, int); 31792739Salfredstatic void tl_dio_setbit (struct tl_softc *, int, int); 31892739Salfredstatic void tl_dio_clrbit (struct tl_softc *, int, int); 31992739Salfredstatic void tl_dio_setbit16 (struct tl_softc *, int, int); 32092739Salfredstatic void tl_dio_clrbit16 (struct tl_softc *, int, int); 32139583Swpaul 32249010Swpaul#ifdef TL_USEIOSPACE 32349010Swpaul#define TL_RES SYS_RES_IOPORT 32449010Swpaul#define TL_RID TL_PCI_LOIO 32549010Swpaul#else 32649010Swpaul#define TL_RES SYS_RES_MEMORY 32749010Swpaul#define TL_RID TL_PCI_LOMEM 32849010Swpaul#endif 32949010Swpaul 33048992Swpaulstatic device_method_t tl_methods[] = { 33148992Swpaul /* Device interface */ 33248992Swpaul DEVMETHOD(device_probe, tl_probe), 33348992Swpaul DEVMETHOD(device_attach, tl_attach), 33448992Swpaul DEVMETHOD(device_detach, tl_detach), 33548992Swpaul DEVMETHOD(device_shutdown, tl_shutdown), 33650462Swpaul 33750462Swpaul /* bus interface */ 33850462Swpaul DEVMETHOD(bus_print_child, bus_generic_print_child), 33950462Swpaul DEVMETHOD(bus_driver_added, bus_generic_driver_added), 34050462Swpaul 34150462Swpaul /* MII interface */ 34250462Swpaul DEVMETHOD(miibus_readreg, tl_miibus_readreg), 34350462Swpaul DEVMETHOD(miibus_writereg, tl_miibus_writereg), 34450462Swpaul DEVMETHOD(miibus_statchg, tl_miibus_statchg), 34550462Swpaul 34648992Swpaul { 0, 0 } 34748992Swpaul}; 34848992Swpaul 34948992Swpaulstatic driver_t tl_driver = { 35051455Swpaul "tl", 35148992Swpaul tl_methods, 35248992Swpaul sizeof(struct tl_softc) 35348992Swpaul}; 35448992Swpaul 35548992Swpaulstatic devclass_t tl_devclass; 35648992Swpaul 357113506SmdoddDRIVER_MODULE(tl, pci, tl_driver, tl_devclass, 0, 0); 35851473SwpaulDRIVER_MODULE(miibus, tl, miibus_driver, miibus_devclass, 0, 0); 35948992Swpaul 36039583Swpaulstatic u_int8_t tl_dio_read8(sc, reg) 36141656Swpaul struct tl_softc *sc; 36241656Swpaul int reg; 36339583Swpaul{ 36439583Swpaul CSR_WRITE_2(sc, TL_DIO_ADDR, reg); 36539583Swpaul return(CSR_READ_1(sc, TL_DIO_DATA + (reg & 3))); 36639583Swpaul} 36739583Swpaul 36839583Swpaulstatic u_int16_t tl_dio_read16(sc, reg) 36941656Swpaul struct tl_softc *sc; 37041656Swpaul int reg; 37139583Swpaul{ 37239583Swpaul CSR_WRITE_2(sc, TL_DIO_ADDR, reg); 37339583Swpaul return(CSR_READ_2(sc, TL_DIO_DATA + (reg & 3))); 37439583Swpaul} 37539583Swpaul 37639583Swpaulstatic u_int32_t tl_dio_read32(sc, reg) 37741656Swpaul struct tl_softc *sc; 37841656Swpaul int reg; 37939583Swpaul{ 38039583Swpaul CSR_WRITE_2(sc, TL_DIO_ADDR, reg); 38139583Swpaul return(CSR_READ_4(sc, TL_DIO_DATA + (reg & 3))); 38239583Swpaul} 38339583Swpaul 38439583Swpaulstatic void tl_dio_write8(sc, reg, val) 38541656Swpaul struct tl_softc *sc; 38641656Swpaul int reg; 38741656Swpaul int val; 38839583Swpaul{ 38939583Swpaul CSR_WRITE_2(sc, TL_DIO_ADDR, reg); 39039583Swpaul CSR_WRITE_1(sc, TL_DIO_DATA + (reg & 3), val); 39139583Swpaul return; 39239583Swpaul} 39339583Swpaul 39439583Swpaulstatic void tl_dio_write16(sc, reg, val) 39541656Swpaul struct tl_softc *sc; 39641656Swpaul int reg; 39741656Swpaul int val; 39839583Swpaul{ 39939583Swpaul CSR_WRITE_2(sc, TL_DIO_ADDR, reg); 40039583Swpaul CSR_WRITE_2(sc, TL_DIO_DATA + (reg & 3), val); 40139583Swpaul return; 40239583Swpaul} 40339583Swpaul 40439583Swpaulstatic void tl_dio_write32(sc, reg, val) 40541656Swpaul struct tl_softc *sc; 40641656Swpaul int reg; 40741656Swpaul int val; 40839583Swpaul{ 40939583Swpaul CSR_WRITE_2(sc, TL_DIO_ADDR, reg); 41039583Swpaul CSR_WRITE_4(sc, TL_DIO_DATA + (reg & 3), val); 41139583Swpaul return; 41239583Swpaul} 41339583Swpaul 414102336Salfredstatic void 415102336Salfredtl_dio_setbit(sc, reg, bit) 41641656Swpaul struct tl_softc *sc; 41741656Swpaul int reg; 41841656Swpaul int bit; 41939583Swpaul{ 42039583Swpaul u_int8_t f; 42139583Swpaul 42239583Swpaul CSR_WRITE_2(sc, TL_DIO_ADDR, reg); 42339583Swpaul f = CSR_READ_1(sc, TL_DIO_DATA + (reg & 3)); 42439583Swpaul f |= bit; 42539583Swpaul CSR_WRITE_1(sc, TL_DIO_DATA + (reg & 3), f); 42639583Swpaul 42739583Swpaul return; 42839583Swpaul} 42939583Swpaul 430102336Salfredstatic void 431102336Salfredtl_dio_clrbit(sc, reg, bit) 43241656Swpaul struct tl_softc *sc; 43341656Swpaul int reg; 43441656Swpaul int bit; 43539583Swpaul{ 43639583Swpaul u_int8_t f; 43739583Swpaul 43839583Swpaul CSR_WRITE_2(sc, TL_DIO_ADDR, reg); 43939583Swpaul f = CSR_READ_1(sc, TL_DIO_DATA + (reg & 3)); 44039583Swpaul f &= ~bit; 44139583Swpaul CSR_WRITE_1(sc, TL_DIO_DATA + (reg & 3), f); 44239583Swpaul 44339583Swpaul return; 44439583Swpaul} 44539583Swpaul 44639583Swpaulstatic void tl_dio_setbit16(sc, reg, bit) 44741656Swpaul struct tl_softc *sc; 44841656Swpaul int reg; 44941656Swpaul int bit; 45039583Swpaul{ 45139583Swpaul u_int16_t f; 45239583Swpaul 45339583Swpaul CSR_WRITE_2(sc, TL_DIO_ADDR, reg); 45439583Swpaul f = CSR_READ_2(sc, TL_DIO_DATA + (reg & 3)); 45539583Swpaul f |= bit; 45639583Swpaul CSR_WRITE_2(sc, TL_DIO_DATA + (reg & 3), f); 45739583Swpaul 45839583Swpaul return; 45939583Swpaul} 46039583Swpaul 46139583Swpaulstatic void tl_dio_clrbit16(sc, reg, bit) 46241656Swpaul struct tl_softc *sc; 46341656Swpaul int reg; 46441656Swpaul int bit; 46539583Swpaul{ 46639583Swpaul u_int16_t f; 46739583Swpaul 46839583Swpaul CSR_WRITE_2(sc, TL_DIO_ADDR, reg); 46939583Swpaul f = CSR_READ_2(sc, TL_DIO_DATA + (reg & 3)); 47039583Swpaul f &= ~bit; 47139583Swpaul CSR_WRITE_2(sc, TL_DIO_DATA + (reg & 3), f); 47239583Swpaul 47339583Swpaul return; 47439583Swpaul} 47539583Swpaul 47636270Swpaul/* 47736270Swpaul * Send an instruction or address to the EEPROM, check for ACK. 47836270Swpaul */ 47939583Swpaulstatic u_int8_t tl_eeprom_putbyte(sc, byte) 48039583Swpaul struct tl_softc *sc; 48141656Swpaul int byte; 48236270Swpaul{ 48336270Swpaul register int i, ack = 0; 48436270Swpaul 48536270Swpaul /* 48636270Swpaul * Make sure we're in TX mode. 48736270Swpaul */ 48839583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_ETXEN); 48936270Swpaul 49036270Swpaul /* 49136270Swpaul * Feed in each bit and stobe the clock. 49236270Swpaul */ 49336270Swpaul for (i = 0x80; i; i >>= 1) { 49436270Swpaul if (byte & i) { 49539583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_EDATA); 49636270Swpaul } else { 49739583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_EDATA); 49836270Swpaul } 49939583Swpaul DELAY(1); 50039583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_ECLOK); 50139583Swpaul DELAY(1); 50239583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_ECLOK); 50336270Swpaul } 50436270Swpaul 50536270Swpaul /* 50636270Swpaul * Turn off TX mode. 50736270Swpaul */ 50839583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_ETXEN); 50936270Swpaul 51036270Swpaul /* 51136270Swpaul * Check for ack. 51236270Swpaul */ 51339583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_ECLOK); 51439583Swpaul ack = tl_dio_read8(sc, TL_NETSIO) & TL_SIO_EDATA; 51539583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_ECLOK); 51636270Swpaul 51736270Swpaul return(ack); 51836270Swpaul} 51936270Swpaul 52036270Swpaul/* 52136270Swpaul * Read a byte of data stored in the EEPROM at address 'addr.' 52236270Swpaul */ 52339583Swpaulstatic u_int8_t tl_eeprom_getbyte(sc, addr, dest) 52439583Swpaul struct tl_softc *sc; 52541656Swpaul int addr; 52636270Swpaul u_int8_t *dest; 52736270Swpaul{ 52836270Swpaul register int i; 52936270Swpaul u_int8_t byte = 0; 530105599Sbrooks struct ifnet *ifp = &sc->arpcom.ac_if; 53136270Swpaul 53239583Swpaul tl_dio_write8(sc, TL_NETSIO, 0); 53339583Swpaul 53436270Swpaul EEPROM_START; 53539583Swpaul 53636270Swpaul /* 53736270Swpaul * Send write control code to EEPROM. 53836270Swpaul */ 53939583Swpaul if (tl_eeprom_putbyte(sc, EEPROM_CTL_WRITE)) { 540105599Sbrooks if_printf(ifp, "failed to send write command, status: %x\n", 541105599Sbrooks tl_dio_read8(sc, TL_NETSIO)); 54236270Swpaul return(1); 54339583Swpaul } 54436270Swpaul 54536270Swpaul /* 54636270Swpaul * Send address of byte we want to read. 54736270Swpaul */ 54839583Swpaul if (tl_eeprom_putbyte(sc, addr)) { 549105599Sbrooks if_printf(ifp, "failed to send address, status: %x\n", 550105599Sbrooks tl_dio_read8(sc, TL_NETSIO)); 55136270Swpaul return(1); 55239583Swpaul } 55336270Swpaul 55436270Swpaul EEPROM_STOP; 55536270Swpaul EEPROM_START; 55636270Swpaul /* 55736270Swpaul * Send read control code to EEPROM. 55836270Swpaul */ 55939583Swpaul if (tl_eeprom_putbyte(sc, EEPROM_CTL_READ)) { 560105599Sbrooks if_printf(ifp, "failed to send write command, status: %x\n", 561105599Sbrooks tl_dio_read8(sc, TL_NETSIO)); 56236270Swpaul return(1); 56339583Swpaul } 56436270Swpaul 56536270Swpaul /* 56636270Swpaul * Start reading bits from EEPROM. 56736270Swpaul */ 56839583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_ETXEN); 56936270Swpaul for (i = 0x80; i; i >>= 1) { 57039583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_ECLOK); 57139583Swpaul DELAY(1); 57239583Swpaul if (tl_dio_read8(sc, TL_NETSIO) & TL_SIO_EDATA) 57336270Swpaul byte |= i; 57439583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_ECLOK); 57536501Swpaul DELAY(1); 57636270Swpaul } 57736270Swpaul 57836270Swpaul EEPROM_STOP; 57936270Swpaul 58036270Swpaul /* 58136270Swpaul * No ACK generated for read, so just return byte. 58236270Swpaul */ 58336270Swpaul 58436270Swpaul *dest = byte; 58536270Swpaul 58636270Swpaul return(0); 58736270Swpaul} 58836270Swpaul 58939583Swpaul/* 59039583Swpaul * Read a sequence of bytes from the EEPROM. 59139583Swpaul */ 592102336Salfredstatic int 593102336Salfredtl_read_eeprom(sc, dest, off, cnt) 59439583Swpaul struct tl_softc *sc; 59539583Swpaul caddr_t dest; 59639583Swpaul int off; 59739583Swpaul int cnt; 59836270Swpaul{ 59939583Swpaul int err = 0, i; 60039583Swpaul u_int8_t byte = 0; 60139583Swpaul 60239583Swpaul for (i = 0; i < cnt; i++) { 60339583Swpaul err = tl_eeprom_getbyte(sc, off + i, &byte); 60439583Swpaul if (err) 60539583Swpaul break; 60639583Swpaul *(dest + i) = byte; 60739583Swpaul } 60839583Swpaul 60939583Swpaul return(err ? 1 : 0); 61039583Swpaul} 61139583Swpaul 612102336Salfredstatic void 613102336Salfredtl_mii_sync(sc) 61439583Swpaul struct tl_softc *sc; 61539583Swpaul{ 61636270Swpaul register int i; 61736270Swpaul 61839583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MTXEN); 61936270Swpaul 62036270Swpaul for (i = 0; i < 32; i++) { 62139583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MCLK); 62239583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MCLK); 62336270Swpaul } 62436270Swpaul 62536270Swpaul return; 62636270Swpaul} 62736270Swpaul 628102336Salfredstatic void 629102336Salfredtl_mii_send(sc, bits, cnt) 63039583Swpaul struct tl_softc *sc; 63136270Swpaul u_int32_t bits; 63236270Swpaul int cnt; 63336270Swpaul{ 63436270Swpaul int i; 63536270Swpaul 63636270Swpaul for (i = (0x1 << (cnt - 1)); i; i >>= 1) { 63739583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MCLK); 63836270Swpaul if (bits & i) { 63939583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MDATA); 64036270Swpaul } else { 64139583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MDATA); 64236270Swpaul } 64339583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MCLK); 64436270Swpaul } 64536270Swpaul} 64636270Swpaul 647102336Salfredstatic int 648102336Salfredtl_mii_readreg(sc, frame) 64939583Swpaul struct tl_softc *sc; 65036270Swpaul struct tl_mii_frame *frame; 65136270Swpaul 65236270Swpaul{ 65367087Swpaul int i, ack; 65436270Swpaul int minten = 0; 65536270Swpaul 65667087Swpaul TL_LOCK(sc); 65736270Swpaul 65839583Swpaul tl_mii_sync(sc); 65936270Swpaul 66036270Swpaul /* 66136270Swpaul * Set up frame for RX. 66236270Swpaul */ 66336270Swpaul frame->mii_stdelim = TL_MII_STARTDELIM; 66436270Swpaul frame->mii_opcode = TL_MII_READOP; 66536270Swpaul frame->mii_turnaround = 0; 66636270Swpaul frame->mii_data = 0; 66736270Swpaul 66836270Swpaul /* 66936270Swpaul * Turn off MII interrupt by forcing MINTEN low. 67036270Swpaul */ 67139583Swpaul minten = tl_dio_read8(sc, TL_NETSIO) & TL_SIO_MINTEN; 67236270Swpaul if (minten) { 67339583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MINTEN); 67436270Swpaul } 67536270Swpaul 67636270Swpaul /* 67736270Swpaul * Turn on data xmit. 67836270Swpaul */ 67939583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MTXEN); 68036270Swpaul 68136270Swpaul /* 68236270Swpaul * Send command/address info. 68336270Swpaul */ 68439583Swpaul tl_mii_send(sc, frame->mii_stdelim, 2); 68539583Swpaul tl_mii_send(sc, frame->mii_opcode, 2); 68639583Swpaul tl_mii_send(sc, frame->mii_phyaddr, 5); 68739583Swpaul tl_mii_send(sc, frame->mii_regaddr, 5); 68836270Swpaul 68936270Swpaul /* 69036270Swpaul * Turn off xmit. 69136270Swpaul */ 69239583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MTXEN); 69336270Swpaul 69436270Swpaul /* Idle bit */ 69539583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MCLK); 69639583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MCLK); 69736270Swpaul 69836270Swpaul /* Check for ack */ 69939583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MCLK); 70039583Swpaul ack = tl_dio_read8(sc, TL_NETSIO) & TL_SIO_MDATA; 70136270Swpaul 70236270Swpaul /* Complete the cycle */ 70339583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MCLK); 70436270Swpaul 70536270Swpaul /* 70636270Swpaul * Now try reading data bits. If the ack failed, we still 70736270Swpaul * need to clock through 16 cycles to keep the PHYs in sync. 70836270Swpaul */ 70936270Swpaul if (ack) { 71036270Swpaul for(i = 0; i < 16; i++) { 71139583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MCLK); 71239583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MCLK); 71336270Swpaul } 71436270Swpaul goto fail; 71536270Swpaul } 71636270Swpaul 71736270Swpaul for (i = 0x8000; i; i >>= 1) { 71839583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MCLK); 71936270Swpaul if (!ack) { 72039583Swpaul if (tl_dio_read8(sc, TL_NETSIO) & TL_SIO_MDATA) 72136270Swpaul frame->mii_data |= i; 72236270Swpaul } 72339583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MCLK); 72436270Swpaul } 72536270Swpaul 72636270Swpaulfail: 72736270Swpaul 72839583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MCLK); 72939583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MCLK); 73036270Swpaul 73136270Swpaul /* Reenable interrupts */ 73236270Swpaul if (minten) { 73339583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MINTEN); 73436270Swpaul } 73536270Swpaul 73667087Swpaul TL_UNLOCK(sc); 73736270Swpaul 73836270Swpaul if (ack) 73936270Swpaul return(1); 74036270Swpaul return(0); 74136270Swpaul} 74236270Swpaul 743102336Salfredstatic int 744102336Salfredtl_mii_writereg(sc, frame) 74539583Swpaul struct tl_softc *sc; 74636270Swpaul struct tl_mii_frame *frame; 74736270Swpaul 74836270Swpaul{ 74936270Swpaul int minten; 75036270Swpaul 75167087Swpaul TL_LOCK(sc); 75267087Swpaul 75339583Swpaul tl_mii_sync(sc); 75436270Swpaul 75536270Swpaul /* 75636270Swpaul * Set up frame for TX. 75736270Swpaul */ 75836270Swpaul 75936270Swpaul frame->mii_stdelim = TL_MII_STARTDELIM; 76036270Swpaul frame->mii_opcode = TL_MII_WRITEOP; 76136270Swpaul frame->mii_turnaround = TL_MII_TURNAROUND; 76236270Swpaul 76336270Swpaul /* 76436270Swpaul * Turn off MII interrupt by forcing MINTEN low. 76536270Swpaul */ 76639583Swpaul minten = tl_dio_read8(sc, TL_NETSIO) & TL_SIO_MINTEN; 76736270Swpaul if (minten) { 76839583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MINTEN); 76936270Swpaul } 77036270Swpaul 77136270Swpaul /* 77236270Swpaul * Turn on data output. 77336270Swpaul */ 77439583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MTXEN); 77536270Swpaul 77639583Swpaul tl_mii_send(sc, frame->mii_stdelim, 2); 77739583Swpaul tl_mii_send(sc, frame->mii_opcode, 2); 77839583Swpaul tl_mii_send(sc, frame->mii_phyaddr, 5); 77939583Swpaul tl_mii_send(sc, frame->mii_regaddr, 5); 78039583Swpaul tl_mii_send(sc, frame->mii_turnaround, 2); 78139583Swpaul tl_mii_send(sc, frame->mii_data, 16); 78236270Swpaul 78339583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MCLK); 78439583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MCLK); 78536270Swpaul 78636270Swpaul /* 78736270Swpaul * Turn off xmit. 78836270Swpaul */ 78939583Swpaul tl_dio_clrbit(sc, TL_NETSIO, TL_SIO_MTXEN); 79036270Swpaul 79136270Swpaul /* Reenable interrupts */ 79236270Swpaul if (minten) 79339583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_MINTEN); 79436270Swpaul 79567087Swpaul TL_UNLOCK(sc); 79636270Swpaul 79736270Swpaul return(0); 79836270Swpaul} 79936270Swpaul 800102336Salfredstatic int 801102336Salfredtl_miibus_readreg(dev, phy, reg) 80250462Swpaul device_t dev; 80350462Swpaul int phy, reg; 80450462Swpaul{ 80536270Swpaul struct tl_softc *sc; 80636270Swpaul struct tl_mii_frame frame; 80736270Swpaul 80850462Swpaul sc = device_get_softc(dev); 80936270Swpaul bzero((char *)&frame, sizeof(frame)); 81036270Swpaul 81150462Swpaul frame.mii_phyaddr = phy; 81236270Swpaul frame.mii_regaddr = reg; 81339583Swpaul tl_mii_readreg(sc, &frame); 81436270Swpaul 81536270Swpaul return(frame.mii_data); 81636270Swpaul} 81736270Swpaul 818102336Salfredstatic int 819102336Salfredtl_miibus_writereg(dev, phy, reg, data) 82050462Swpaul device_t dev; 82150462Swpaul int phy, reg, data; 82250462Swpaul{ 82336270Swpaul struct tl_softc *sc; 82436270Swpaul struct tl_mii_frame frame; 82536270Swpaul 82650462Swpaul sc = device_get_softc(dev); 82736270Swpaul bzero((char *)&frame, sizeof(frame)); 82836270Swpaul 82950462Swpaul frame.mii_phyaddr = phy; 83036270Swpaul frame.mii_regaddr = reg; 83136270Swpaul frame.mii_data = data; 83236270Swpaul 83339583Swpaul tl_mii_writereg(sc, &frame); 83436270Swpaul 83550462Swpaul return(0); 83636270Swpaul} 83736270Swpaul 838102336Salfredstatic void 839102336Salfredtl_miibus_statchg(dev) 84050462Swpaul device_t dev; 84150462Swpaul{ 84236270Swpaul struct tl_softc *sc; 84350462Swpaul struct mii_data *mii; 84436270Swpaul 84550462Swpaul sc = device_get_softc(dev); 84667087Swpaul TL_LOCK(sc); 84750462Swpaul mii = device_get_softc(sc->tl_miibus); 84836270Swpaul 84950462Swpaul if ((mii->mii_media_active & IFM_GMASK) == IFM_FDX) { 85050462Swpaul tl_dio_setbit(sc, TL_NETCMD, TL_CMD_DUPLEX); 85136270Swpaul } else { 85250462Swpaul tl_dio_clrbit(sc, TL_NETCMD, TL_CMD_DUPLEX); 85336270Swpaul } 85467087Swpaul TL_UNLOCK(sc); 85536270Swpaul 85636270Swpaul return; 85736270Swpaul} 85836270Swpaul 85936270Swpaul/* 86050462Swpaul * Set modes for bitrate devices. 86136270Swpaul */ 862102336Salfredstatic void 863102336Salfredtl_setmode(sc, media) 86436270Swpaul struct tl_softc *sc; 86536270Swpaul int media; 86636270Swpaul{ 86750462Swpaul if (IFM_SUBTYPE(media) == IFM_10_5) 86850462Swpaul tl_dio_setbit(sc, TL_ACOMMIT, TL_AC_MTXD1); 86936270Swpaul if (IFM_SUBTYPE(media) == IFM_10_T) { 87050462Swpaul tl_dio_clrbit(sc, TL_ACOMMIT, TL_AC_MTXD1); 87136270Swpaul if ((media & IFM_GMASK) == IFM_FDX) { 87250462Swpaul tl_dio_clrbit(sc, TL_ACOMMIT, TL_AC_MTXD3); 87339583Swpaul tl_dio_setbit(sc, TL_NETCMD, TL_CMD_DUPLEX); 87436270Swpaul } else { 87550462Swpaul tl_dio_setbit(sc, TL_ACOMMIT, TL_AC_MTXD3); 87639583Swpaul tl_dio_clrbit(sc, TL_NETCMD, TL_CMD_DUPLEX); 87736270Swpaul } 87836270Swpaul } 87936270Swpaul 88036270Swpaul return; 88136270Swpaul} 88236270Swpaul 88336464Swpaul/* 88436464Swpaul * Calculate the hash of a MAC address for programming the multicast hash 88536464Swpaul * table. This hash is simply the address split into 6-bit chunks 88636464Swpaul * XOR'd, e.g. 88736464Swpaul * byte: 000000|00 1111|1111 22|222222|333333|33 4444|4444 55|555555 88836464Swpaul * bit: 765432|10 7654|3210 76|543210|765432|10 7654|3210 76|543210 88936464Swpaul * Bytes 0-2 and 3-5 are symmetrical, so are folded together. Then 89036464Swpaul * the folded 24-bit value is split into 6-bit portions and XOR'd. 89136464Swpaul */ 892102336Salfredstatic int 893102336Salfredtl_calchash(addr) 89441656Swpaul caddr_t addr; 89536270Swpaul{ 89637626Swpaul int t; 89736270Swpaul 89836464Swpaul t = (addr[0] ^ addr[3]) << 16 | (addr[1] ^ addr[4]) << 8 | 89936464Swpaul (addr[2] ^ addr[5]); 90036464Swpaul return ((t >> 18) ^ (t >> 12) ^ (t >> 6) ^ t) & 0x3f; 90136270Swpaul} 90236270Swpaul 90339583Swpaul/* 90439583Swpaul * The ThunderLAN has a perfect MAC address filter in addition to 90539583Swpaul * the multicast hash filter. The perfect filter can be programmed 90639583Swpaul * with up to four MAC addresses. The first one is always used to 90739583Swpaul * hold the station address, which leaves us free to use the other 90839583Swpaul * three for multicast addresses. 90939583Swpaul */ 910102336Salfredstatic void 911102336Salfredtl_setfilt(sc, addr, slot) 91239583Swpaul struct tl_softc *sc; 91341656Swpaul caddr_t addr; 91439583Swpaul int slot; 91539583Swpaul{ 91639583Swpaul int i; 91739583Swpaul u_int16_t regaddr; 91839583Swpaul 91939583Swpaul regaddr = TL_AREG0_B5 + (slot * ETHER_ADDR_LEN); 92039583Swpaul 92139583Swpaul for (i = 0; i < ETHER_ADDR_LEN; i++) 92239583Swpaul tl_dio_write8(sc, regaddr + i, *(addr + i)); 92339583Swpaul 92439583Swpaul return; 92539583Swpaul} 92639583Swpaul 92739583Swpaul/* 92839583Swpaul * XXX In FreeBSD 3.0, multicast addresses are managed using a doubly 92939583Swpaul * linked list. This is fine, except addresses are added from the head 93039583Swpaul * end of the list. We want to arrange for 224.0.0.1 (the "all hosts") 93139583Swpaul * group to always be in the perfect filter, but as more groups are added, 93239583Swpaul * the 224.0.0.1 entry (which is always added first) gets pushed down 93339583Swpaul * the list and ends up at the tail. So after 3 or 4 multicast groups 93439583Swpaul * are added, the all-hosts entry gets pushed out of the perfect filter 93539583Swpaul * and into the hash table. 93639583Swpaul * 93739583Swpaul * Because the multicast list is a doubly-linked list as opposed to a 93839583Swpaul * circular queue, we don't have the ability to just grab the tail of 93939583Swpaul * the list and traverse it backwards. Instead, we have to traverse 94039583Swpaul * the list once to find the tail, then traverse it again backwards to 94139583Swpaul * update the multicast filter. 94239583Swpaul */ 943102336Salfredstatic void 944102336Salfredtl_setmulti(sc) 94536270Swpaul struct tl_softc *sc; 94636270Swpaul{ 94736270Swpaul struct ifnet *ifp; 94836270Swpaul u_int32_t hashes[2] = { 0, 0 }; 94939583Swpaul int h, i; 95036270Swpaul struct ifmultiaddr *ifma; 95139583Swpaul u_int8_t dummy[] = { 0, 0, 0, 0, 0 ,0 }; 95236270Swpaul ifp = &sc->arpcom.ac_if; 95336270Swpaul 95439583Swpaul /* First, zot all the existing filters. */ 95539583Swpaul for (i = 1; i < 4; i++) 95641656Swpaul tl_setfilt(sc, (caddr_t)&dummy, i); 95739583Swpaul tl_dio_write32(sc, TL_HASH1, 0); 95839583Swpaul tl_dio_write32(sc, TL_HASH2, 0); 95939583Swpaul 96039583Swpaul /* Now program new ones. */ 96139583Swpaul if (ifp->if_flags & IFF_ALLMULTI) { 96236270Swpaul hashes[0] = 0xFFFFFFFF; 96336270Swpaul hashes[1] = 0xFFFFFFFF; 96436270Swpaul } else { 96539583Swpaul i = 1; 96672084Sphk TAILQ_FOREACH_REVERSE(ifma, &ifp->if_multiaddrs, ifmultihead, ifma_link) { 96736270Swpaul if (ifma->ifma_addr->sa_family != AF_LINK) 96836270Swpaul continue; 96939583Swpaul /* 97039583Swpaul * Program the first three multicast groups 97139583Swpaul * into the perfect filter. For all others, 97239583Swpaul * use the hash table. 97339583Swpaul */ 97439583Swpaul if (i < 4) { 97539583Swpaul tl_setfilt(sc, 97639583Swpaul LLADDR((struct sockaddr_dl *)ifma->ifma_addr), i); 97739583Swpaul i++; 97839583Swpaul continue; 97939583Swpaul } 98039583Swpaul 98136270Swpaul h = tl_calchash( 98236270Swpaul LLADDR((struct sockaddr_dl *)ifma->ifma_addr)); 98336270Swpaul if (h < 32) 98436270Swpaul hashes[0] |= (1 << h); 98536270Swpaul else 98636317Swpaul hashes[1] |= (1 << (h - 32)); 98736270Swpaul } 98836270Swpaul } 98936270Swpaul 99039583Swpaul tl_dio_write32(sc, TL_HASH1, hashes[0]); 99139583Swpaul tl_dio_write32(sc, TL_HASH2, hashes[1]); 99236270Swpaul 99336270Swpaul return; 99436270Swpaul} 99536270Swpaul 99639583Swpaul/* 99739583Swpaul * This routine is recommended by the ThunderLAN manual to insure that 99839583Swpaul * the internal PHY is powered up correctly. It also recommends a one 99939583Swpaul * second pause at the end to 'wait for the clocks to start' but in my 100039583Swpaul * experience this isn't necessary. 100139583Swpaul */ 1002102336Salfredstatic void 1003102336Salfredtl_hardreset(dev) 100450468Swpaul device_t dev; 100550468Swpaul{ 100639583Swpaul struct tl_softc *sc; 100739583Swpaul int i; 100850468Swpaul u_int16_t flags; 100939583Swpaul 101050468Swpaul sc = device_get_softc(dev); 101139583Swpaul 101250468Swpaul tl_mii_sync(sc); 101339583Swpaul 101450468Swpaul flags = BMCR_LOOP|BMCR_ISO|BMCR_PDOWN; 101539583Swpaul 101650468Swpaul for (i = 0; i < MII_NPHY; i++) 101750468Swpaul tl_miibus_writereg(dev, i, MII_BMCR, flags); 101839583Swpaul 101950468Swpaul tl_miibus_writereg(dev, 31, MII_BMCR, BMCR_ISO); 102039583Swpaul DELAY(50000); 102150468Swpaul tl_miibus_writereg(dev, 31, MII_BMCR, BMCR_LOOP|BMCR_ISO); 102239583Swpaul tl_mii_sync(sc); 102350468Swpaul while(tl_miibus_readreg(dev, 31, MII_BMCR) & BMCR_RESET); 102439583Swpaul 102550468Swpaul DELAY(50000); 102639583Swpaul return; 102739583Swpaul} 102839583Swpaul 1029102336Salfredstatic void 1030102336Salfredtl_softreset(sc, internal) 103139583Swpaul struct tl_softc *sc; 103236270Swpaul int internal; 103336270Swpaul{ 103439583Swpaul u_int32_t cmd, dummy, i; 103536270Swpaul 103636270Swpaul /* Assert the adapter reset bit. */ 103739583Swpaul CMD_SET(sc, TL_CMD_ADRST); 103850468Swpaul 103936270Swpaul /* Turn off interrupts */ 104039583Swpaul CMD_SET(sc, TL_CMD_INTSOFF); 104136270Swpaul 104236270Swpaul /* First, clear the stats registers. */ 104339583Swpaul for (i = 0; i < 5; i++) 104439583Swpaul dummy = tl_dio_read32(sc, TL_TXGOODFRAMES); 104536270Swpaul 104636270Swpaul /* Clear Areg and Hash registers */ 104739583Swpaul for (i = 0; i < 8; i++) 104839583Swpaul tl_dio_write32(sc, TL_AREG0_B5, 0x00000000); 104936270Swpaul 105036270Swpaul /* 105136270Swpaul * Set up Netconfig register. Enable one channel and 105236270Swpaul * one fragment mode. 105336270Swpaul */ 105439583Swpaul tl_dio_setbit16(sc, TL_NETCONFIG, TL_CFG_ONECHAN|TL_CFG_ONEFRAG); 105545155Swpaul if (internal && !sc->tl_bitrate) { 105639583Swpaul tl_dio_setbit16(sc, TL_NETCONFIG, TL_CFG_PHYEN); 105736270Swpaul } else { 105839583Swpaul tl_dio_clrbit16(sc, TL_NETCONFIG, TL_CFG_PHYEN); 105936270Swpaul } 106036270Swpaul 106145155Swpaul /* Handle cards with bitrate devices. */ 106245155Swpaul if (sc->tl_bitrate) 106345155Swpaul tl_dio_setbit16(sc, TL_NETCONFIG, TL_CFG_BITRATE); 106445155Swpaul 106536270Swpaul /* 106636270Swpaul * Load adapter irq pacing timer and tx threshold. 106736270Swpaul * We make the transmit threshold 1 initially but we may 106836270Swpaul * change that later. 106936270Swpaul */ 107039583Swpaul cmd = CSR_READ_4(sc, TL_HOSTCMD); 107136270Swpaul cmd |= TL_CMD_NES; 107236270Swpaul cmd &= ~(TL_CMD_RT|TL_CMD_EOC|TL_CMD_ACK_MASK|TL_CMD_CHSEL_MASK); 107339583Swpaul CMD_PUT(sc, cmd | (TL_CMD_LDTHR | TX_THR)); 107439583Swpaul CMD_PUT(sc, cmd | (TL_CMD_LDTMR | 0x00000003)); 107536270Swpaul 107636270Swpaul /* Unreset the MII */ 107739583Swpaul tl_dio_setbit(sc, TL_NETSIO, TL_SIO_NMRST); 107836270Swpaul 107936270Swpaul /* Take the adapter out of reset */ 108039583Swpaul tl_dio_setbit(sc, TL_NETCMD, TL_CMD_NRESET|TL_CMD_NWRAP); 108136270Swpaul 108236270Swpaul /* Wait for things to settle down a little. */ 108336270Swpaul DELAY(500); 108436270Swpaul 108536270Swpaul return; 108636270Swpaul} 108736270Swpaul 108836270Swpaul/* 108936270Swpaul * Probe for a ThunderLAN chip. Check the PCI vendor and device IDs 109039583Swpaul * against our list and return its name if we find a match. 109136270Swpaul */ 1092102336Salfredstatic int 1093102336Salfredtl_probe(dev) 109448992Swpaul device_t dev; 109536270Swpaul{ 109636270Swpaul struct tl_type *t; 109736270Swpaul 109836270Swpaul t = tl_devs; 109936270Swpaul 110036270Swpaul while(t->tl_name != NULL) { 110148992Swpaul if ((pci_get_vendor(dev) == t->tl_vid) && 110248992Swpaul (pci_get_device(dev) == t->tl_did)) { 110348992Swpaul device_set_desc(dev, t->tl_name); 110448992Swpaul return(0); 110548992Swpaul } 110636270Swpaul t++; 110736270Swpaul } 110836270Swpaul 110948992Swpaul return(ENXIO); 111036270Swpaul} 111136270Swpaul 1112102336Salfredstatic int 1113102336Salfredtl_attach(dev) 111448992Swpaul device_t dev; 111536270Swpaul{ 111667087Swpaul int i; 111739583Swpaul u_int16_t did, vid; 111839583Swpaul struct tl_type *t; 111939583Swpaul struct ifnet *ifp; 112039583Swpaul struct tl_softc *sc; 112148992Swpaul int unit, error = 0, rid; 112236270Swpaul 112348992Swpaul vid = pci_get_vendor(dev); 112448992Swpaul did = pci_get_device(dev); 112548992Swpaul sc = device_get_softc(dev); 112648992Swpaul unit = device_get_unit(dev); 112739583Swpaul 112839583Swpaul t = tl_devs; 112939583Swpaul while(t->tl_name != NULL) { 113039583Swpaul if (vid == t->tl_vid && did == t->tl_did) 113136270Swpaul break; 113239583Swpaul t++; 113339583Swpaul } 113436270Swpaul 113539583Swpaul if (t->tl_name == NULL) { 1136105599Sbrooks device_printf(dev, "unknown device!?\n"); 1137112878Sjhb return (ENXIO); 113836270Swpaul } 113936270Swpaul 114093818Sjhb mtx_init(&sc->tl_mtx, device_get_nameunit(dev), MTX_NETWORK_LOCK, 114193818Sjhb MTX_DEF | MTX_RECURSE); 114269583Swpaul 114336270Swpaul /* 114436270Swpaul * Map control/status registers. 114536270Swpaul */ 114672813Swpaul pci_enable_busmaster(dev); 114736270Swpaul 114839583Swpaul#ifdef TL_USEIOSPACE 114939583Swpaul 115048992Swpaul rid = TL_PCI_LOIO; 115148992Swpaul sc->tl_res = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid, 115248992Swpaul 0, ~0, 1, RF_ACTIVE); 115348992Swpaul 115448992Swpaul /* 115548992Swpaul * Some cards have the I/O and memory mapped address registers 115648992Swpaul * reversed. Try both combinations before giving up. 115748992Swpaul */ 115848992Swpaul if (sc->tl_res == NULL) { 115948992Swpaul rid = TL_PCI_LOMEM; 116048992Swpaul sc->tl_res = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid, 116148992Swpaul 0, ~0, 1, RF_ACTIVE); 116245155Swpaul } 116339583Swpaul#else 116448992Swpaul rid = TL_PCI_LOMEM; 116548992Swpaul sc->tl_res = bus_alloc_resource(dev, SYS_RES_MEMORY, &rid, 116648992Swpaul 0, ~0, 1, RF_ACTIVE); 116748992Swpaul if (sc->tl_res == NULL) { 116848992Swpaul rid = TL_PCI_LOIO; 116948992Swpaul sc->tl_res = bus_alloc_resource(dev, SYS_RES_MEMORY, &rid, 117048992Swpaul 0, ~0, 1, RF_ACTIVE); 117136270Swpaul } 117239583Swpaul#endif 117336270Swpaul 117448992Swpaul if (sc->tl_res == NULL) { 1175105599Sbrooks device_printf(dev, "couldn't map ports/memory\n"); 117648992Swpaul error = ENXIO; 117748992Swpaul goto fail; 117848992Swpaul } 117948992Swpaul 118048992Swpaul sc->tl_btag = rman_get_bustag(sc->tl_res); 118148992Swpaul sc->tl_bhandle = rman_get_bushandle(sc->tl_res); 118248992Swpaul 118339583Swpaul#ifdef notdef 118439583Swpaul /* 118539583Swpaul * The ThunderLAN manual suggests jacking the PCI latency 118639583Swpaul * timer all the way up to its maximum value. I'm not sure 118739583Swpaul * if this is really necessary, but what the manual wants, 118839583Swpaul * the manual gets. 118939583Swpaul */ 119048992Swpaul command = pci_read_config(dev, TL_PCI_LATENCY_TIMER, 4); 119139583Swpaul command |= 0x0000FF00; 119248992Swpaul pci_write_config(dev, TL_PCI_LATENCY_TIMER, command, 4); 119339583Swpaul#endif 119436270Swpaul 119536270Swpaul /* Allocate interrupt */ 119648992Swpaul rid = 0; 119748992Swpaul sc->tl_irq = bus_alloc_resource(dev, SYS_RES_IRQ, &rid, 0, ~0, 1, 119848992Swpaul RF_SHAREABLE | RF_ACTIVE); 119948992Swpaul 120048992Swpaul if (sc->tl_irq == NULL) { 1201105599Sbrooks device_printf(dev, "couldn't map interrupt\n"); 120248992Swpaul error = ENXIO; 120336270Swpaul goto fail; 120436270Swpaul } 120536270Swpaul 120636270Swpaul /* 120751439Swpaul * Now allocate memory for the TX and RX lists. 120836270Swpaul */ 120951439Swpaul sc->tl_ldata = contigmalloc(sizeof(struct tl_list_data), M_DEVBUF, 121051657Swpaul M_NOWAIT, 0, 0xffffffff, PAGE_SIZE, 0); 121139583Swpaul 121251439Swpaul if (sc->tl_ldata == NULL) { 1213105599Sbrooks device_printf(dev, "no memory for list buffers!\n"); 121448992Swpaul error = ENXIO; 121536270Swpaul goto fail; 121636270Swpaul } 121736270Swpaul 121839583Swpaul bzero(sc->tl_ldata, sizeof(struct tl_list_data)); 121939583Swpaul 122039583Swpaul sc->tl_dinfo = t; 122143235Swpaul if (t->tl_vid == COMPAQ_VENDORID || t->tl_vid == TI_VENDORID) 122239583Swpaul sc->tl_eeaddr = TL_EEPROM_EADDR; 122339583Swpaul if (t->tl_vid == OLICOM_VENDORID) 122439583Swpaul sc->tl_eeaddr = TL_EEPROM_EADDR_OC; 122539583Swpaul 122639583Swpaul /* Reset the adapter. */ 122739583Swpaul tl_softreset(sc, 1); 122850468Swpaul tl_hardreset(dev); 122939583Swpaul tl_softreset(sc, 1); 123039583Swpaul 123138030Swpaul /* 123239583Swpaul * Get station address from the EEPROM. 123339583Swpaul */ 123439583Swpaul if (tl_read_eeprom(sc, (caddr_t)&sc->arpcom.ac_enaddr, 123539583Swpaul sc->tl_eeaddr, ETHER_ADDR_LEN)) { 1236105599Sbrooks device_printf(dev, "failed to read station address\n"); 123748992Swpaul error = ENXIO; 123839583Swpaul goto fail; 123939583Swpaul } 124039583Swpaul 124139583Swpaul /* 124239583Swpaul * XXX Olicom, in its desire to be different from the 124339583Swpaul * rest of the world, has done strange things with the 124439583Swpaul * encoding of the station address in the EEPROM. First 124539583Swpaul * of all, they store the address at offset 0xF8 rather 124639583Swpaul * than at 0x83 like the ThunderLAN manual suggests. 124739583Swpaul * Second, they store the address in three 16-bit words in 124839583Swpaul * network byte order, as opposed to storing it sequentially 124939583Swpaul * like all the other ThunderLAN cards. In order to get 125039583Swpaul * the station address in a form that matches what the Olicom 125139583Swpaul * diagnostic utility specifies, we have to byte-swap each 125239583Swpaul * word. To make things even more confusing, neither 00:00:28 125339583Swpaul * nor 00:00:24 appear in the IEEE OUI database. 125439583Swpaul */ 125539583Swpaul if (sc->tl_dinfo->tl_vid == OLICOM_VENDORID) { 125639583Swpaul for (i = 0; i < ETHER_ADDR_LEN; i += 2) { 125739583Swpaul u_int16_t *p; 125839583Swpaul p = (u_int16_t *)&sc->arpcom.ac_enaddr[i]; 125939583Swpaul *p = ntohs(*p); 126039583Swpaul } 126139583Swpaul } 126239583Swpaul 126339583Swpaul /* 126436270Swpaul * A ThunderLAN chip was detected. Inform the world. 126536270Swpaul */ 1266105599Sbrooks device_printf(dev, "Ethernet address: %6D\n", 126739583Swpaul sc->arpcom.ac_enaddr, ":"); 126836270Swpaul 126939583Swpaul ifp = &sc->arpcom.ac_if; 127039583Swpaul ifp->if_softc = sc; 1271105599Sbrooks ifp->if_unit = unit; 127239583Swpaul ifp->if_name = "tl"; 127339583Swpaul ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST; 127439583Swpaul ifp->if_ioctl = tl_ioctl; 127539583Swpaul ifp->if_output = ether_output; 127639583Swpaul ifp->if_start = tl_start; 127739583Swpaul ifp->if_watchdog = tl_watchdog; 127839583Swpaul ifp->if_init = tl_init; 127939583Swpaul ifp->if_mtu = ETHERMTU; 128051439Swpaul ifp->if_snd.ifq_maxlen = TL_TX_LIST_CNT - 1; 128139583Swpaul callout_handle_init(&sc->tl_stat_ch); 128239583Swpaul 128339583Swpaul /* Reset the adapter again. */ 128439583Swpaul tl_softreset(sc, 1); 128550468Swpaul tl_hardreset(dev); 128639583Swpaul tl_softreset(sc, 1); 128739583Swpaul 128836270Swpaul /* 128950462Swpaul * Do MII setup. If no PHYs are found, then this is a 129050462Swpaul * bitrate ThunderLAN chip that only supports 10baseT 129150462Swpaul * and AUI/BNC. 129236270Swpaul */ 129350462Swpaul if (mii_phy_probe(dev, &sc->tl_miibus, 129450462Swpaul tl_ifmedia_upd, tl_ifmedia_sts)) { 129545155Swpaul struct ifmedia *ifm; 129645155Swpaul sc->tl_bitrate = 1; 129745155Swpaul ifmedia_init(&sc->ifmedia, 0, tl_ifmedia_upd, tl_ifmedia_sts); 129845155Swpaul ifmedia_add(&sc->ifmedia, IFM_ETHER|IFM_10_T, 0, NULL); 129945155Swpaul ifmedia_add(&sc->ifmedia, IFM_ETHER|IFM_10_T|IFM_HDX, 0, NULL); 130045155Swpaul ifmedia_add(&sc->ifmedia, IFM_ETHER|IFM_10_T|IFM_FDX, 0, NULL); 130145155Swpaul ifmedia_add(&sc->ifmedia, IFM_ETHER|IFM_10_5, 0, NULL); 130245166Swpaul ifmedia_set(&sc->ifmedia, IFM_ETHER|IFM_10_T); 130345155Swpaul /* Reset again, this time setting bitrate mode. */ 130445155Swpaul tl_softreset(sc, 1); 130545155Swpaul ifm = &sc->ifmedia; 130645155Swpaul ifm->ifm_media = ifm->ifm_cur->ifm_media; 130745155Swpaul tl_ifmedia_upd(ifp); 130836270Swpaul } 130936270Swpaul 131039583Swpaul /* 131163090Sarchie * Call MI attach routine. 131239583Swpaul */ 1313106936Ssam ether_ifattach(ifp, sc->arpcom.ac_enaddr); 131438030Swpaul 1315112872Snjl error = bus_setup_intr(dev, sc->tl_irq, INTR_TYPE_NET, 1316112872Snjl tl_intr, sc, &sc->tl_intrhand); 1317112872Snjl 1318112872Snjl if (error) { 1319112872Snjl device_printf(dev, "couldn't set up irq\n"); 1320112872Snjl goto fail; 1321112872Snjl } 1322112872Snjl 132336270Swpaulfail: 1324112872Snjl if (error) 1325112872Snjl tl_detach(dev); 1326112872Snjl 132748992Swpaul return(error); 132836270Swpaul} 132936270Swpaul 1330102336Salfredstatic int 1331102336Salfredtl_detach(dev) 133248992Swpaul device_t dev; 133348992Swpaul{ 133448992Swpaul struct tl_softc *sc; 133548992Swpaul struct ifnet *ifp; 133648992Swpaul 133748992Swpaul sc = device_get_softc(dev); 1338112880Sjhb KASSERT(mtx_initialized(&sc->tl_mtx), ("tl mutex not initialized")); 133967087Swpaul TL_LOCK(sc); 134048992Swpaul ifp = &sc->arpcom.ac_if; 134148992Swpaul 1342112872Snjl if (device_is_alive(dev)) { 1343112872Snjl if (bus_child_present(dev)) 1344112872Snjl tl_stop(sc); 1345112872Snjl ether_ifdetach(ifp); 1346112872Snjl device_delete_child(dev, sc->tl_miibus); 1347112872Snjl bus_generic_detach(dev); 1348112872Snjl } 134948992Swpaul 1350112872Snjl if (sc->tl_ldata) 1351112872Snjl contigfree(sc->tl_ldata, sizeof(struct tl_list_data), M_DEVBUF); 135250462Swpaul if (sc->tl_bitrate) 135350462Swpaul ifmedia_removeall(&sc->ifmedia); 135448992Swpaul 1355112872Snjl if (sc->tl_intrhand) 1356112872Snjl bus_teardown_intr(dev, sc->tl_irq, sc->tl_intrhand); 1357112872Snjl if (sc->tl_irq) 1358112872Snjl bus_release_resource(dev, SYS_RES_IRQ, 0, sc->tl_irq); 1359112872Snjl if (sc->tl_res) 1360112872Snjl bus_release_resource(dev, TL_RES, TL_RID, sc->tl_res); 136148992Swpaul 136267087Swpaul TL_UNLOCK(sc); 136367087Swpaul mtx_destroy(&sc->tl_mtx); 136448992Swpaul 136548992Swpaul return(0); 136648992Swpaul} 136748992Swpaul 136836270Swpaul/* 136936270Swpaul * Initialize the transmit lists. 137036270Swpaul */ 1371102336Salfredstatic int 1372102336Salfredtl_list_tx_init(sc) 137336270Swpaul struct tl_softc *sc; 137436270Swpaul{ 137536270Swpaul struct tl_chain_data *cd; 137636270Swpaul struct tl_list_data *ld; 137736270Swpaul int i; 137836270Swpaul 137936270Swpaul cd = &sc->tl_cdata; 138036270Swpaul ld = sc->tl_ldata; 138136270Swpaul for (i = 0; i < TL_TX_LIST_CNT; i++) { 138236270Swpaul cd->tl_tx_chain[i].tl_ptr = &ld->tl_tx_list[i]; 138336270Swpaul if (i == (TL_TX_LIST_CNT - 1)) 138436270Swpaul cd->tl_tx_chain[i].tl_next = NULL; 138536270Swpaul else 138636270Swpaul cd->tl_tx_chain[i].tl_next = &cd->tl_tx_chain[i + 1]; 138736270Swpaul } 138836270Swpaul 138936270Swpaul cd->tl_tx_free = &cd->tl_tx_chain[0]; 139036270Swpaul cd->tl_tx_tail = cd->tl_tx_head = NULL; 139136270Swpaul sc->tl_txeoc = 1; 139236270Swpaul 139336270Swpaul return(0); 139436270Swpaul} 139536270Swpaul 139636270Swpaul/* 139736270Swpaul * Initialize the RX lists and allocate mbufs for them. 139836270Swpaul */ 1399102336Salfredstatic int 1400102336Salfredtl_list_rx_init(sc) 140136270Swpaul struct tl_softc *sc; 140236270Swpaul{ 140336270Swpaul struct tl_chain_data *cd; 140436270Swpaul struct tl_list_data *ld; 140536270Swpaul int i; 140636270Swpaul 140736270Swpaul cd = &sc->tl_cdata; 140836270Swpaul ld = sc->tl_ldata; 140936270Swpaul 141040795Swpaul for (i = 0; i < TL_RX_LIST_CNT; i++) { 141136270Swpaul cd->tl_rx_chain[i].tl_ptr = 141237626Swpaul (struct tl_list_onefrag *)&ld->tl_rx_list[i]; 141339583Swpaul if (tl_newbuf(sc, &cd->tl_rx_chain[i]) == ENOBUFS) 141439583Swpaul return(ENOBUFS); 141540795Swpaul if (i == (TL_RX_LIST_CNT - 1)) { 141636270Swpaul cd->tl_rx_chain[i].tl_next = NULL; 141736270Swpaul ld->tl_rx_list[i].tlist_fptr = 0; 141836270Swpaul } else { 141936270Swpaul cd->tl_rx_chain[i].tl_next = &cd->tl_rx_chain[i + 1]; 142036270Swpaul ld->tl_rx_list[i].tlist_fptr = 142136270Swpaul vtophys(&ld->tl_rx_list[i + 1]); 142236270Swpaul } 142336270Swpaul } 142436270Swpaul 142536270Swpaul cd->tl_rx_head = &cd->tl_rx_chain[0]; 142636270Swpaul cd->tl_rx_tail = &cd->tl_rx_chain[TL_RX_LIST_CNT - 1]; 142736270Swpaul 142836270Swpaul return(0); 142936270Swpaul} 143036270Swpaul 1431102336Salfredstatic int 1432102336Salfredtl_newbuf(sc, c) 143336270Swpaul struct tl_softc *sc; 143437626Swpaul struct tl_chain_onefrag *c; 143536270Swpaul{ 143636270Swpaul struct mbuf *m_new = NULL; 143736270Swpaul 1438111119Simp MGETHDR(m_new, M_DONTWAIT, MT_DATA); 143987846Sluigi if (m_new == NULL) 144036270Swpaul return(ENOBUFS); 144136270Swpaul 1442111119Simp MCLGET(m_new, M_DONTWAIT); 144336270Swpaul if (!(m_new->m_flags & M_EXT)) { 144436270Swpaul m_freem(m_new); 144536270Swpaul return(ENOBUFS); 144636270Swpaul } 144736270Swpaul 144845155Swpaul#ifdef __alpha__ 144945155Swpaul m_new->m_data += 2; 145045155Swpaul#endif 145145155Swpaul 145236270Swpaul c->tl_mbuf = m_new; 145336270Swpaul c->tl_next = NULL; 145436270Swpaul c->tl_ptr->tlist_frsize = MCLBYTES; 145536270Swpaul c->tl_ptr->tlist_fptr = 0; 145637626Swpaul c->tl_ptr->tl_frag.tlist_dadr = vtophys(mtod(m_new, caddr_t)); 145737626Swpaul c->tl_ptr->tl_frag.tlist_dcnt = MCLBYTES; 145856060Swpaul c->tl_ptr->tlist_cstat = TL_CSTAT_READY; 145936270Swpaul 146036270Swpaul return(0); 146136270Swpaul} 146236270Swpaul/* 146336270Swpaul * Interrupt handler for RX 'end of frame' condition (EOF). This 146436270Swpaul * tells us that a full ethernet frame has been captured and we need 146536270Swpaul * to handle it. 146636270Swpaul * 146736270Swpaul * Reception is done using 'lists' which consist of a header and a 146836270Swpaul * series of 10 data count/data address pairs that point to buffers. 146936270Swpaul * Initially you're supposed to create a list, populate it with pointers 147036270Swpaul * to buffers, then load the physical address of the list into the 147136270Swpaul * ch_parm register. The adapter is then supposed to DMA the received 147236270Swpaul * frame into the buffers for you. 147336270Swpaul * 147436270Swpaul * To make things as fast as possible, we have the chip DMA directly 147536270Swpaul * into mbufs. This saves us from having to do a buffer copy: we can 147636270Swpaul * just hand the mbufs directly to ether_input(). Once the frame has 147736270Swpaul * been sent on its way, the 'list' structure is assigned a new buffer 147836270Swpaul * and moved to the end of the RX chain. As long we we stay ahead of 147936270Swpaul * the chip, it will always think it has an endless receive channel. 148036270Swpaul * 148136270Swpaul * If we happen to fall behind and the chip manages to fill up all of 148236270Swpaul * the buffers, it will generate an end of channel interrupt and wait 148336270Swpaul * for us to empty the chain and restart the receiver. 148436270Swpaul */ 1485102336Salfredstatic int 1486102336Salfredtl_intvec_rxeof(xsc, type) 148736270Swpaul void *xsc; 148836270Swpaul u_int32_t type; 148936270Swpaul{ 149036270Swpaul struct tl_softc *sc; 149136270Swpaul int r = 0, total_len = 0; 149236270Swpaul struct ether_header *eh; 149336270Swpaul struct mbuf *m; 149436270Swpaul struct ifnet *ifp; 149537626Swpaul struct tl_chain_onefrag *cur_rx; 149636270Swpaul 149736270Swpaul sc = xsc; 149836270Swpaul ifp = &sc->arpcom.ac_if; 149936270Swpaul 150056060Swpaul while(sc->tl_cdata.tl_rx_head != NULL) { 150156060Swpaul cur_rx = sc->tl_cdata.tl_rx_head; 150256060Swpaul if (!(cur_rx->tl_ptr->tlist_cstat & TL_CSTAT_FRAMECMP)) 150356060Swpaul break; 150436270Swpaul r++; 150536270Swpaul sc->tl_cdata.tl_rx_head = cur_rx->tl_next; 150636270Swpaul m = cur_rx->tl_mbuf; 150736270Swpaul total_len = cur_rx->tl_ptr->tlist_frsize; 150836270Swpaul 150939583Swpaul if (tl_newbuf(sc, cur_rx) == ENOBUFS) { 151039583Swpaul ifp->if_ierrors++; 151139583Swpaul cur_rx->tl_ptr->tlist_frsize = MCLBYTES; 151239583Swpaul cur_rx->tl_ptr->tlist_cstat = TL_CSTAT_READY; 151339583Swpaul cur_rx->tl_ptr->tl_frag.tlist_dcnt = MCLBYTES; 151439583Swpaul continue; 151539583Swpaul } 151636270Swpaul 151736270Swpaul sc->tl_cdata.tl_rx_tail->tl_ptr->tlist_fptr = 151836270Swpaul vtophys(cur_rx->tl_ptr); 151936270Swpaul sc->tl_cdata.tl_rx_tail->tl_next = cur_rx; 152036270Swpaul sc->tl_cdata.tl_rx_tail = cur_rx; 152136270Swpaul 152237626Swpaul /* 152337626Swpaul * Note: when the ThunderLAN chip is in 'capture all 152437626Swpaul * frames' mode, it will receive its own transmissions. 152537626Swpaul * We drop don't need to process our own transmissions, 152637626Swpaul * so we drop them here and continue. 152737626Swpaul */ 1528106936Ssam eh = mtod(m, struct ether_header *); 152939583Swpaul /*if (ifp->if_flags & IFF_PROMISC && */ 153039583Swpaul if (!bcmp(eh->ether_shost, sc->arpcom.ac_enaddr, 153137626Swpaul ETHER_ADDR_LEN)) { 153237626Swpaul m_freem(m); 153337626Swpaul continue; 153437626Swpaul } 153537626Swpaul 1536106936Ssam m->m_pkthdr.rcvif = ifp; 1537106936Ssam m->m_pkthdr.len = m->m_len = total_len; 1538106936Ssam 1539106936Ssam (*ifp->if_input)(ifp, m); 154036270Swpaul } 154136270Swpaul 154236270Swpaul return(r); 154336270Swpaul} 154436270Swpaul 154536270Swpaul/* 154636270Swpaul * The RX-EOC condition hits when the ch_parm address hasn't been 154736270Swpaul * initialized or the adapter reached a list with a forward pointer 154836270Swpaul * of 0 (which indicates the end of the chain). In our case, this means 154936270Swpaul * the card has hit the end of the receive buffer chain and we need to 155036270Swpaul * empty out the buffers and shift the pointer back to the beginning again. 155136270Swpaul */ 1552102336Salfredstatic int 1553102336Salfredtl_intvec_rxeoc(xsc, type) 155436270Swpaul void *xsc; 155536270Swpaul u_int32_t type; 155636270Swpaul{ 155736270Swpaul struct tl_softc *sc; 155836270Swpaul int r; 155956060Swpaul struct tl_chain_data *cd; 156036270Swpaul 156156060Swpaul 156236270Swpaul sc = xsc; 156356060Swpaul cd = &sc->tl_cdata; 156436270Swpaul 156536270Swpaul /* Flush out the receive queue and ack RXEOF interrupts. */ 156636270Swpaul r = tl_intvec_rxeof(xsc, type); 156739583Swpaul CMD_PUT(sc, TL_CMD_ACK | r | (type & ~(0x00100000))); 156836270Swpaul r = 1; 156956060Swpaul cd->tl_rx_head = &cd->tl_rx_chain[0]; 157056060Swpaul cd->tl_rx_tail = &cd->tl_rx_chain[TL_RX_LIST_CNT - 1]; 157139583Swpaul CSR_WRITE_4(sc, TL_CH_PARM, vtophys(sc->tl_cdata.tl_rx_head->tl_ptr)); 157236270Swpaul r |= (TL_CMD_GO|TL_CMD_RT); 157336270Swpaul return(r); 157436270Swpaul} 157536270Swpaul 1576102336Salfredstatic int 1577102336Salfredtl_intvec_txeof(xsc, type) 157836270Swpaul void *xsc; 157936270Swpaul u_int32_t type; 158036270Swpaul{ 158136270Swpaul struct tl_softc *sc; 158236270Swpaul int r = 0; 158336270Swpaul struct tl_chain *cur_tx; 158436270Swpaul 158536270Swpaul sc = xsc; 158636270Swpaul 158736270Swpaul /* 158836270Swpaul * Go through our tx list and free mbufs for those 158936270Swpaul * frames that have been sent. 159036270Swpaul */ 159136270Swpaul while (sc->tl_cdata.tl_tx_head != NULL) { 159236270Swpaul cur_tx = sc->tl_cdata.tl_tx_head; 159336270Swpaul if (!(cur_tx->tl_ptr->tlist_cstat & TL_CSTAT_FRAMECMP)) 159436270Swpaul break; 159536270Swpaul sc->tl_cdata.tl_tx_head = cur_tx->tl_next; 159636270Swpaul 159736270Swpaul r++; 159836270Swpaul m_freem(cur_tx->tl_mbuf); 159936270Swpaul cur_tx->tl_mbuf = NULL; 160036270Swpaul 160136270Swpaul cur_tx->tl_next = sc->tl_cdata.tl_tx_free; 160236270Swpaul sc->tl_cdata.tl_tx_free = cur_tx; 160337626Swpaul if (!cur_tx->tl_ptr->tlist_fptr) 160437626Swpaul break; 160536270Swpaul } 160636270Swpaul 160736270Swpaul return(r); 160836270Swpaul} 160936270Swpaul 161036270Swpaul/* 161136270Swpaul * The transmit end of channel interrupt. The adapter triggers this 161236270Swpaul * interrupt to tell us it hit the end of the current transmit list. 161336270Swpaul * 161436270Swpaul * A note about this: it's possible for a condition to arise where 161536270Swpaul * tl_start() may try to send frames between TXEOF and TXEOC interrupts. 161636270Swpaul * You have to avoid this since the chip expects things to go in a 161736270Swpaul * particular order: transmit, acknowledge TXEOF, acknowledge TXEOC. 161836270Swpaul * When the TXEOF handler is called, it will free all of the transmitted 161936270Swpaul * frames and reset the tx_head pointer to NULL. However, a TXEOC 162036270Swpaul * interrupt should be received and acknowledged before any more frames 162136270Swpaul * are queued for transmission. If tl_statrt() is called after TXEOF 162236270Swpaul * resets the tx_head pointer but _before_ the TXEOC interrupt arrives, 162336270Swpaul * it could attempt to issue a transmit command prematurely. 162436270Swpaul * 162536270Swpaul * To guard against this, tl_start() will only issue transmit commands 162636270Swpaul * if the tl_txeoc flag is set, and only the TXEOC interrupt handler 162736270Swpaul * can set this flag once tl_start() has cleared it. 162836270Swpaul */ 1629102336Salfredstatic int 1630102336Salfredtl_intvec_txeoc(xsc, type) 163136270Swpaul void *xsc; 163236270Swpaul u_int32_t type; 163336270Swpaul{ 163436270Swpaul struct tl_softc *sc; 163536270Swpaul struct ifnet *ifp; 163636270Swpaul u_int32_t cmd; 163736270Swpaul 163836270Swpaul sc = xsc; 163936270Swpaul ifp = &sc->arpcom.ac_if; 164036270Swpaul 164136270Swpaul /* Clear the timeout timer. */ 164236270Swpaul ifp->if_timer = 0; 164336270Swpaul 164436270Swpaul if (sc->tl_cdata.tl_tx_head == NULL) { 164536270Swpaul ifp->if_flags &= ~IFF_OACTIVE; 164636270Swpaul sc->tl_cdata.tl_tx_tail = NULL; 164736270Swpaul sc->tl_txeoc = 1; 164836270Swpaul } else { 164936270Swpaul sc->tl_txeoc = 0; 165036270Swpaul /* First we have to ack the EOC interrupt. */ 165139583Swpaul CMD_PUT(sc, TL_CMD_ACK | 0x00000001 | type); 165236270Swpaul /* Then load the address of the next TX list. */ 165339583Swpaul CSR_WRITE_4(sc, TL_CH_PARM, 165451439Swpaul vtophys(sc->tl_cdata.tl_tx_head->tl_ptr)); 165536270Swpaul /* Restart TX channel. */ 165639583Swpaul cmd = CSR_READ_4(sc, TL_HOSTCMD); 165736270Swpaul cmd &= ~TL_CMD_RT; 165836270Swpaul cmd |= TL_CMD_GO|TL_CMD_INTSON; 165939583Swpaul CMD_PUT(sc, cmd); 166036270Swpaul return(0); 166136270Swpaul } 166236270Swpaul 166336270Swpaul return(1); 166436270Swpaul} 166536270Swpaul 1666102336Salfredstatic int 1667102336Salfredtl_intvec_adchk(xsc, type) 166836270Swpaul void *xsc; 166936270Swpaul u_int32_t type; 167036270Swpaul{ 167136270Swpaul struct tl_softc *sc; 167236270Swpaul 167336270Swpaul sc = xsc; 167436270Swpaul 167539627Swpaul if (type) 1676105599Sbrooks if_printf(&sc->arpcom.ac_if, "adapter check: %x\n", 167741656Swpaul (unsigned int)CSR_READ_4(sc, TL_CH_PARM)); 167836270Swpaul 167939583Swpaul tl_softreset(sc, 1); 168037626Swpaul tl_stop(sc); 168136270Swpaul tl_init(sc); 168239583Swpaul CMD_SET(sc, TL_CMD_INTSON); 168336270Swpaul 168436270Swpaul return(0); 168536270Swpaul} 168636270Swpaul 1687102336Salfredstatic int 1688102336Salfredtl_intvec_netsts(xsc, type) 168936270Swpaul void *xsc; 169036270Swpaul u_int32_t type; 169136270Swpaul{ 169236270Swpaul struct tl_softc *sc; 169336270Swpaul u_int16_t netsts; 169436270Swpaul 169536270Swpaul sc = xsc; 169636270Swpaul 169739583Swpaul netsts = tl_dio_read16(sc, TL_NETSTS); 169839583Swpaul tl_dio_write16(sc, TL_NETSTS, netsts); 169936270Swpaul 1700105599Sbrooks if_printf(&sc->arpcom.ac_if, "network status: %x\n", netsts); 170136270Swpaul 170236270Swpaul return(1); 170336270Swpaul} 170436270Swpaul 1705102336Salfredstatic void 1706102336Salfredtl_intr(xsc) 170739583Swpaul void *xsc; 170836270Swpaul{ 170936270Swpaul struct tl_softc *sc; 171036270Swpaul struct ifnet *ifp; 171136270Swpaul int r = 0; 171236270Swpaul u_int32_t type = 0; 171336270Swpaul u_int16_t ints = 0; 171436270Swpaul u_int8_t ivec = 0; 171536270Swpaul 171639583Swpaul sc = xsc; 171767087Swpaul TL_LOCK(sc); 171836270Swpaul 171936270Swpaul /* Disable interrupts */ 172039583Swpaul ints = CSR_READ_2(sc, TL_HOST_INT); 172139583Swpaul CSR_WRITE_2(sc, TL_HOST_INT, ints); 172236270Swpaul type = (ints << 16) & 0xFFFF0000; 172336270Swpaul ivec = (ints & TL_VEC_MASK) >> 5; 172436270Swpaul ints = (ints & TL_INT_MASK) >> 2; 172536270Swpaul 172636270Swpaul ifp = &sc->arpcom.ac_if; 172736270Swpaul 172836270Swpaul switch(ints) { 172936270Swpaul case (TL_INTR_INVALID): 173039583Swpaul#ifdef DIAGNOSTIC 1731105599Sbrooks if_printf(ifp, "got an invalid interrupt!\n"); 173239583Swpaul#endif 173339583Swpaul /* Re-enable interrupts but don't ack this one. */ 173439583Swpaul CMD_PUT(sc, type); 173539583Swpaul r = 0; 173636270Swpaul break; 173736270Swpaul case (TL_INTR_TXEOF): 173836270Swpaul r = tl_intvec_txeof((void *)sc, type); 173936270Swpaul break; 174036270Swpaul case (TL_INTR_TXEOC): 174136270Swpaul r = tl_intvec_txeoc((void *)sc, type); 174236270Swpaul break; 174336270Swpaul case (TL_INTR_STATOFLOW): 174439583Swpaul tl_stats_update(sc); 174539583Swpaul r = 1; 174636270Swpaul break; 174736270Swpaul case (TL_INTR_RXEOF): 174836270Swpaul r = tl_intvec_rxeof((void *)sc, type); 174936270Swpaul break; 175036270Swpaul case (TL_INTR_DUMMY): 1751105599Sbrooks if_printf(ifp, "got a dummy interrupt\n"); 175239583Swpaul r = 1; 175336270Swpaul break; 175436270Swpaul case (TL_INTR_ADCHK): 175536270Swpaul if (ivec) 175636270Swpaul r = tl_intvec_adchk((void *)sc, type); 175736270Swpaul else 175836270Swpaul r = tl_intvec_netsts((void *)sc, type); 175936270Swpaul break; 176036270Swpaul case (TL_INTR_RXEOC): 176136270Swpaul r = tl_intvec_rxeoc((void *)sc, type); 176236270Swpaul break; 176336270Swpaul default: 1764105599Sbrooks if_printf(ifp, "bogus interrupt type\n"); 176536270Swpaul break; 176636270Swpaul } 176736270Swpaul 176836270Swpaul /* Re-enable interrupts */ 176937626Swpaul if (r) { 177039583Swpaul CMD_PUT(sc, TL_CMD_ACK | r | type); 177137626Swpaul } 177236270Swpaul 177337626Swpaul if (ifp->if_snd.ifq_head != NULL) 177437626Swpaul tl_start(ifp); 177537626Swpaul 177667087Swpaul TL_UNLOCK(sc); 177767087Swpaul 177836270Swpaul return; 177936270Swpaul} 178036270Swpaul 1781102336Salfredstatic void 1782102336Salfredtl_stats_update(xsc) 178336270Swpaul void *xsc; 178436270Swpaul{ 178536270Swpaul struct tl_softc *sc; 178636270Swpaul struct ifnet *ifp; 178736270Swpaul struct tl_stats tl_stats; 178850462Swpaul struct mii_data *mii; 178936270Swpaul u_int32_t *p; 179036270Swpaul 179136270Swpaul bzero((char *)&tl_stats, sizeof(struct tl_stats)); 179236270Swpaul 179336270Swpaul sc = xsc; 179467087Swpaul TL_LOCK(sc); 179536270Swpaul ifp = &sc->arpcom.ac_if; 179636270Swpaul 179736270Swpaul p = (u_int32_t *)&tl_stats; 179836270Swpaul 179939583Swpaul CSR_WRITE_2(sc, TL_DIO_ADDR, TL_TXGOODFRAMES|TL_DIO_ADDR_INC); 180039583Swpaul *p++ = CSR_READ_4(sc, TL_DIO_DATA); 180139583Swpaul *p++ = CSR_READ_4(sc, TL_DIO_DATA); 180239583Swpaul *p++ = CSR_READ_4(sc, TL_DIO_DATA); 180339583Swpaul *p++ = CSR_READ_4(sc, TL_DIO_DATA); 180439583Swpaul *p++ = CSR_READ_4(sc, TL_DIO_DATA); 180536270Swpaul 180636270Swpaul ifp->if_opackets += tl_tx_goodframes(tl_stats); 180736270Swpaul ifp->if_collisions += tl_stats.tl_tx_single_collision + 180836270Swpaul tl_stats.tl_tx_multi_collision; 180936270Swpaul ifp->if_ipackets += tl_rx_goodframes(tl_stats); 181036270Swpaul ifp->if_ierrors += tl_stats.tl_crc_errors + tl_stats.tl_code_errors + 181136270Swpaul tl_rx_overrun(tl_stats); 181236270Swpaul ifp->if_oerrors += tl_tx_underrun(tl_stats); 181336270Swpaul 181451439Swpaul if (tl_tx_underrun(tl_stats)) { 181551439Swpaul u_int8_t tx_thresh; 181651439Swpaul tx_thresh = tl_dio_read8(sc, TL_ACOMMIT) & TL_AC_TXTHRESH; 181751439Swpaul if (tx_thresh != TL_AC_TXTHRESH_WHOLEPKT) { 181851439Swpaul tx_thresh >>= 4; 181951439Swpaul tx_thresh++; 1820105599Sbrooks if_printf(ifp, "tx underrun -- increasing " 1821105599Sbrooks "tx threshold to %d bytes\n", 182251439Swpaul (64 * (tx_thresh * 4))); 182351439Swpaul tl_dio_clrbit(sc, TL_ACOMMIT, TL_AC_TXTHRESH); 182451439Swpaul tl_dio_setbit(sc, TL_ACOMMIT, tx_thresh << 4); 182551439Swpaul } 182651439Swpaul } 182751439Swpaul 182836270Swpaul sc->tl_stat_ch = timeout(tl_stats_update, sc, hz); 182936302Swpaul 183050462Swpaul if (!sc->tl_bitrate) { 183150462Swpaul mii = device_get_softc(sc->tl_miibus); 183250462Swpaul mii_tick(mii); 183350462Swpaul } 183450462Swpaul 183567087Swpaul TL_UNLOCK(sc); 183648992Swpaul 183736302Swpaul return; 183836270Swpaul} 183936270Swpaul 184036270Swpaul/* 184136270Swpaul * Encapsulate an mbuf chain in a list by coupling the mbuf data 184236270Swpaul * pointers to the fragment pointers. 184336270Swpaul */ 1844102336Salfredstatic int 1845102336Salfredtl_encap(sc, c, m_head) 184636270Swpaul struct tl_softc *sc; 184736270Swpaul struct tl_chain *c; 184836270Swpaul struct mbuf *m_head; 184936270Swpaul{ 185036270Swpaul int frag = 0; 185136270Swpaul struct tl_frag *f = NULL; 185236270Swpaul int total_len; 185336270Swpaul struct mbuf *m; 1854105599Sbrooks struct ifnet *ifp = &sc->arpcom.ac_if; 185536270Swpaul 185636270Swpaul /* 185736270Swpaul * Start packing the mbufs in this chain into 185836270Swpaul * the fragment pointers. Stop when we run out 185936270Swpaul * of fragments or hit the end of the mbuf chain. 186036270Swpaul */ 186136270Swpaul m = m_head; 186236270Swpaul total_len = 0; 186336270Swpaul 186436270Swpaul for (m = m_head, frag = 0; m != NULL; m = m->m_next) { 186536270Swpaul if (m->m_len != 0) { 186636270Swpaul if (frag == TL_MAXFRAGS) 186736270Swpaul break; 186836270Swpaul total_len+= m->m_len; 186936270Swpaul c->tl_ptr->tl_frag[frag].tlist_dadr = 187036270Swpaul vtophys(mtod(m, vm_offset_t)); 187136270Swpaul c->tl_ptr->tl_frag[frag].tlist_dcnt = m->m_len; 187236270Swpaul frag++; 187336270Swpaul } 187436270Swpaul } 187536270Swpaul 187636270Swpaul /* 187736270Swpaul * Handle special cases. 187836270Swpaul * Special case #1: we used up all 10 fragments, but 187936270Swpaul * we have more mbufs left in the chain. Copy the 188036270Swpaul * data into an mbuf cluster. Note that we don't 188136270Swpaul * bother clearing the values in the other fragment 188236270Swpaul * pointers/counters; it wouldn't gain us anything, 188336270Swpaul * and would waste cycles. 188436270Swpaul */ 188536270Swpaul if (m != NULL) { 188636270Swpaul struct mbuf *m_new = NULL; 188736270Swpaul 1888111119Simp MGETHDR(m_new, M_DONTWAIT, MT_DATA); 188936270Swpaul if (m_new == NULL) { 1890105599Sbrooks if_printf(ifp, "no memory for tx list\n"); 189136270Swpaul return(1); 189236270Swpaul } 189336270Swpaul if (m_head->m_pkthdr.len > MHLEN) { 1894111119Simp MCLGET(m_new, M_DONTWAIT); 189536270Swpaul if (!(m_new->m_flags & M_EXT)) { 189636270Swpaul m_freem(m_new); 1897105599Sbrooks if_printf(ifp, "no memory for tx list\n"); 189836270Swpaul return(1); 189936270Swpaul } 190036270Swpaul } 190136270Swpaul m_copydata(m_head, 0, m_head->m_pkthdr.len, 190236270Swpaul mtod(m_new, caddr_t)); 190336270Swpaul m_new->m_pkthdr.len = m_new->m_len = m_head->m_pkthdr.len; 190436270Swpaul m_freem(m_head); 190536270Swpaul m_head = m_new; 190636270Swpaul f = &c->tl_ptr->tl_frag[0]; 190736270Swpaul f->tlist_dadr = vtophys(mtod(m_new, caddr_t)); 190836270Swpaul f->tlist_dcnt = total_len = m_new->m_len; 190936270Swpaul frag = 1; 191036270Swpaul } 191136270Swpaul 191236270Swpaul /* 191336270Swpaul * Special case #2: the frame is smaller than the minimum 191436270Swpaul * frame size. We have to pad it to make the chip happy. 191536270Swpaul */ 191636270Swpaul if (total_len < TL_MIN_FRAMELEN) { 191736270Swpaul if (frag == TL_MAXFRAGS) 1918105599Sbrooks if_printf(ifp, 1919105599Sbrooks "all frags filled but frame still to small!\n"); 192036270Swpaul f = &c->tl_ptr->tl_frag[frag]; 192136270Swpaul f->tlist_dcnt = TL_MIN_FRAMELEN - total_len; 192236270Swpaul f->tlist_dadr = vtophys(&sc->tl_ldata->tl_pad); 192336270Swpaul total_len += f->tlist_dcnt; 192436270Swpaul frag++; 192536270Swpaul } 192636270Swpaul 192736270Swpaul c->tl_mbuf = m_head; 192836270Swpaul c->tl_ptr->tl_frag[frag - 1].tlist_dcnt |= TL_LAST_FRAG; 192936270Swpaul c->tl_ptr->tlist_frsize = total_len; 193036270Swpaul c->tl_ptr->tlist_cstat = TL_CSTAT_READY; 193136270Swpaul c->tl_ptr->tlist_fptr = 0; 193236270Swpaul 193336270Swpaul return(0); 193436270Swpaul} 193536270Swpaul 193636270Swpaul/* 193736270Swpaul * Main transmit routine. To avoid having to do mbuf copies, we put pointers 193836270Swpaul * to the mbuf data regions directly in the transmit lists. We also save a 193936270Swpaul * copy of the pointers since the transmit list fragment pointers are 194036270Swpaul * physical addresses. 194136270Swpaul */ 1942102336Salfredstatic void 1943102336Salfredtl_start(ifp) 194436270Swpaul struct ifnet *ifp; 194536270Swpaul{ 194636270Swpaul struct tl_softc *sc; 194736270Swpaul struct mbuf *m_head = NULL; 194836270Swpaul u_int32_t cmd; 194936270Swpaul struct tl_chain *prev = NULL, *cur_tx = NULL, *start_tx; 195036270Swpaul 195136270Swpaul sc = ifp->if_softc; 195267087Swpaul TL_LOCK(sc); 195336270Swpaul 195436270Swpaul /* 195536270Swpaul * Check for an available queue slot. If there are none, 195636270Swpaul * punt. 195736270Swpaul */ 195836270Swpaul if (sc->tl_cdata.tl_tx_free == NULL) { 195936270Swpaul ifp->if_flags |= IFF_OACTIVE; 196067087Swpaul TL_UNLOCK(sc); 196136270Swpaul return; 196236270Swpaul } 196336270Swpaul 196436270Swpaul start_tx = sc->tl_cdata.tl_tx_free; 196536270Swpaul 196636270Swpaul while(sc->tl_cdata.tl_tx_free != NULL) { 196736270Swpaul IF_DEQUEUE(&ifp->if_snd, m_head); 196836270Swpaul if (m_head == NULL) 196936270Swpaul break; 197036270Swpaul 197136270Swpaul /* Pick a chain member off the free list. */ 197236270Swpaul cur_tx = sc->tl_cdata.tl_tx_free; 197336270Swpaul sc->tl_cdata.tl_tx_free = cur_tx->tl_next; 197436270Swpaul 197536270Swpaul cur_tx->tl_next = NULL; 197636270Swpaul 197736270Swpaul /* Pack the data into the list. */ 197836270Swpaul tl_encap(sc, cur_tx, m_head); 197936270Swpaul 198036270Swpaul /* Chain it together */ 198136270Swpaul if (prev != NULL) { 198236270Swpaul prev->tl_next = cur_tx; 198336270Swpaul prev->tl_ptr->tlist_fptr = vtophys(cur_tx->tl_ptr); 198436270Swpaul } 198536270Swpaul prev = cur_tx; 198636270Swpaul 198736270Swpaul /* 198836270Swpaul * If there's a BPF listener, bounce a copy of this frame 198936270Swpaul * to him. 199036270Swpaul */ 1991106936Ssam BPF_MTAP(ifp, cur_tx->tl_mbuf); 199236270Swpaul } 199336270Swpaul 199436270Swpaul /* 199541526Swpaul * If there are no packets queued, bail. 199641526Swpaul */ 199767087Swpaul if (cur_tx == NULL) { 199867087Swpaul TL_UNLOCK(sc); 199941526Swpaul return; 200067087Swpaul } 200141526Swpaul 200241526Swpaul /* 200336270Swpaul * That's all we can stands, we can't stands no more. 200436270Swpaul * If there are no other transfers pending, then issue the 200536270Swpaul * TX GO command to the adapter to start things moving. 200636270Swpaul * Otherwise, just leave the data in the queue and let 200736270Swpaul * the EOF/EOC interrupt handler send. 200836270Swpaul */ 200936270Swpaul if (sc->tl_cdata.tl_tx_head == NULL) { 201036270Swpaul sc->tl_cdata.tl_tx_head = start_tx; 201136270Swpaul sc->tl_cdata.tl_tx_tail = cur_tx; 201239583Swpaul 201336270Swpaul if (sc->tl_txeoc) { 201436270Swpaul sc->tl_txeoc = 0; 201539583Swpaul CSR_WRITE_4(sc, TL_CH_PARM, vtophys(start_tx->tl_ptr)); 201639583Swpaul cmd = CSR_READ_4(sc, TL_HOSTCMD); 201736270Swpaul cmd &= ~TL_CMD_RT; 201836270Swpaul cmd |= TL_CMD_GO|TL_CMD_INTSON; 201939583Swpaul CMD_PUT(sc, cmd); 202036270Swpaul } 202136270Swpaul } else { 202236270Swpaul sc->tl_cdata.tl_tx_tail->tl_next = start_tx; 202342146Swpaul sc->tl_cdata.tl_tx_tail = cur_tx; 202436270Swpaul } 202536270Swpaul 202636270Swpaul /* 202736270Swpaul * Set a timeout in case the chip goes out to lunch. 202836270Swpaul */ 202936270Swpaul ifp->if_timer = 5; 203067087Swpaul TL_UNLOCK(sc); 203136270Swpaul 203236270Swpaul return; 203336270Swpaul} 203436270Swpaul 2035102336Salfredstatic void 2036102336Salfredtl_init(xsc) 203736270Swpaul void *xsc; 203836270Swpaul{ 203936270Swpaul struct tl_softc *sc = xsc; 204036270Swpaul struct ifnet *ifp = &sc->arpcom.ac_if; 204150462Swpaul struct mii_data *mii; 204236270Swpaul 204367087Swpaul TL_LOCK(sc); 204436270Swpaul 204536270Swpaul ifp = &sc->arpcom.ac_if; 204636270Swpaul 204736270Swpaul /* 204836270Swpaul * Cancel pending I/O. 204936270Swpaul */ 205036270Swpaul tl_stop(sc); 205136270Swpaul 205251439Swpaul /* Initialize TX FIFO threshold */ 205351439Swpaul tl_dio_clrbit(sc, TL_ACOMMIT, TL_AC_TXTHRESH); 205451439Swpaul tl_dio_setbit(sc, TL_ACOMMIT, TL_AC_TXTHRESH_16LONG); 205551439Swpaul 205651439Swpaul /* Set PCI burst size */ 205751439Swpaul tl_dio_write8(sc, TL_BSIZEREG, TL_RXBURST_16LONG|TL_TXBURST_16LONG); 205851439Swpaul 205936270Swpaul /* 206036270Swpaul * Set 'capture all frames' bit for promiscuous mode. 206136270Swpaul */ 206239583Swpaul if (ifp->if_flags & IFF_PROMISC) 206339583Swpaul tl_dio_setbit(sc, TL_NETCMD, TL_CMD_CAF); 206439583Swpaul else 206539583Swpaul tl_dio_clrbit(sc, TL_NETCMD, TL_CMD_CAF); 206636270Swpaul 206736270Swpaul /* 206836270Swpaul * Set capture broadcast bit to capture broadcast frames. 206936270Swpaul */ 207039583Swpaul if (ifp->if_flags & IFF_BROADCAST) 207139583Swpaul tl_dio_clrbit(sc, TL_NETCMD, TL_CMD_NOBRX); 207239583Swpaul else 207339583Swpaul tl_dio_setbit(sc, TL_NETCMD, TL_CMD_NOBRX); 207436270Swpaul 207550468Swpaul tl_dio_write16(sc, TL_MAXRX, MCLBYTES); 207650468Swpaul 207736270Swpaul /* Init our MAC address */ 207841656Swpaul tl_setfilt(sc, (caddr_t)&sc->arpcom.ac_enaddr, 0); 207936270Swpaul 208039583Swpaul /* Init multicast filter, if needed. */ 208139583Swpaul tl_setmulti(sc); 208239583Swpaul 208336270Swpaul /* Init circular RX list. */ 208439583Swpaul if (tl_list_rx_init(sc) == ENOBUFS) { 2085105599Sbrooks if_printf(ifp, 2086105599Sbrooks "initialization failed: no memory for rx buffers\n"); 208739583Swpaul tl_stop(sc); 208867087Swpaul TL_UNLOCK(sc); 208936270Swpaul return; 209036270Swpaul } 209136270Swpaul 209236270Swpaul /* Init TX pointers. */ 209336270Swpaul tl_list_tx_init(sc); 209436270Swpaul 209539583Swpaul /* Enable PCI interrupts. */ 209639583Swpaul CMD_SET(sc, TL_CMD_INTSON); 209736270Swpaul 209836270Swpaul /* Load the address of the rx list */ 209939583Swpaul CMD_SET(sc, TL_CMD_RT); 210039583Swpaul CSR_WRITE_4(sc, TL_CH_PARM, vtophys(&sc->tl_ldata->tl_rx_list[0])); 210136270Swpaul 210250462Swpaul if (!sc->tl_bitrate) { 210350462Swpaul if (sc->tl_miibus != NULL) { 210450462Swpaul mii = device_get_softc(sc->tl_miibus); 210550462Swpaul mii_mediachg(mii); 210650462Swpaul } 2107113548Smdodd } else { 2108113548Smdodd tl_ifmedia_upd(ifp); 210950462Swpaul } 211038030Swpaul 211136270Swpaul /* Send the RX go command */ 211250468Swpaul CMD_SET(sc, TL_CMD_GO|TL_CMD_NES|TL_CMD_RT); 211336270Swpaul 211436270Swpaul ifp->if_flags |= IFF_RUNNING; 211536270Swpaul ifp->if_flags &= ~IFF_OACTIVE; 211636270Swpaul 211736270Swpaul /* Start the stats update counter */ 211836270Swpaul sc->tl_stat_ch = timeout(tl_stats_update, sc, hz); 211967087Swpaul TL_UNLOCK(sc); 212036270Swpaul 212136270Swpaul return; 212236270Swpaul} 212336270Swpaul 212436270Swpaul/* 212536270Swpaul * Set media options. 212636270Swpaul */ 2127102336Salfredstatic int 2128102336Salfredtl_ifmedia_upd(ifp) 212936270Swpaul struct ifnet *ifp; 213036270Swpaul{ 213136270Swpaul struct tl_softc *sc; 213250462Swpaul struct mii_data *mii = NULL; 213336270Swpaul 213436270Swpaul sc = ifp->if_softc; 213536270Swpaul 213650462Swpaul if (sc->tl_bitrate) 213750462Swpaul tl_setmode(sc, sc->ifmedia.ifm_media); 213850462Swpaul else { 213950462Swpaul mii = device_get_softc(sc->tl_miibus); 214050462Swpaul mii_mediachg(mii); 214150462Swpaul } 214236270Swpaul 214336270Swpaul return(0); 214436270Swpaul} 214536270Swpaul 214636270Swpaul/* 214736270Swpaul * Report current media status. 214836270Swpaul */ 2149102336Salfredstatic void 2150102336Salfredtl_ifmedia_sts(ifp, ifmr) 215136270Swpaul struct ifnet *ifp; 215236270Swpaul struct ifmediareq *ifmr; 215336270Swpaul{ 215436270Swpaul struct tl_softc *sc; 215550462Swpaul struct mii_data *mii; 215636270Swpaul 215736270Swpaul sc = ifp->if_softc; 215836270Swpaul 215936270Swpaul ifmr->ifm_active = IFM_ETHER; 216036270Swpaul 216145155Swpaul if (sc->tl_bitrate) { 216245155Swpaul if (tl_dio_read8(sc, TL_ACOMMIT) & TL_AC_MTXD1) 216345155Swpaul ifmr->ifm_active = IFM_ETHER|IFM_10_5; 216445155Swpaul else 216545155Swpaul ifmr->ifm_active = IFM_ETHER|IFM_10_T; 216645155Swpaul if (tl_dio_read8(sc, TL_ACOMMIT) & TL_AC_MTXD3) 216745155Swpaul ifmr->ifm_active |= IFM_HDX; 216845155Swpaul else 216945155Swpaul ifmr->ifm_active |= IFM_FDX; 217045155Swpaul return; 217136270Swpaul } else { 217250462Swpaul mii = device_get_softc(sc->tl_miibus); 217350462Swpaul mii_pollstat(mii); 217450462Swpaul ifmr->ifm_active = mii->mii_media_active; 217550462Swpaul ifmr->ifm_status = mii->mii_media_status; 217636270Swpaul } 217736270Swpaul 217836270Swpaul return; 217936270Swpaul} 218036270Swpaul 2181102336Salfredstatic int 2182102336Salfredtl_ioctl(ifp, command, data) 218336270Swpaul struct ifnet *ifp; 218436735Sdfr u_long command; 218536270Swpaul caddr_t data; 218636270Swpaul{ 218736270Swpaul struct tl_softc *sc = ifp->if_softc; 218836270Swpaul struct ifreq *ifr = (struct ifreq *) data; 218936270Swpaul int s, error = 0; 219036270Swpaul 219136270Swpaul s = splimp(); 219236270Swpaul 219336270Swpaul switch(command) { 219436270Swpaul case SIOCSIFFLAGS: 219536270Swpaul if (ifp->if_flags & IFF_UP) { 219650462Swpaul if (ifp->if_flags & IFF_RUNNING && 219750462Swpaul ifp->if_flags & IFF_PROMISC && 219850462Swpaul !(sc->tl_if_flags & IFF_PROMISC)) { 219950462Swpaul tl_dio_setbit(sc, TL_NETCMD, TL_CMD_CAF); 220050462Swpaul tl_setmulti(sc); 220150462Swpaul } else if (ifp->if_flags & IFF_RUNNING && 220250462Swpaul !(ifp->if_flags & IFF_PROMISC) && 220350462Swpaul sc->tl_if_flags & IFF_PROMISC) { 220450462Swpaul tl_dio_clrbit(sc, TL_NETCMD, TL_CMD_CAF); 220550462Swpaul tl_setmulti(sc); 220650462Swpaul } else 220750462Swpaul tl_init(sc); 220836270Swpaul } else { 220936270Swpaul if (ifp->if_flags & IFF_RUNNING) { 221036270Swpaul tl_stop(sc); 221136270Swpaul } 221236270Swpaul } 221350462Swpaul sc->tl_if_flags = ifp->if_flags; 221436270Swpaul error = 0; 221536270Swpaul break; 221636270Swpaul case SIOCADDMULTI: 221736270Swpaul case SIOCDELMULTI: 221836270Swpaul tl_setmulti(sc); 221936270Swpaul error = 0; 222036270Swpaul break; 222136270Swpaul case SIOCSIFMEDIA: 222236270Swpaul case SIOCGIFMEDIA: 222350462Swpaul if (sc->tl_bitrate) 222450462Swpaul error = ifmedia_ioctl(ifp, ifr, &sc->ifmedia, command); 222550462Swpaul else { 222650462Swpaul struct mii_data *mii; 222750462Swpaul mii = device_get_softc(sc->tl_miibus); 222850462Swpaul error = ifmedia_ioctl(ifp, ifr, 222950462Swpaul &mii->mii_media, command); 223050462Swpaul } 223136270Swpaul break; 223236270Swpaul default: 2233106936Ssam error = ether_ioctl(ifp, command, data); 223436270Swpaul break; 223536270Swpaul } 223636270Swpaul 223736270Swpaul (void)splx(s); 223836270Swpaul 223936270Swpaul return(error); 224036270Swpaul} 224136270Swpaul 2242102336Salfredstatic void 2243102336Salfredtl_watchdog(ifp) 224436270Swpaul struct ifnet *ifp; 224536270Swpaul{ 224636270Swpaul struct tl_softc *sc; 224736270Swpaul 224836270Swpaul sc = ifp->if_softc; 224936270Swpaul 2250105599Sbrooks if_printf(ifp, "device timeout\n"); 225136270Swpaul 225236270Swpaul ifp->if_oerrors++; 225336270Swpaul 225450468Swpaul tl_softreset(sc, 1); 225536270Swpaul tl_init(sc); 225636270Swpaul 225736270Swpaul return; 225836270Swpaul} 225936270Swpaul 226036270Swpaul/* 226136270Swpaul * Stop the adapter and free any mbufs allocated to the 226236270Swpaul * RX and TX lists. 226336270Swpaul */ 2264102336Salfredstatic void 2265102336Salfredtl_stop(sc) 226636270Swpaul struct tl_softc *sc; 226736270Swpaul{ 226836270Swpaul register int i; 226936270Swpaul struct ifnet *ifp; 227036270Swpaul 227167087Swpaul TL_LOCK(sc); 227267087Swpaul 227336270Swpaul ifp = &sc->arpcom.ac_if; 227436270Swpaul 227536270Swpaul /* Stop the stats updater. */ 227636270Swpaul untimeout(tl_stats_update, sc, sc->tl_stat_ch); 227736270Swpaul 227836270Swpaul /* Stop the transmitter */ 227939583Swpaul CMD_CLR(sc, TL_CMD_RT); 228039583Swpaul CMD_SET(sc, TL_CMD_STOP); 228139583Swpaul CSR_WRITE_4(sc, TL_CH_PARM, 0); 228236270Swpaul 228336270Swpaul /* Stop the receiver */ 228439583Swpaul CMD_SET(sc, TL_CMD_RT); 228539583Swpaul CMD_SET(sc, TL_CMD_STOP); 228639583Swpaul CSR_WRITE_4(sc, TL_CH_PARM, 0); 228736270Swpaul 228836270Swpaul /* 228936270Swpaul * Disable host interrupts. 229036270Swpaul */ 229139583Swpaul CMD_SET(sc, TL_CMD_INTSOFF); 229236270Swpaul 229336270Swpaul /* 229436270Swpaul * Clear list pointer. 229536270Swpaul */ 229639583Swpaul CSR_WRITE_4(sc, TL_CH_PARM, 0); 229736270Swpaul 229836270Swpaul /* 229936270Swpaul * Free the RX lists. 230036270Swpaul */ 230136270Swpaul for (i = 0; i < TL_RX_LIST_CNT; i++) { 230236270Swpaul if (sc->tl_cdata.tl_rx_chain[i].tl_mbuf != NULL) { 230336270Swpaul m_freem(sc->tl_cdata.tl_rx_chain[i].tl_mbuf); 230436270Swpaul sc->tl_cdata.tl_rx_chain[i].tl_mbuf = NULL; 230536270Swpaul } 230636270Swpaul } 230736270Swpaul bzero((char *)&sc->tl_ldata->tl_rx_list, 230836270Swpaul sizeof(sc->tl_ldata->tl_rx_list)); 230936270Swpaul 231036270Swpaul /* 231136270Swpaul * Free the TX list buffers. 231236270Swpaul */ 231336270Swpaul for (i = 0; i < TL_TX_LIST_CNT; i++) { 231436270Swpaul if (sc->tl_cdata.tl_tx_chain[i].tl_mbuf != NULL) { 231536270Swpaul m_freem(sc->tl_cdata.tl_tx_chain[i].tl_mbuf); 231636270Swpaul sc->tl_cdata.tl_tx_chain[i].tl_mbuf = NULL; 231736270Swpaul } 231836270Swpaul } 231936270Swpaul bzero((char *)&sc->tl_ldata->tl_tx_list, 232036270Swpaul sizeof(sc->tl_ldata->tl_tx_list)); 232136270Swpaul 232236270Swpaul ifp->if_flags &= ~(IFF_RUNNING | IFF_OACTIVE); 232367087Swpaul TL_UNLOCK(sc); 232436270Swpaul 232536270Swpaul return; 232636270Swpaul} 232736270Swpaul 232836270Swpaul/* 232936270Swpaul * Stop all chip I/O so that the kernel's probe routines don't 233036270Swpaul * get confused by errant DMAs when rebooting. 233136270Swpaul */ 2332102336Salfredstatic void 2333102336Salfredtl_shutdown(dev) 233448992Swpaul device_t dev; 233536270Swpaul{ 233639583Swpaul struct tl_softc *sc; 233736270Swpaul 233848992Swpaul sc = device_get_softc(dev); 233936270Swpaul 234039583Swpaul tl_stop(sc); 234136270Swpaul 234236270Swpaul return; 234336270Swpaul} 2344