Home | History | Annotate | Line # | Download | only in qbus
if_qt.c revision 1.14
      1  1.14      matt /*	$NetBSD: if_qt.c,v 1.14 2008/03/11 05:34:01 matt Exp $	*/
      2   1.1     ragge /*
      3   1.1     ragge  * Copyright (c) 1992 Steven M. Schultz
      4   1.1     ragge  * All rights reserved.
      5   1.1     ragge  *
      6   1.1     ragge  * Redistribution and use in source and binary forms, with or without
      7   1.1     ragge  * modification, are permitted provided that the following conditions
      8   1.1     ragge  * are met:
      9   1.1     ragge  * 1. Redistributions of source code must retain the above copyright
     10   1.1     ragge  *    notice, this list of conditions and the following disclaimer.
     11   1.1     ragge  * 2. Redistributions in binary form must reproduce the above copyright
     12   1.1     ragge  *    notice, this list of conditions and the following disclaimer in the
     13   1.1     ragge  *    documentation and/or other materials provided with the distribution.
     14   1.1     ragge  * 3. The name of the author may not be used to endorse or promote products
     15   1.1     ragge  *    derived from this software without specific prior written permission
     16   1.1     ragge  *
     17   1.1     ragge  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     18   1.1     ragge  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     19   1.1     ragge  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     20   1.1     ragge  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     21   1.1     ragge  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     22   1.1     ragge  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     23   1.1     ragge  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     24   1.1     ragge  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     25   1.1     ragge  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     26   1.1     ragge  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     27   1.1     ragge  *
     28   1.1     ragge  *	@(#)if_qt.c     1.2 (2.11BSD) 2/20/93
     29   1.1     ragge  */
     30   1.1     ragge /*
     31   1.1     ragge  *
     32   1.6    simonb  * Modification History
     33   1.1     ragge  * 23-Feb-92 -- sms
     34   1.1     ragge  *	Rewrite the buffer handling so that fewer than the maximum number of
     35   1.1     ragge  *	buffers may be used (32 receive and 12 transmit buffers consume 66+kb
     36   1.1     ragge  *	of main system memory in addition to the internal structures in the
     37   1.1     ragge  *	networking code).  A freelist of available buffers is maintained now.
     38   1.6    simonb  *	When I/O operations complete the associated buffer is placed on the
     39   1.6    simonb  *	freelist (a single linked list for simplicity) and when an I/O is
     40   1.6    simonb  *	started a buffer is pulled off the list.
     41   1.1     ragge  *
     42   1.1     ragge  * 20-Feb-92 -- sms
     43   1.1     ragge  *	It works!  Darned board couldn't handle "short" rings - those rings
     44   1.1     ragge  *	where only half the entries were made available to the board (the
     45   1.1     ragge  *	ring descriptors were the full size, merely half the entries were
     46   1.1     ragge  * 	flagged as belonging always to the driver).  Grrrr.  Would have thought
     47   1.6    simonb  *	the board could skip over those entries reserved by the driver.
     48   1.6    simonb  *	Now to find a way not to have to allocated 32+12 times 1.5kb worth of
     49   1.1     ragge  *	buffers...
     50   1.1     ragge  *
     51   1.1     ragge  * 03-Feb-92 -- sms
     52   1.1     ragge  *	Released but still not working.  The driver now responds to arp and
     53   1.1     ragge  *	ping requests.  The board is apparently not returning ring descriptors
     54   1.1     ragge  *	to the driver so eventually we run out of buffers.  Back to the
     55   1.1     ragge  *	drawing board.
     56   1.1     ragge  *
     57   1.1     ragge  * 28-Dec-92 -- sms
     58   1.1     ragge  *	Still not released.  Hiatus in finding free time and thin-netting
     59   1.1     ragge  *	the systems (many thanks Terry!).
     60   1.1     ragge  *	Added logic to dynamically allocate a vector and initialize it.
     61   1.1     ragge  *
     62   1.1     ragge  * 23-Oct-92 -- sms
     63   1.1     ragge  *	The INIT block must (apparently) be quadword aligned [no thanks to
     64   1.1     ragge  *	the manual for not mentioning that fact].  The necessary alignment
     65   1.1     ragge  *	is achieved by allocating the INIT block from main memory ('malloc'
     66   1.1     ragge  *	guarantees click alignment) and mapping it as needed (which is _very_
     67   1.1     ragge  *	infrequently).  A check for quadword alignment of the ring descriptors
     68   1.1     ragge  *	was added - at present the descriptors are properly aligned, if this
     69   1.1     ragge  *	should change then something will have to be done (like do it "right").
     70   1.1     ragge  *	Darned alignment restrictions!
     71   1.1     ragge  *
     72   1.6    simonb  *	A couple of typos were corrected (missing parentheses, reversed
     73   1.1     ragge  *	arguments to printf calls, etc).
     74   1.1     ragge  *
     75   1.1     ragge  * 13-Oct-92 -- sms (at) wlv.iipo.gtegsc.com
     76   1.1     ragge  *	Created based on the DELQA-PLUS addendum to DELQA User's Guide.
     77   1.6    simonb  *	This driver ('qt') is selected at system configuration time.  If the
     78   1.6    simonb  *	board *	is not a DELQA-YM an error message will be printed and the
     79   1.1     ragge  *	interface will not be attached.
     80   1.2     ragge  */
     81   1.2     ragge 
     82   1.2     ragge #include <sys/cdefs.h>
     83  1.14      matt __KERNEL_RCSID(0, "$NetBSD: if_qt.c,v 1.14 2008/03/11 05:34:01 matt Exp $");
     84   1.2     ragge 
     85   1.2     ragge #include "opt_inet.h"
     86   1.2     ragge #include "bpfilter.h"
     87   1.1     ragge 
     88   1.2     ragge #include <sys/param.h>
     89   1.2     ragge #include <sys/systm.h>
     90   1.2     ragge #include <sys/mbuf.h>
     91   1.2     ragge #include <sys/protosw.h>
     92   1.2     ragge #include <sys/socket.h>
     93   1.2     ragge #include <sys/ioctl.h>
     94  1.13     joerg #include <sys/device.h>
     95   1.2     ragge #include <sys/errno.h>
     96   1.2     ragge #include <sys/syslog.h>
     97   1.2     ragge #include <sys/time.h>
     98   1.2     ragge #include <sys/kernel.h>
     99   1.2     ragge 
    100   1.2     ragge #include <net/if.h>
    101   1.2     ragge #include <net/if_ether.h>
    102   1.2     ragge #include <net/netisr.h>
    103   1.2     ragge #include <net/route.h>
    104   1.1     ragge 
    105   1.1     ragge #ifdef INET
    106   1.2     ragge #include <sys/domain.h>
    107   1.2     ragge #include <netinet/in.h>
    108   1.2     ragge #include <netinet/in_systm.h>
    109   1.2     ragge #include <netinet/in_var.h>
    110   1.2     ragge #include <netinet/ip.h>
    111   1.1     ragge #endif
    112   1.1     ragge 
    113   1.3     ragge #if NBPFILTER > 0
    114   1.3     ragge #include <net/bpf.h>
    115   1.3     ragge #include <net/bpfdesc.h>
    116   1.3     ragge #endif
    117   1.3     ragge 
    118   1.1     ragge 
    119  1.12        ad #include <sys/bus.h>
    120   1.2     ragge 
    121   1.2     ragge #include <dev/qbus/ubavar.h>
    122   1.2     ragge #include <dev/qbus/if_uba.h>
    123   1.2     ragge #include <dev/qbus/if_qtreg.h>
    124   1.2     ragge 
    125   1.2     ragge #define NRCV	QT_MAX_RCV	/* Receive descriptors (must be == 32) */
    126   1.2     ragge #define NXMT	QT_MAX_XMT	/* Transmit descriptors	(must be == 12) */
    127   1.2     ragge #if	NRCV != 32 || NXMT != 12
    128   1.2     ragge 	hardware requires these sizes.
    129   1.1     ragge #endif
    130   1.6    simonb 
    131   1.4     ragge /*
    132   1.4     ragge  * Control data structures, must be in DMA-friendly memory.
    133   1.4     ragge  */
    134   1.2     ragge struct	qt_cdata {
    135   1.2     ragge 	struct	qt_init qc_init;	/* Init block			*/
    136   1.2     ragge 	struct	qt_rring qc_r[NRCV];	/* Receive descriptor ring	*/
    137   1.2     ragge 	struct	qt_tring qc_t[NXMT];	/* Transmit descriptor ring	*/
    138   1.2     ragge };
    139   1.1     ragge 
    140   1.1     ragge struct	qt_softc {
    141  1.14      matt 	device_t sc_dev;		/* Configuration common part */
    142   1.2     ragge 	struct	ethercom is_ec;		/* common part - must be first  */
    143  1.14      matt 	struct uba_softc *sc_uh;
    144   1.2     ragge 	struct	evcnt sc_intrcnt;	/* Interrupt counting */
    145   1.6    simonb #define	is_if	is_ec.ec_if		/* network-visible interface	*/
    146   1.2     ragge 	u_int8_t is_addr[ETHER_ADDR_LEN]; /* hardware Ethernet address	*/
    147   1.2     ragge 	bus_space_tag_t	sc_iot;
    148   1.2     ragge 	bus_addr_t	sc_ioh;
    149   1.2     ragge 
    150   1.4     ragge 	struct	ubinfo	sc_ui;		/* control block address desc	*/
    151   1.4     ragge 	struct	qt_cdata *sc_ib;	/* virt address of ctrl block	*/
    152   1.4     ragge 	struct	qt_cdata *sc_pib;	/* phys address of ctrl block	*/
    153   1.2     ragge 
    154   1.2     ragge 	struct	ifubinfo sc_ifuba;	/* UNIBUS resources */
    155   1.2     ragge 	struct	ifrw sc_ifr[NRCV];	/* UNIBUS receive buffer maps */
    156   1.2     ragge 	struct	ifxmt sc_ifw[NXMT];	/* UNIBUS receive buffer maps */
    157   1.2     ragge 
    158   1.4     ragge 	int	rindex;			/* Receive Completed Index	*/
    159   1.4     ragge 	int	nxtrcv;			/* Next Receive Index		*/
    160   1.4     ragge 	int	nrcv;			/* Number of Receives active	*/
    161   1.1     ragge 
    162   1.2     ragge 	int	xnext;			/* Next descriptor to transmit	*/
    163   1.2     ragge 	int	xlast;			/* Last descriptor transmitted	*/
    164   1.2     ragge 	int	nxmit;			/* # packets in send queue	*/
    165   1.4     ragge 
    166   1.2     ragge 	short	vector;			/* Interrupt vector assigned	*/
    167   1.2     ragge };
    168   1.2     ragge 
    169  1.14      matt static	int qtmatch(device_t, cfdata_t, void *);
    170  1.14      matt static	void qtattach(device_t, device_t, void *);
    171   1.2     ragge static	void qtintr(void *);
    172   1.2     ragge static	int qtinit(struct ifnet *);
    173  1.11  christos static	int qtioctl(struct ifnet *, u_long, void *);
    174   1.2     ragge static	int qtturbo(struct qt_softc *);
    175   1.2     ragge static	void qtstart(struct ifnet *ifp);
    176   1.4     ragge static	void qtstop(struct ifnet *ifp, int disable);
    177   1.2     ragge static	void qtsrr(struct qt_softc *, int);
    178   1.2     ragge static	void qtrint(struct qt_softc *sc);
    179   1.2     ragge static	void qttint(struct qt_softc *sc);
    180   1.2     ragge 
    181   1.2     ragge /* static	void qtrestart(struct qt_softc *sc); */
    182   1.6    simonb 
    183  1.14      matt CFATTACH_DECL_NEW(qt, sizeof(struct qt_softc),
    184   1.2     ragge     qtmatch, qtattach, NULL, NULL);
    185   1.1     ragge 
    186   1.1     ragge /*
    187   1.6    simonb  * Maximum packet size needs to include 4 bytes for the CRC
    188   1.1     ragge  * on received packets.
    189   1.1     ragge */
    190   1.1     ragge #define MAXPACKETSIZE (ETHERMTU + sizeof (struct ether_header) + 4)
    191   1.1     ragge #define	MINPACKETSIZE 64
    192   1.1     ragge 
    193   1.3     ragge #define QT_WCSR(csr, val) \
    194   1.3     ragge 	bus_space_write_2(sc->sc_iot, sc->sc_ioh, csr, val)
    195   1.3     ragge #define QT_RCSR(csr) \
    196   1.3     ragge 	bus_space_read_2(sc->sc_iot, sc->sc_ioh, csr)
    197   1.3     ragge 
    198   1.3     ragge 
    199   1.2     ragge #define loint(x)	((int)(x) & 0xffff)
    200   1.2     ragge #define hiint(x)	(((int)(x) >> 16) & 0x3f)
    201   1.2     ragge 
    202   1.1     ragge /*
    203   1.2     ragge  * Check if this card is a turbo delqa.
    204   1.2     ragge  */
    205   1.2     ragge int
    206  1.14      matt qtmatch(device_t parent, cfdata_t cf, void *aux)
    207   1.2     ragge {
    208  1.14      matt 	struct qt_softc ssc;
    209  1.14      matt 	struct qt_softc *sc = &ssc;
    210  1.14      matt 	struct uba_attach_args *ua = aux;
    211  1.14      matt 	struct uba_softc *uh = device_private(parent);
    212  1.14      matt 	struct qt_init *qi;
    213   1.4     ragge 	struct ubinfo ui;
    214   1.2     ragge 
    215   1.3     ragge 	sc->sc_iot = ua->ua_iot;
    216   1.3     ragge 	sc->sc_ioh = ua->ua_ioh;
    217   1.2     ragge 	if (qtturbo(sc) == 0)
    218   1.4     ragge 		return 0; /* Not a turbo card */
    219   1.4     ragge 
    220   1.4     ragge 	/* Force the card to interrupt */
    221   1.4     ragge 	ui.ui_size = sizeof(struct qt_init);
    222  1.14      matt 	if (ubmemalloc(uh, &ui, 0))
    223   1.4     ragge 		return 0; /* Failed */
    224   1.4     ragge 	qi = (struct qt_init *)ui.ui_vaddr;
    225   1.4     ragge 	memset(qi, 0, sizeof(struct qt_init));
    226  1.14      matt 	qi->vector = uh->uh_lastiv - 4;
    227   1.4     ragge 	qi->options = INIT_OPTIONS_INT;
    228   1.6    simonb 
    229   1.4     ragge 	QT_WCSR(CSR_IBAL, loint(ui.ui_baddr));
    230   1.4     ragge 	QT_WCSR(CSR_IBAH, hiint(ui.ui_baddr));
    231   1.4     ragge 	QT_WCSR(CSR_SRQR, 2);
    232   1.4     ragge 	delay(100000); /* Wait some time for interrupt */
    233   1.4     ragge 	QT_WCSR(CSR_SRQR, 3); /* Stop card */
    234   1.4     ragge 
    235  1.14      matt 	ubmemfree(uh, &ui);
    236   1.2     ragge 
    237   1.2     ragge 	return 10;
    238   1.2     ragge }
    239   1.1     ragge 
    240   1.1     ragge 
    241   1.1     ragge /*
    242   1.1     ragge  * Interface exists.  More accurately, something exists at the CSR (see
    243   1.1     ragge  * sys/sys_net.c) -- there's no guarantee it's a DELQA-YM.
    244   1.1     ragge  *
    245   1.1     ragge  * The ring descriptors are initialized, the buffers allocated using first the
    246   1.1     ragge  * DMA region allocated at network load time and then later main memory.  The
    247   1.1     ragge  * INIT block is filled in and the device is poked/probed to see if it really
    248   1.1     ragge  * is a DELQA-YM.  If the device is not a -YM then a message is printed and
    249   1.1     ragge  * the 'if_attach' call is skipped.  For a -YM the START command is issued,
    250   1.1     ragge  * but the device is not marked as running|up - that happens at interrupt level
    251   1.1     ragge  * when the device interrupts to say it has started.
    252   1.1     ragge */
    253   1.1     ragge 
    254   1.2     ragge void
    255  1.14      matt qtattach(device_t parent, device_t self, void *aux)
    256  1.14      matt {
    257  1.14      matt 	struct qt_softc *sc = device_private(self);
    258  1.14      matt 	struct ifnet *ifp = &sc->is_if;
    259   1.2     ragge 	struct uba_attach_args *ua = aux;
    260   1.2     ragge 
    261   1.6    simonb 	uba_intr_establish(ua->ua_icookie, ua->ua_cvec, qtintr, sc,
    262   1.2     ragge 	    &sc->sc_intrcnt);
    263   1.2     ragge 	evcnt_attach_dynamic(&sc->sc_intrcnt, EVCNT_TYPE_INTR, ua->ua_evcnt,
    264  1.14      matt 	    device_xname(sc->sc_dev), "intr");
    265   1.2     ragge 
    266  1.14      matt 	sc->sc_dev = self;
    267  1.14      matt 	sc->sc_uh = device_private(parent);
    268   1.3     ragge 	sc->sc_iot = ua->ua_iot;
    269   1.3     ragge 	sc->sc_ioh = ua->ua_ioh;
    270  1.14      matt 	sc->sc_uh->uh_lastiv -= 4;
    271  1.14      matt 	sc->vector = sc->sc_uh->uh_lastiv;
    272   1.1     ragge 
    273   1.1     ragge /*
    274   1.1     ragge  * Now allocate the buffers and initialize the buffers.  This should _never_
    275   1.1     ragge  * fail because main memory is allocated after the DMA pool is used up.
    276   1.1     ragge */
    277   1.1     ragge 
    278   1.3     ragge 	sc->is_addr[0] = QT_RCSR(0);
    279   1.3     ragge 	sc->is_addr[1] = QT_RCSR(2);
    280   1.3     ragge 	sc->is_addr[2] = QT_RCSR(4);
    281   1.3     ragge 	sc->is_addr[3] = QT_RCSR(6);
    282   1.3     ragge 	sc->is_addr[4] = QT_RCSR(8);
    283   1.3     ragge 	sc->is_addr[5] = QT_RCSR(10);
    284   1.2     ragge 
    285  1.14      matt 	strcpy(ifp->if_xname, device_xname(sc->sc_dev));
    286   1.2     ragge 	ifp->if_softc = sc;
    287   1.4     ragge 	ifp->if_flags = IFF_BROADCAST|IFF_MULTICAST;
    288   1.2     ragge 	ifp->if_ioctl = qtioctl;
    289   1.2     ragge 	ifp->if_start = qtstart;
    290   1.2     ragge 	ifp->if_init = qtinit;
    291   1.4     ragge 	ifp->if_stop = qtstop;
    292   1.2     ragge 	IFQ_SET_READY(&ifp->if_snd);
    293   1.6    simonb 
    294   1.2     ragge 	printf("\n%s: delqa-plus in Turbo mode, hardware address %s\n",
    295  1.14      matt 	    device_xname(sc->sc_dev), ether_sprintf(sc->is_addr));
    296   1.2     ragge 	if_attach(ifp);
    297   1.2     ragge 	ether_ifattach(ifp, sc->is_addr);
    298  1.14      matt }
    299   1.6    simonb 
    300   1.2     ragge int
    301  1.14      matt qtturbo(struct qt_softc *sc)
    302  1.14      matt {
    303  1.14      matt 	int i;
    304   1.1     ragge 
    305   1.1     ragge /*
    306   1.1     ragge  * Issue the software reset.  Delay 150us.  The board should now be in
    307   1.1     ragge  * DELQA-Normal mode.  Set ITB and DEQTA select.  If both bits do not
    308   1.1     ragge  * stay turned on then the board is not a DELQA-YM.
    309   1.1     ragge */
    310   1.3     ragge 	QT_WCSR(CSR_ARQR, ARQR_SR);
    311   1.3     ragge 	QT_WCSR(CSR_ARQR, 0);
    312   1.1     ragge 	delay(150L);
    313   1.1     ragge 
    314   1.3     ragge 	QT_WCSR(CSR_SRR, 0x8001);	/* MS | ITB */
    315   1.3     ragge 	i = QT_RCSR(CSR_SRR);
    316   1.3     ragge 	QT_WCSR(CSR_SRR, 0x8000);	/* Turn off ITB, set DELQA select */
    317  1.14      matt 	if (i != 0x8001)
    318   1.1     ragge 		return(0);
    319   1.1     ragge /*
    320   1.1     ragge  * Board is a DELQA-YM.  Send the commands to enable Turbo mode.  Delay
    321   1.1     ragge  * 1 second, testing the SRR register every millisecond to see if the
    322   1.1     ragge  * board has shifted to Turbo mode.
    323   1.1     ragge */
    324   1.3     ragge 	QT_WCSR(CSR_XCR0, 0x0baf);
    325   1.3     ragge 	QT_WCSR(CSR_XCR1, 0xff00);
    326   1.1     ragge 	for	(i = 0; i < 1000; i++)
    327   1.1     ragge 		{
    328   1.3     ragge 		if	((QT_RCSR(CSR_SRR) & SRR_RESP) == 1)
    329   1.1     ragge 			break;
    330   1.1     ragge 		delay(1000L);
    331   1.1     ragge 		}
    332   1.1     ragge 	if	(i >= 1000)
    333   1.1     ragge 		{
    334   1.3     ragge 		printf("qt !Turbo\n");
    335   1.1     ragge 		return(0);
    336   1.1     ragge 		}
    337   1.1     ragge 	return(1);
    338  1.14      matt }
    339   1.1     ragge 
    340   1.2     ragge int
    341   1.2     ragge qtinit(struct ifnet *ifp)
    342  1.14      matt {
    343  1.14      matt 	struct qt_softc *sc = ifp->if_softc;
    344  1.14      matt 	struct qt_init *iniblk;
    345   1.2     ragge 	struct ifrw *ifrw;
    346   1.2     ragge 	struct ifxmt *ifxp;
    347   1.1     ragge 	struct	qt_rring *rp;
    348   1.1     ragge 	struct	qt_tring *tp;
    349  1.14      matt 	int i, error;
    350   1.6    simonb 
    351   1.5   thorpej 	if (ifp->if_flags & IFF_RUNNING) {
    352   1.5   thorpej 		/* Cancel any pending I/O. */
    353   1.5   thorpej 		qtstop(ifp, 0);
    354   1.5   thorpej 	}
    355   1.2     ragge 
    356   1.2     ragge 	if (sc->sc_ib == NULL) {
    357  1.14      matt 		if (if_ubaminit(&sc->sc_ifuba, sc->sc_uh,
    358   1.2     ragge 		    MCLBYTES, sc->sc_ifr, NRCV, sc->sc_ifw, NXMT)) {
    359  1.14      matt 			printf("%s: can't initialize\n", device_xname(sc->sc_dev));
    360   1.2     ragge 			ifp->if_flags &= ~IFF_UP;
    361   1.2     ragge 			return 0;
    362   1.2     ragge 		}
    363   1.2     ragge 		sc->sc_ui.ui_size = sizeof(struct qt_cdata);
    364  1.14      matt 		if ((error = ubmemalloc(sc->sc_uh, &sc->sc_ui, 0))) {
    365   1.2     ragge 			printf(": failed ubmemalloc(), error = %d\n", error);
    366   1.2     ragge 			return error;
    367   1.2     ragge 		}
    368   1.2     ragge 		sc->sc_ib = (struct qt_cdata *)sc->sc_ui.ui_vaddr;
    369   1.2     ragge 		sc->sc_pib = (struct qt_cdata *)sc->sc_ui.ui_baddr;
    370   1.2     ragge 
    371   1.2     ragge /*
    372   1.2     ragge  * Fill in most of the INIT block: vector, options (interrupt enable), ring
    373   1.2     ragge  * locations.  The physical address is copied from the ROMs as part of the
    374   1.2     ragge  * -YM testing proceedure.  The CSR is saved here rather than in qtinit()
    375   1.2     ragge  * because the qtturbo() routine needs it.
    376   1.2     ragge  *
    377   1.2     ragge  * The INIT block must be quadword aligned.  Using malloc() guarantees click
    378   1.2     ragge  * (64 byte) alignment.  Since the only time the INIT block is referenced is
    379   1.2     ragge  * at 'startup' or 'reset' time there is really no time penalty (and a modest
    380   1.2     ragge  * D space savings) involved.
    381   1.2     ragge */
    382   1.2     ragge 		memset(sc->sc_ib, 0, sizeof(struct qt_cdata));
    383   1.2     ragge 		iniblk = &sc->sc_ib->qc_init;
    384   1.2     ragge 
    385   1.2     ragge 		iniblk->vector = sc->vector;
    386   1.2     ragge 		memcpy(iniblk->paddr, sc->is_addr, 6);
    387   1.2     ragge 
    388   1.2     ragge 		iniblk->options = INIT_OPTIONS_INT;
    389   1.2     ragge 		iniblk->rx_lo = loint(&sc->sc_pib->qc_r);
    390   1.2     ragge 		iniblk->rx_hi = hiint(&sc->sc_pib->qc_r);
    391   1.2     ragge 		iniblk->tx_lo = loint(&sc->sc_pib->qc_t);
    392   1.2     ragge 		iniblk->tx_hi = hiint(&sc->sc_pib->qc_t);
    393   1.2     ragge 	}
    394   1.4     ragge 	iniblk = &sc->sc_ib->qc_init;
    395   1.4     ragge 	iniblk->mode = ifp->if_flags & IFF_PROMISC ? INIT_MODE_PRO : 0;
    396   1.2     ragge 
    397   1.2     ragge 
    398   1.1     ragge /*
    399   1.1     ragge  * Now initialize the receive ring descriptors.  Because this routine can be
    400   1.1     ragge  * called with outstanding I/O operations we check the ring descriptors for
    401   1.1     ragge  * a non-zero 'rhost0' (or 'thost0') word and place those buffers back on
    402   1.1     ragge  * the free list.
    403   1.1     ragge */
    404   1.2     ragge 	for (i = 0; i < NRCV; i++) {
    405   1.2     ragge 		rp = &sc->sc_ib->qc_r[i];
    406   1.2     ragge 		ifrw = &sc->sc_ifr[i];
    407   1.2     ragge 		rp->rmd1 = MCLBYTES;
    408   1.2     ragge 		rp->rmd4 = loint(ifrw->ifrw_info);
    409   1.2     ragge 		rp->rmd5 = hiint(ifrw->ifrw_info);
    410   1.2     ragge 		rp->rmd3 = 0;			/* clear RMD3_OWN */
    411   1.1     ragge 		}
    412   1.2     ragge 	for (i = 0; i < NXMT; i++) {
    413   1.2     ragge 		tp = &sc->sc_ib->qc_t[i];
    414   1.2     ragge 		ifxp = &sc->sc_ifw[i];
    415   1.2     ragge 		tp->tmd4 = loint(ifxp->ifw_info);
    416   1.2     ragge 		tp->tmd5 = hiint(ifxp->ifw_info);
    417   1.2     ragge 		tp->tmd3 = TMD3_OWN;
    418   1.1     ragge 		}
    419   1.2     ragge 
    420   1.2     ragge 	sc->xnext = sc->xlast = sc->nxmit = 0;
    421   1.1     ragge 	sc->rindex = 0;
    422   1.1     ragge 	sc->nxtrcv = 0;
    423   1.1     ragge 	sc->nrcv = 0;
    424   1.6    simonb 
    425   1.1     ragge /*
    426   1.1     ragge  * Now we tell the device the address of the INIT block.  The device
    427   1.1     ragge  * _must_ be in the Turbo mode at this time.  The "START" command is
    428   1.1     ragge  * then issued to the device.  A 1 second timeout is then started.
    429   1.1     ragge  * When the interrupt occurs the IFF_UP|IFF_RUNNING state is entered and
    430   1.6    simonb  * full operations will proceed.  If the timeout expires without an interrupt
    431   1.1     ragge  * being received an error is printed, the flags cleared and the device left
    432   1.1     ragge  * marked down.
    433   1.1     ragge */
    434   1.3     ragge 	QT_WCSR(CSR_IBAL, loint(&sc->sc_pib->qc_init));
    435   1.3     ragge 	QT_WCSR(CSR_IBAH, hiint(&sc->sc_pib->qc_init));
    436   1.3     ragge 	QT_WCSR(CSR_SRQR, 2);
    437   1.2     ragge 
    438   1.2     ragge 	sc->is_if.if_flags |= IFF_RUNNING;
    439   1.2     ragge 	return 0;
    440   1.1     ragge 	}
    441   1.1     ragge 
    442   1.1     ragge /*
    443   1.1     ragge  * Start output on interface.
    444   1.1     ragge  */
    445   1.1     ragge 
    446   1.2     ragge void
    447   1.2     ragge qtstart(struct ifnet *ifp)
    448   1.1     ragge 	{
    449   1.6    simonb 	int	len, nxmit;
    450  1.14      matt 	struct qt_softc *sc = ifp->if_softc;
    451  1.14      matt 	struct qt_tring *rp;
    452   1.2     ragge 	struct	mbuf *m = NULL;
    453   1.6    simonb 
    454   1.2     ragge 	for (nxmit = sc->nxmit; nxmit < NXMT; nxmit++) {
    455   1.1     ragge 		IF_DEQUEUE(&sc->is_if.if_snd, m);
    456   1.1     ragge 		if	(m == 0)
    457   1.1     ragge 			break;
    458   1.2     ragge 
    459   1.2     ragge 		rp = &sc->sc_ib->qc_t[sc->xnext];
    460   1.2     ragge 		if ((rp->tmd3 & TMD3_OWN) == 0)
    461   1.2     ragge 			panic("qtstart");
    462   1.2     ragge 
    463   1.3     ragge #if NBPFILTER > 0
    464   1.3     ragge 		if (ifp->if_bpf)
    465   1.3     ragge 			bpf_mtap(ifp->if_bpf, m);
    466   1.3     ragge #endif
    467   1.3     ragge 
    468   1.2     ragge 		len = if_ubaput(&sc->sc_ifuba, &sc->sc_ifw[sc->xnext], m);
    469   1.2     ragge 		if (len < MINPACKETSIZE)
    470   1.1     ragge 			len = MINPACKETSIZE;
    471   1.1     ragge 		rp->tmd3 = len & TMD3_BCT;	/* set length,clear ownership */
    472   1.3     ragge 		QT_WCSR(CSR_ARQR, ARQR_TRQ);	/* tell device it has buffer */
    473   1.3     ragge 
    474   1.2     ragge 		if	(++sc->xnext >= NXMT)
    475   1.2     ragge 			sc->xnext = 0;
    476   1.1     ragge 	}
    477   1.2     ragge 	if (sc->nxmit != nxmit)
    478   1.2     ragge 		sc->nxmit = nxmit;
    479   1.2     ragge 	/* XXX - set OACTIVE */
    480   1.2     ragge }
    481   1.6    simonb 
    482   1.1     ragge /*
    483   1.6    simonb  * General interrupt service routine.  Receive, transmit, device start
    484   1.1     ragge  * interrupts and timeouts come here.  Check for hard device errors and print a
    485   1.6    simonb  * message if any errors are found.  If we are waiting for the device to
    486   1.1     ragge  * START then check if the device is now running.
    487   1.1     ragge */
    488   1.1     ragge 
    489   1.2     ragge void
    490   1.2     ragge qtintr(void *arg)
    491   1.1     ragge 	{
    492   1.2     ragge 	struct qt_softc *sc = arg;
    493   1.4     ragge 	struct ifnet *ifp = &sc->is_if;
    494   1.2     ragge 	short status;
    495   1.2     ragge 
    496   1.6    simonb 
    497   1.3     ragge 	status = QT_RCSR(CSR_SRR);
    498   1.1     ragge 	if	(status < 0)
    499   1.1     ragge 		/* should we reset the device after a bunch of these errs? */
    500   1.2     ragge 		qtsrr(sc, status);
    501   1.4     ragge 	if ((ifp->if_flags & IFF_UP) == 0)
    502   1.4     ragge 		return; /* Unwanted interrupt */
    503   1.2     ragge 	qtrint(sc);
    504   1.2     ragge 	qttint(sc);
    505   1.2     ragge 	qtstart(&sc->is_ec.ec_if);
    506   1.1     ragge 	}
    507   1.6    simonb 
    508   1.1     ragge /*
    509   1.1     ragge  * Transmit interrupt service.  Only called if there are outstanding transmit
    510   1.1     ragge  * requests which could have completed.  The DELQA-YM doesn't provide the
    511   1.1     ragge  * status bits telling the kind (receive, transmit) of interrupt.
    512   1.1     ragge */
    513   1.6    simonb 
    514   1.1     ragge #define BBLMIS (TMD2_BBL|TMD2_MIS)
    515   1.1     ragge 
    516   1.2     ragge void
    517   1.2     ragge qttint(struct qt_softc *sc)
    518   1.1     ragge 	{
    519  1.14      matt 	struct qt_tring *rp;
    520   1.6    simonb 
    521   1.2     ragge 	while (sc->nxmit > 0)
    522   1.1     ragge 		{
    523   1.2     ragge 		rp = &sc->sc_ib->qc_t[sc->xlast];
    524   1.2     ragge 		if ((rp->tmd3 & TMD3_OWN) == 0)
    525   1.1     ragge 			break;
    526   1.1     ragge 		sc->is_if.if_opackets++;
    527   1.1     ragge /*
    528   1.1     ragge  * Collisions don't count as output errors, but babbling and missing packets
    529   1.1     ragge  * do count as output errors.
    530   1.1     ragge */
    531   1.1     ragge 		if	(rp->tmd2 & TMD2_CER)
    532   1.1     ragge 			sc->is_if.if_collisions++;
    533   1.6    simonb 		if	((rp->tmd0 & TMD0_ERR1) ||
    534   1.1     ragge 			 ((rp->tmd2 & TMD2_ERR2) && (rp->tmd2 & BBLMIS)))
    535   1.1     ragge 			{
    536   1.1     ragge #ifdef QTDEBUG
    537   1.2     ragge 			char buf[100];
    538   1.2     ragge 			bitmask_snprintf(rp->tmd2, TMD2_BITS, buf, 100);
    539  1.14      matt 			printf("%s: tmd2 %s\n", device_xname(sc->sc_dev), buf);
    540   1.1     ragge #endif
    541   1.1     ragge 			sc->is_if.if_oerrors++;
    542   1.1     ragge 			}
    543   1.2     ragge 		if_ubaend(&sc->sc_ifuba, &sc->sc_ifw[sc->xlast]);
    544   1.2     ragge 		if	(++sc->xlast >= NXMT)
    545   1.2     ragge 			sc->xlast = 0;
    546   1.2     ragge 		sc->nxmit--;
    547   1.1     ragge 		}
    548   1.1     ragge 	}
    549   1.6    simonb 
    550   1.1     ragge /*
    551   1.1     ragge  * Receive interrupt service.  Pull packet off the interface and put into
    552   1.1     ragge  * a mbuf chain for processing later.
    553   1.1     ragge */
    554   1.1     ragge 
    555   1.2     ragge void
    556   1.2     ragge qtrint(struct qt_softc *sc)
    557  1.14      matt {
    558  1.14      matt 	struct qt_rring *rp;
    559   1.2     ragge 	struct ifnet *ifp = &sc->is_ec.ec_if;
    560   1.2     ragge 	struct mbuf *m;
    561   1.1     ragge 	int	len;
    562   1.6    simonb 
    563   1.2     ragge 	while	(sc->sc_ib->qc_r[(int)sc->rindex].rmd3 & RMD3_OWN)
    564   1.1     ragge 		{
    565   1.2     ragge 		rp = &sc->sc_ib->qc_r[(int)sc->rindex];
    566   1.1     ragge 		if     ((rp->rmd0 & (RMD0_STP|RMD0_ENP)) != (RMD0_STP|RMD0_ENP))
    567   1.1     ragge 			{
    568  1.14      matt 			printf("%s: chained packet\n", device_xname(sc->sc_dev));
    569   1.1     ragge 			sc->is_if.if_ierrors++;
    570   1.1     ragge 			goto rnext;
    571   1.1     ragge 			}
    572   1.1     ragge 		len = (rp->rmd1 & RMD1_MCNT) - 4;	/* -4 for CRC */
    573   1.1     ragge 		sc->is_if.if_ipackets++;
    574   1.6    simonb 
    575   1.1     ragge 		if	((rp->rmd0 & RMD0_ERR3) || (rp->rmd2 & RMD2_ERR4))
    576   1.1     ragge 			{
    577   1.1     ragge #ifdef QTDEBUG
    578   1.2     ragge 			char buf[100];
    579   1.2     ragge 			bitmask_snprintf(rp->rmd0, RMD0_BITS, buf, 100);
    580  1.14      matt 			printf("%s: rmd0 %s\n", device_xname(sc->sc_dev), buf);
    581   1.2     ragge 			bitmask_snprintf(rp->rmd2, RMD2_BITS, buf, 100);
    582  1.14      matt 			printf("%s: rmd2 %s\n", device_xname(sc->sc_dev), buf);
    583   1.1     ragge #endif
    584   1.2     ragge 			sc->is_if.if_ierrors++;
    585   1.2     ragge 			goto rnext;
    586   1.1     ragge 			}
    587   1.2     ragge 		m = if_ubaget(&sc->sc_ifuba, &sc->sc_ifr[(int)sc->rindex],
    588   1.2     ragge 		    ifp, len);
    589   1.2     ragge 		if (m == 0) {
    590   1.2     ragge 			sc->is_if.if_ierrors++;
    591   1.2     ragge 			goto rnext;
    592   1.2     ragge 		}
    593   1.3     ragge #if NBPFILTER > 0
    594   1.3     ragge 		if (ifp->if_bpf)
    595   1.3     ragge 			bpf_mtap(ifp->if_bpf, m);
    596   1.3     ragge #endif
    597   1.2     ragge 		(*ifp->if_input)(ifp, m);
    598   1.1     ragge rnext:
    599   1.1     ragge 		--sc->nrcv;
    600   1.2     ragge 		rp->rmd3 = 0;
    601   1.2     ragge 		rp->rmd1 = MCLBYTES;
    602   1.2     ragge 		if	(++sc->rindex >= NRCV)
    603   1.1     ragge 			sc->rindex = 0;
    604   1.1     ragge 		}
    605   1.3     ragge 	QT_WCSR(CSR_ARQR, ARQR_RRQ);	/* tell device it has buffer */
    606   1.1     ragge 	}
    607   1.1     ragge 
    608   1.2     ragge int
    609  1.14      matt qtioctl(struct ifnet *ifp, u_long cmd, void *data)
    610  1.14      matt {
    611   1.5   thorpej 	int s, error;
    612   1.5   thorpej 
    613   1.5   thorpej 	s = splnet();
    614   1.2     ragge 
    615   1.2     ragge 	error = ether_ioctl(ifp, cmd, data);
    616   1.5   thorpej 	if (error == ENETRESET) {
    617   1.5   thorpej 		if (ifp->if_flags & IFF_RUNNING)
    618   1.5   thorpej 			error = qtinit(ifp);
    619   1.5   thorpej 		else
    620   1.5   thorpej 			error = 0;
    621   1.4     ragge 	}
    622   1.1     ragge 	splx(s);
    623   1.2     ragge 	return (error);
    624   1.2     ragge }
    625   1.1     ragge 
    626   1.2     ragge void
    627  1.14      matt qtsrr(struct qt_softc *sc, int srrbits)
    628  1.14      matt {
    629   1.2     ragge 	char buf[100];
    630   1.2     ragge 	bitmask_snprintf(srrbits, SRR_BITS, buf, sizeof buf);
    631  1.14      matt 	printf("%s: srr=%s\n", device_xname(sc->sc_dev), buf);
    632  1.14      matt }
    633   1.4     ragge 
    634   1.4     ragge /*
    635   1.4     ragge  * Stop activity on the interface.
    636   1.4     ragge  * Lose outstanding transmit requests. XXX - not good for multicast.
    637   1.4     ragge  */
    638   1.4     ragge void
    639   1.4     ragge qtstop(struct ifnet *ifp, int disable)
    640   1.4     ragge {
    641   1.4     ragge 	struct qt_softc *sc = ifp->if_softc;
    642   1.4     ragge 	int i;
    643   1.4     ragge 
    644   1.4     ragge 	QT_WCSR(CSR_SRQR, 3);
    645   1.4     ragge 	for (i = 0; i < 100; i++)
    646   1.4     ragge 		if ((QT_RCSR(CSR_SRR) & SRR_RESP) == 3)
    647   1.4     ragge 			break;
    648   1.4     ragge 	if (QT_RCSR(CSR_SRR) & SRR_FES)
    649   1.4     ragge 		qtsrr(sc, QT_RCSR(CSR_SRR));
    650   1.4     ragge 	/* Forget already queued transmit requests */
    651   1.4     ragge 	while (sc->nxmit > 0) {
    652   1.4     ragge 		if_ubaend(&sc->sc_ifuba, &sc->sc_ifw[sc->xlast]);
    653   1.4     ragge 		if (++sc->xlast >= NXMT)
    654   1.4     ragge 			sc->xlast = 0;
    655   1.4     ragge 		sc->nxmit--;
    656   1.4     ragge 	}
    657   1.4     ragge 	/* Handle late received packets */
    658   1.4     ragge 	qtrint(sc);
    659   1.4     ragge 	ifp->if_flags &= ~IFF_RUNNING;
    660   1.4     ragge }
    661   1.1     ragge 
    662   1.2     ragge #ifdef notyet
    663   1.1     ragge /*
    664   1.1     ragge  * Reset the device.  This moves it from DELQA-T mode to DELQA-Normal mode.
    665   1.1     ragge  * After the reset put the device back in -T mode.  Then call qtinit() to
    666   1.1     ragge  * reinitialize the ring structures and issue the 'timeout' for the "device
    667   1.1     ragge  * started interrupt".
    668   1.1     ragge */
    669   1.1     ragge 
    670   1.2     ragge void
    671   1.2     ragge qtreset(sc)
    672  1.14      matt 	struct qt_softc *sc;
    673   1.1     ragge 	{
    674   1.6    simonb 
    675   1.1     ragge 	qtturbo(sc);
    676   1.2     ragge 	qtinit(&sc->is_ec.ec_if);
    677   1.1     ragge 	}
    678   1.1     ragge #endif
    679