Home | History | Annotate | Line # | Download | only in qbus
if_qt.c revision 1.23.2.2
      1  1.23.2.1    martin /*	$NetBSD: if_qt.c,v 1.23.2.2 2020/04/13 08:04:47 martin 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.23.2.1    martin __KERNEL_RCSID(0, "$NetBSD: if_qt.c,v 1.23.2.2 2020/04/13 08:04:47 martin Exp $");
     84       1.2     ragge 
     85       1.2     ragge #include "opt_inet.h"
     86       1.1     ragge 
     87       1.2     ragge #include <sys/param.h>
     88       1.2     ragge #include <sys/systm.h>
     89       1.2     ragge #include <sys/mbuf.h>
     90       1.2     ragge #include <sys/protosw.h>
     91       1.2     ragge #include <sys/socket.h>
     92       1.2     ragge #include <sys/ioctl.h>
     93      1.13     joerg #include <sys/device.h>
     94       1.2     ragge #include <sys/errno.h>
     95       1.2     ragge #include <sys/syslog.h>
     96       1.2     ragge #include <sys/time.h>
     97       1.2     ragge #include <sys/kernel.h>
     98       1.2     ragge 
     99       1.2     ragge #include <net/if.h>
    100       1.2     ragge #include <net/if_ether.h>
    101       1.2     ragge #include <net/netisr.h>
    102       1.2     ragge #include <net/route.h>
    103      1.22   msaitoh #include <net/bpf.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.12        ad #include <sys/bus.h>
    114       1.2     ragge 
    115       1.2     ragge #include <dev/qbus/ubavar.h>
    116       1.2     ragge #include <dev/qbus/if_uba.h>
    117       1.2     ragge #include <dev/qbus/if_qtreg.h>
    118       1.2     ragge 
    119       1.2     ragge #define NRCV	QT_MAX_RCV	/* Receive descriptors (must be == 32) */
    120       1.2     ragge #define NXMT	QT_MAX_XMT	/* Transmit descriptors	(must be == 12) */
    121       1.2     ragge #if	NRCV != 32 || NXMT != 12
    122       1.2     ragge 	hardware requires these sizes.
    123       1.1     ragge #endif
    124       1.6    simonb 
    125       1.4     ragge /*
    126       1.4     ragge  * Control data structures, must be in DMA-friendly memory.
    127       1.4     ragge  */
    128       1.2     ragge struct	qt_cdata {
    129       1.2     ragge 	struct	qt_init qc_init;	/* Init block			*/
    130       1.2     ragge 	struct	qt_rring qc_r[NRCV];	/* Receive descriptor ring	*/
    131       1.2     ragge 	struct	qt_tring qc_t[NXMT];	/* Transmit descriptor ring	*/
    132       1.2     ragge };
    133       1.1     ragge 
    134       1.1     ragge struct	qt_softc {
    135      1.14      matt 	device_t sc_dev;		/* Configuration common part */
    136       1.2     ragge 	struct	ethercom is_ec;		/* common part - must be first  */
    137      1.14      matt 	struct uba_softc *sc_uh;
    138       1.2     ragge 	struct	evcnt sc_intrcnt;	/* Interrupt counting */
    139       1.6    simonb #define	is_if	is_ec.ec_if		/* network-visible interface	*/
    140       1.2     ragge 	u_int8_t is_addr[ETHER_ADDR_LEN]; /* hardware Ethernet address	*/
    141       1.2     ragge 	bus_space_tag_t	sc_iot;
    142       1.2     ragge 	bus_addr_t	sc_ioh;
    143       1.2     ragge 
    144       1.4     ragge 	struct	ubinfo	sc_ui;		/* control block address desc	*/
    145       1.4     ragge 	struct	qt_cdata *sc_ib;	/* virt address of ctrl block	*/
    146       1.4     ragge 	struct	qt_cdata *sc_pib;	/* phys address of ctrl block	*/
    147       1.2     ragge 
    148       1.2     ragge 	struct	ifubinfo sc_ifuba;	/* UNIBUS resources */
    149       1.2     ragge 	struct	ifrw sc_ifr[NRCV];	/* UNIBUS receive buffer maps */
    150       1.2     ragge 	struct	ifxmt sc_ifw[NXMT];	/* UNIBUS receive buffer maps */
    151       1.2     ragge 
    152       1.4     ragge 	int	rindex;			/* Receive Completed Index	*/
    153       1.4     ragge 	int	nxtrcv;			/* Next Receive Index		*/
    154       1.4     ragge 	int	nrcv;			/* Number of Receives active	*/
    155       1.1     ragge 
    156       1.2     ragge 	int	xnext;			/* Next descriptor to transmit	*/
    157       1.2     ragge 	int	xlast;			/* Last descriptor transmitted	*/
    158       1.2     ragge 	int	nxmit;			/* # packets in send queue	*/
    159       1.4     ragge 
    160       1.2     ragge 	short	vector;			/* Interrupt vector assigned	*/
    161       1.2     ragge };
    162       1.2     ragge 
    163      1.14      matt static	int qtmatch(device_t, cfdata_t, void *);
    164      1.14      matt static	void qtattach(device_t, device_t, void *);
    165       1.2     ragge static	void qtintr(void *);
    166       1.2     ragge static	int qtinit(struct ifnet *);
    167      1.11  christos static	int qtioctl(struct ifnet *, u_long, void *);
    168       1.2     ragge static	int qtturbo(struct qt_softc *);
    169       1.2     ragge static	void qtstart(struct ifnet *ifp);
    170       1.4     ragge static	void qtstop(struct ifnet *ifp, int disable);
    171       1.2     ragge static	void qtsrr(struct qt_softc *, int);
    172       1.2     ragge static	void qtrint(struct qt_softc *sc);
    173       1.2     ragge static	void qttint(struct qt_softc *sc);
    174       1.2     ragge 
    175       1.2     ragge /* static	void qtrestart(struct qt_softc *sc); */
    176       1.6    simonb 
    177      1.14      matt CFATTACH_DECL_NEW(qt, sizeof(struct qt_softc),
    178       1.2     ragge     qtmatch, qtattach, NULL, NULL);
    179       1.1     ragge 
    180       1.1     ragge /*
    181       1.6    simonb  * Maximum packet size needs to include 4 bytes for the CRC
    182       1.1     ragge  * on received packets.
    183       1.1     ragge */
    184       1.1     ragge #define MAXPACKETSIZE (ETHERMTU + sizeof (struct ether_header) + 4)
    185       1.1     ragge #define	MINPACKETSIZE 64
    186       1.1     ragge 
    187       1.3     ragge #define QT_WCSR(csr, val) \
    188       1.3     ragge 	bus_space_write_2(sc->sc_iot, sc->sc_ioh, csr, val)
    189       1.3     ragge #define QT_RCSR(csr) \
    190       1.3     ragge 	bus_space_read_2(sc->sc_iot, sc->sc_ioh, csr)
    191       1.3     ragge 
    192       1.3     ragge 
    193       1.2     ragge #define loint(x)	((int)(x) & 0xffff)
    194       1.2     ragge #define hiint(x)	(((int)(x) >> 16) & 0x3f)
    195       1.2     ragge 
    196       1.1     ragge /*
    197       1.2     ragge  * Check if this card is a turbo delqa.
    198       1.2     ragge  */
    199       1.2     ragge int
    200      1.14      matt qtmatch(device_t parent, cfdata_t cf, void *aux)
    201       1.2     ragge {
    202      1.14      matt 	struct qt_softc ssc;
    203      1.14      matt 	struct qt_softc *sc = &ssc;
    204      1.14      matt 	struct uba_attach_args *ua = aux;
    205      1.14      matt 	struct uba_softc *uh = device_private(parent);
    206      1.14      matt 	struct qt_init *qi;
    207       1.4     ragge 	struct ubinfo ui;
    208       1.2     ragge 
    209       1.3     ragge 	sc->sc_iot = ua->ua_iot;
    210       1.3     ragge 	sc->sc_ioh = ua->ua_ioh;
    211       1.2     ragge 	if (qtturbo(sc) == 0)
    212       1.4     ragge 		return 0; /* Not a turbo card */
    213       1.4     ragge 
    214       1.4     ragge 	/* Force the card to interrupt */
    215       1.4     ragge 	ui.ui_size = sizeof(struct qt_init);
    216      1.14      matt 	if (ubmemalloc(uh, &ui, 0))
    217       1.4     ragge 		return 0; /* Failed */
    218       1.4     ragge 	qi = (struct qt_init *)ui.ui_vaddr;
    219       1.4     ragge 	memset(qi, 0, sizeof(struct qt_init));
    220      1.14      matt 	qi->vector = uh->uh_lastiv - 4;
    221       1.4     ragge 	qi->options = INIT_OPTIONS_INT;
    222       1.6    simonb 
    223       1.4     ragge 	QT_WCSR(CSR_IBAL, loint(ui.ui_baddr));
    224       1.4     ragge 	QT_WCSR(CSR_IBAH, hiint(ui.ui_baddr));
    225       1.4     ragge 	QT_WCSR(CSR_SRQR, 2);
    226       1.4     ragge 	delay(100000); /* Wait some time for interrupt */
    227       1.4     ragge 	QT_WCSR(CSR_SRQR, 3); /* Stop card */
    228       1.4     ragge 
    229      1.14      matt 	ubmemfree(uh, &ui);
    230       1.2     ragge 
    231       1.2     ragge 	return 10;
    232       1.2     ragge }
    233       1.1     ragge 
    234       1.1     ragge 
    235       1.1     ragge /*
    236       1.1     ragge  * Interface exists.  More accurately, something exists at the CSR (see
    237       1.1     ragge  * sys/sys_net.c) -- there's no guarantee it's a DELQA-YM.
    238       1.1     ragge  *
    239       1.1     ragge  * The ring descriptors are initialized, the buffers allocated using first the
    240       1.1     ragge  * DMA region allocated at network load time and then later main memory.  The
    241       1.1     ragge  * INIT block is filled in and the device is poked/probed to see if it really
    242       1.1     ragge  * is a DELQA-YM.  If the device is not a -YM then a message is printed and
    243       1.1     ragge  * the 'if_attach' call is skipped.  For a -YM the START command is issued,
    244       1.1     ragge  * but the device is not marked as running|up - that happens at interrupt level
    245       1.1     ragge  * when the device interrupts to say it has started.
    246       1.1     ragge */
    247       1.1     ragge 
    248       1.2     ragge void
    249      1.14      matt qtattach(device_t parent, device_t self, void *aux)
    250      1.14      matt {
    251      1.14      matt 	struct qt_softc *sc = device_private(self);
    252      1.14      matt 	struct ifnet *ifp = &sc->is_if;
    253       1.2     ragge 	struct uba_attach_args *ua = aux;
    254       1.2     ragge 
    255      1.16      matt 	sc->sc_dev = self;
    256      1.16      matt 
    257       1.6    simonb 	uba_intr_establish(ua->ua_icookie, ua->ua_cvec, qtintr, sc,
    258       1.2     ragge 	    &sc->sc_intrcnt);
    259       1.2     ragge 	evcnt_attach_dynamic(&sc->sc_intrcnt, EVCNT_TYPE_INTR, ua->ua_evcnt,
    260      1.14      matt 	    device_xname(sc->sc_dev), "intr");
    261       1.2     ragge 
    262      1.14      matt 	sc->sc_uh = device_private(parent);
    263       1.3     ragge 	sc->sc_iot = ua->ua_iot;
    264       1.3     ragge 	sc->sc_ioh = ua->ua_ioh;
    265      1.14      matt 	sc->sc_uh->uh_lastiv -= 4;
    266      1.14      matt 	sc->vector = sc->sc_uh->uh_lastiv;
    267       1.1     ragge 
    268       1.1     ragge /*
    269       1.1     ragge  * Now allocate the buffers and initialize the buffers.  This should _never_
    270       1.1     ragge  * fail because main memory is allocated after the DMA pool is used up.
    271       1.1     ragge */
    272       1.1     ragge 
    273       1.3     ragge 	sc->is_addr[0] = QT_RCSR(0);
    274       1.3     ragge 	sc->is_addr[1] = QT_RCSR(2);
    275       1.3     ragge 	sc->is_addr[2] = QT_RCSR(4);
    276       1.3     ragge 	sc->is_addr[3] = QT_RCSR(6);
    277       1.3     ragge 	sc->is_addr[4] = QT_RCSR(8);
    278       1.3     ragge 	sc->is_addr[5] = QT_RCSR(10);
    279       1.2     ragge 
    280      1.14      matt 	strcpy(ifp->if_xname, device_xname(sc->sc_dev));
    281       1.2     ragge 	ifp->if_softc = sc;
    282       1.4     ragge 	ifp->if_flags = IFF_BROADCAST|IFF_MULTICAST;
    283       1.2     ragge 	ifp->if_ioctl = qtioctl;
    284       1.2     ragge 	ifp->if_start = qtstart;
    285       1.2     ragge 	ifp->if_init = qtinit;
    286       1.4     ragge 	ifp->if_stop = qtstop;
    287       1.2     ragge 	IFQ_SET_READY(&ifp->if_snd);
    288       1.6    simonb 
    289       1.2     ragge 	printf("\n%s: delqa-plus in Turbo mode, hardware address %s\n",
    290      1.14      matt 	    device_xname(sc->sc_dev), ether_sprintf(sc->is_addr));
    291       1.2     ragge 	if_attach(ifp);
    292       1.2     ragge 	ether_ifattach(ifp, sc->is_addr);
    293      1.14      matt }
    294       1.6    simonb 
    295       1.2     ragge int
    296      1.14      matt qtturbo(struct qt_softc *sc)
    297      1.14      matt {
    298      1.14      matt 	int i;
    299       1.1     ragge 
    300       1.1     ragge /*
    301       1.1     ragge  * Issue the software reset.  Delay 150us.  The board should now be in
    302       1.1     ragge  * DELQA-Normal mode.  Set ITB and DEQTA select.  If both bits do not
    303       1.1     ragge  * stay turned on then the board is not a DELQA-YM.
    304       1.1     ragge */
    305       1.3     ragge 	QT_WCSR(CSR_ARQR, ARQR_SR);
    306       1.3     ragge 	QT_WCSR(CSR_ARQR, 0);
    307       1.1     ragge 	delay(150L);
    308       1.1     ragge 
    309       1.3     ragge 	QT_WCSR(CSR_SRR, 0x8001);	/* MS | ITB */
    310       1.3     ragge 	i = QT_RCSR(CSR_SRR);
    311       1.3     ragge 	QT_WCSR(CSR_SRR, 0x8000);	/* Turn off ITB, set DELQA select */
    312      1.14      matt 	if (i != 0x8001)
    313       1.1     ragge 		return(0);
    314       1.1     ragge /*
    315       1.1     ragge  * Board is a DELQA-YM.  Send the commands to enable Turbo mode.  Delay
    316       1.1     ragge  * 1 second, testing the SRR register every millisecond to see if the
    317       1.1     ragge  * board has shifted to Turbo mode.
    318       1.1     ragge */
    319       1.3     ragge 	QT_WCSR(CSR_XCR0, 0x0baf);
    320       1.3     ragge 	QT_WCSR(CSR_XCR1, 0xff00);
    321       1.1     ragge 	for	(i = 0; i < 1000; i++)
    322       1.1     ragge 		{
    323       1.3     ragge 		if	((QT_RCSR(CSR_SRR) & SRR_RESP) == 1)
    324       1.1     ragge 			break;
    325       1.1     ragge 		delay(1000L);
    326       1.1     ragge 		}
    327       1.1     ragge 	if	(i >= 1000)
    328       1.1     ragge 		{
    329       1.3     ragge 		printf("qt !Turbo\n");
    330       1.1     ragge 		return(0);
    331       1.1     ragge 		}
    332       1.1     ragge 	return(1);
    333      1.14      matt }
    334       1.1     ragge 
    335       1.2     ragge int
    336       1.2     ragge qtinit(struct ifnet *ifp)
    337      1.14      matt {
    338      1.14      matt 	struct qt_softc *sc = ifp->if_softc;
    339      1.14      matt 	struct qt_init *iniblk;
    340       1.2     ragge 	struct ifrw *ifrw;
    341       1.2     ragge 	struct ifxmt *ifxp;
    342       1.1     ragge 	struct	qt_rring *rp;
    343       1.1     ragge 	struct	qt_tring *tp;
    344      1.14      matt 	int i, error;
    345       1.6    simonb 
    346       1.5   thorpej 	if (ifp->if_flags & IFF_RUNNING) {
    347       1.5   thorpej 		/* Cancel any pending I/O. */
    348       1.5   thorpej 		qtstop(ifp, 0);
    349       1.5   thorpej 	}
    350       1.2     ragge 
    351       1.2     ragge 	if (sc->sc_ib == NULL) {
    352      1.14      matt 		if (if_ubaminit(&sc->sc_ifuba, sc->sc_uh,
    353       1.2     ragge 		    MCLBYTES, sc->sc_ifr, NRCV, sc->sc_ifw, NXMT)) {
    354      1.14      matt 			printf("%s: can't initialize\n", device_xname(sc->sc_dev));
    355       1.2     ragge 			ifp->if_flags &= ~IFF_UP;
    356       1.2     ragge 			return 0;
    357       1.2     ragge 		}
    358       1.2     ragge 		sc->sc_ui.ui_size = sizeof(struct qt_cdata);
    359      1.14      matt 		if ((error = ubmemalloc(sc->sc_uh, &sc->sc_ui, 0))) {
    360       1.2     ragge 			printf(": failed ubmemalloc(), error = %d\n", error);
    361       1.2     ragge 			return error;
    362       1.2     ragge 		}
    363       1.2     ragge 		sc->sc_ib = (struct qt_cdata *)sc->sc_ui.ui_vaddr;
    364       1.2     ragge 		sc->sc_pib = (struct qt_cdata *)sc->sc_ui.ui_baddr;
    365       1.2     ragge 
    366       1.2     ragge /*
    367       1.2     ragge  * Fill in most of the INIT block: vector, options (interrupt enable), ring
    368       1.2     ragge  * locations.  The physical address is copied from the ROMs as part of the
    369      1.20      maya  * -YM testing procedure.  The CSR is saved here rather than in qtinit()
    370       1.2     ragge  * because the qtturbo() routine needs it.
    371       1.2     ragge  *
    372       1.2     ragge  * The INIT block must be quadword aligned.  Using malloc() guarantees click
    373       1.2     ragge  * (64 byte) alignment.  Since the only time the INIT block is referenced is
    374       1.2     ragge  * at 'startup' or 'reset' time there is really no time penalty (and a modest
    375       1.2     ragge  * D space savings) involved.
    376       1.2     ragge */
    377       1.2     ragge 		memset(sc->sc_ib, 0, sizeof(struct qt_cdata));
    378       1.2     ragge 		iniblk = &sc->sc_ib->qc_init;
    379       1.2     ragge 
    380       1.2     ragge 		iniblk->vector = sc->vector;
    381       1.2     ragge 		memcpy(iniblk->paddr, sc->is_addr, 6);
    382       1.2     ragge 
    383       1.2     ragge 		iniblk->options = INIT_OPTIONS_INT;
    384       1.2     ragge 		iniblk->rx_lo = loint(&sc->sc_pib->qc_r);
    385       1.2     ragge 		iniblk->rx_hi = hiint(&sc->sc_pib->qc_r);
    386       1.2     ragge 		iniblk->tx_lo = loint(&sc->sc_pib->qc_t);
    387       1.2     ragge 		iniblk->tx_hi = hiint(&sc->sc_pib->qc_t);
    388       1.2     ragge 	}
    389       1.4     ragge 	iniblk = &sc->sc_ib->qc_init;
    390       1.4     ragge 	iniblk->mode = ifp->if_flags & IFF_PROMISC ? INIT_MODE_PRO : 0;
    391       1.2     ragge 
    392       1.2     ragge 
    393       1.1     ragge /*
    394       1.1     ragge  * Now initialize the receive ring descriptors.  Because this routine can be
    395       1.1     ragge  * called with outstanding I/O operations we check the ring descriptors for
    396       1.1     ragge  * a non-zero 'rhost0' (or 'thost0') word and place those buffers back on
    397       1.1     ragge  * the free list.
    398       1.1     ragge */
    399       1.2     ragge 	for (i = 0; i < NRCV; i++) {
    400       1.2     ragge 		rp = &sc->sc_ib->qc_r[i];
    401       1.2     ragge 		ifrw = &sc->sc_ifr[i];
    402       1.2     ragge 		rp->rmd1 = MCLBYTES;
    403       1.2     ragge 		rp->rmd4 = loint(ifrw->ifrw_info);
    404       1.2     ragge 		rp->rmd5 = hiint(ifrw->ifrw_info);
    405       1.2     ragge 		rp->rmd3 = 0;			/* clear RMD3_OWN */
    406       1.1     ragge 		}
    407       1.2     ragge 	for (i = 0; i < NXMT; i++) {
    408       1.2     ragge 		tp = &sc->sc_ib->qc_t[i];
    409       1.2     ragge 		ifxp = &sc->sc_ifw[i];
    410       1.2     ragge 		tp->tmd4 = loint(ifxp->ifw_info);
    411       1.2     ragge 		tp->tmd5 = hiint(ifxp->ifw_info);
    412       1.2     ragge 		tp->tmd3 = TMD3_OWN;
    413       1.1     ragge 		}
    414       1.2     ragge 
    415       1.2     ragge 	sc->xnext = sc->xlast = sc->nxmit = 0;
    416       1.1     ragge 	sc->rindex = 0;
    417       1.1     ragge 	sc->nxtrcv = 0;
    418       1.1     ragge 	sc->nrcv = 0;
    419       1.6    simonb 
    420       1.1     ragge /*
    421       1.1     ragge  * Now we tell the device the address of the INIT block.  The device
    422       1.1     ragge  * _must_ be in the Turbo mode at this time.  The "START" command is
    423       1.1     ragge  * then issued to the device.  A 1 second timeout is then started.
    424       1.1     ragge  * When the interrupt occurs the IFF_UP|IFF_RUNNING state is entered and
    425       1.6    simonb  * full operations will proceed.  If the timeout expires without an interrupt
    426       1.1     ragge  * being received an error is printed, the flags cleared and the device left
    427       1.1     ragge  * marked down.
    428       1.1     ragge */
    429       1.3     ragge 	QT_WCSR(CSR_IBAL, loint(&sc->sc_pib->qc_init));
    430       1.3     ragge 	QT_WCSR(CSR_IBAH, hiint(&sc->sc_pib->qc_init));
    431       1.3     ragge 	QT_WCSR(CSR_SRQR, 2);
    432       1.2     ragge 
    433       1.2     ragge 	sc->is_if.if_flags |= IFF_RUNNING;
    434       1.2     ragge 	return 0;
    435       1.1     ragge 	}
    436       1.1     ragge 
    437       1.1     ragge /*
    438       1.1     ragge  * Start output on interface.
    439       1.1     ragge  */
    440       1.1     ragge 
    441       1.2     ragge void
    442       1.2     ragge qtstart(struct ifnet *ifp)
    443       1.1     ragge 	{
    444       1.6    simonb 	int	len, nxmit;
    445      1.14      matt 	struct qt_softc *sc = ifp->if_softc;
    446      1.14      matt 	struct qt_tring *rp;
    447       1.2     ragge 	struct	mbuf *m = NULL;
    448       1.6    simonb 
    449       1.2     ragge 	for (nxmit = sc->nxmit; nxmit < NXMT; nxmit++) {
    450       1.1     ragge 		IF_DEQUEUE(&sc->is_if.if_snd, m);
    451       1.1     ragge 		if	(m == 0)
    452       1.1     ragge 			break;
    453       1.2     ragge 
    454       1.2     ragge 		rp = &sc->sc_ib->qc_t[sc->xnext];
    455       1.2     ragge 		if ((rp->tmd3 & TMD3_OWN) == 0)
    456       1.2     ragge 			panic("qtstart");
    457       1.2     ragge 
    458      1.23   msaitoh 		bpf_mtap(ifp, m, BPF_D_OUT);
    459       1.3     ragge 
    460       1.2     ragge 		len = if_ubaput(&sc->sc_ifuba, &sc->sc_ifw[sc->xnext], m);
    461       1.2     ragge 		if (len < MINPACKETSIZE)
    462       1.1     ragge 			len = MINPACKETSIZE;
    463       1.1     ragge 		rp->tmd3 = len & TMD3_BCT;	/* set length,clear ownership */
    464       1.3     ragge 		QT_WCSR(CSR_ARQR, ARQR_TRQ);	/* tell device it has buffer */
    465       1.3     ragge 
    466       1.2     ragge 		if	(++sc->xnext >= NXMT)
    467       1.2     ragge 			sc->xnext = 0;
    468       1.1     ragge 	}
    469       1.2     ragge 	if (sc->nxmit != nxmit)
    470       1.2     ragge 		sc->nxmit = nxmit;
    471       1.2     ragge 	/* XXX - set OACTIVE */
    472       1.2     ragge }
    473       1.6    simonb 
    474       1.1     ragge /*
    475       1.6    simonb  * General interrupt service routine.  Receive, transmit, device start
    476       1.1     ragge  * interrupts and timeouts come here.  Check for hard device errors and print a
    477       1.6    simonb  * message if any errors are found.  If we are waiting for the device to
    478       1.1     ragge  * START then check if the device is now running.
    479       1.1     ragge */
    480       1.1     ragge 
    481       1.2     ragge void
    482       1.2     ragge qtintr(void *arg)
    483       1.1     ragge 	{
    484       1.2     ragge 	struct qt_softc *sc = arg;
    485       1.4     ragge 	struct ifnet *ifp = &sc->is_if;
    486       1.2     ragge 	short status;
    487       1.2     ragge 
    488       1.6    simonb 
    489       1.3     ragge 	status = QT_RCSR(CSR_SRR);
    490       1.1     ragge 	if	(status < 0)
    491       1.1     ragge 		/* should we reset the device after a bunch of these errs? */
    492       1.2     ragge 		qtsrr(sc, status);
    493       1.4     ragge 	if ((ifp->if_flags & IFF_UP) == 0)
    494       1.4     ragge 		return; /* Unwanted interrupt */
    495       1.2     ragge 	qtrint(sc);
    496       1.2     ragge 	qttint(sc);
    497       1.2     ragge 	qtstart(&sc->is_ec.ec_if);
    498       1.1     ragge 	}
    499       1.6    simonb 
    500       1.1     ragge /*
    501       1.1     ragge  * Transmit interrupt service.  Only called if there are outstanding transmit
    502       1.1     ragge  * requests which could have completed.  The DELQA-YM doesn't provide the
    503       1.1     ragge  * status bits telling the kind (receive, transmit) of interrupt.
    504       1.1     ragge */
    505       1.6    simonb 
    506       1.1     ragge #define BBLMIS (TMD2_BBL|TMD2_MIS)
    507       1.1     ragge 
    508       1.2     ragge void
    509       1.2     ragge qttint(struct qt_softc *sc)
    510  1.23.2.1    martin {
    511      1.14      matt 	struct qt_tring *rp;
    512       1.6    simonb 
    513  1.23.2.1    martin 	while (sc->nxmit > 0) {
    514       1.2     ragge 		rp = &sc->sc_ib->qc_t[sc->xlast];
    515       1.2     ragge 		if ((rp->tmd3 & TMD3_OWN) == 0)
    516       1.1     ragge 			break;
    517  1.23.2.1    martin 		if_statinc(&sc->is_if, if_opackets);
    518       1.1     ragge /*
    519       1.1     ragge  * Collisions don't count as output errors, but babbling and missing packets
    520       1.1     ragge  * do count as output errors.
    521       1.1     ragge */
    522  1.23.2.1    martin 		if (rp->tmd2 & TMD2_CER)
    523  1.23.2.1    martin 			if_statinc(&sc->is_if, if_collisions);
    524  1.23.2.1    martin 		if ((rp->tmd0 & TMD0_ERR1) ||
    525  1.23.2.1    martin 		    ((rp->tmd2 & TMD2_ERR2) && (rp->tmd2 & BBLMIS))) {
    526       1.1     ragge #ifdef QTDEBUG
    527       1.2     ragge 			char buf[100];
    528      1.15  christos 			snprintb(buf, sizeof(buf), TMD2_BITS, rp->tmd2);
    529      1.14      matt 			printf("%s: tmd2 %s\n", device_xname(sc->sc_dev), buf);
    530       1.1     ragge #endif
    531  1.23.2.1    martin 			if_statinc(&sc->is_if, if_oerrors);
    532  1.23.2.1    martin 		}
    533       1.2     ragge 		if_ubaend(&sc->sc_ifuba, &sc->sc_ifw[sc->xlast]);
    534  1.23.2.1    martin 		if (++sc->xlast >= NXMT)
    535       1.2     ragge 			sc->xlast = 0;
    536       1.2     ragge 		sc->nxmit--;
    537       1.1     ragge 	}
    538  1.23.2.1    martin }
    539       1.6    simonb 
    540       1.1     ragge /*
    541       1.1     ragge  * Receive interrupt service.  Pull packet off the interface and put into
    542       1.1     ragge  * a mbuf chain for processing later.
    543       1.1     ragge */
    544       1.1     ragge 
    545       1.2     ragge void
    546       1.2     ragge qtrint(struct qt_softc *sc)
    547      1.14      matt {
    548      1.14      matt 	struct qt_rring *rp;
    549       1.2     ragge 	struct ifnet *ifp = &sc->is_ec.ec_if;
    550       1.2     ragge 	struct mbuf *m;
    551       1.1     ragge 	int	len;
    552       1.6    simonb 
    553       1.2     ragge 	while	(sc->sc_ib->qc_r[(int)sc->rindex].rmd3 & RMD3_OWN)
    554       1.1     ragge 		{
    555       1.2     ragge 		rp = &sc->sc_ib->qc_r[(int)sc->rindex];
    556  1.23.2.1    martin 		if ((rp->rmd0 & (RMD0_STP|RMD0_ENP)) != (RMD0_STP|RMD0_ENP)) {
    557      1.14      matt 			printf("%s: chained packet\n", device_xname(sc->sc_dev));
    558  1.23.2.1    martin 			if_statinc(&sc->is_if, if_ierrors);
    559       1.1     ragge 			goto rnext;
    560  1.23.2.1    martin 		}
    561       1.1     ragge 		len = (rp->rmd1 & RMD1_MCNT) - 4;	/* -4 for CRC */
    562       1.6    simonb 
    563  1.23.2.1    martin 		if ((rp->rmd0 & RMD0_ERR3) || (rp->rmd2 & RMD2_ERR4)) {
    564       1.1     ragge #ifdef QTDEBUG
    565       1.2     ragge 			char buf[100];
    566      1.15  christos 			snprintb(buf, sizeof(buf), RMD0_BITS, rp->rmd0);
    567      1.14      matt 			printf("%s: rmd0 %s\n", device_xname(sc->sc_dev), buf);
    568      1.15  christos 			snprintb(buf, sizeof(buf), RMD2_BITS, rp->rmd2);
    569      1.14      matt 			printf("%s: rmd2 %s\n", device_xname(sc->sc_dev), buf);
    570       1.1     ragge #endif
    571  1.23.2.1    martin 			if_statinc(&sc->is_if, if_ierrors);
    572       1.2     ragge 			goto rnext;
    573  1.23.2.1    martin 		}
    574       1.2     ragge 		m = if_ubaget(&sc->sc_ifuba, &sc->sc_ifr[(int)sc->rindex],
    575       1.2     ragge 		    ifp, len);
    576       1.2     ragge 		if (m == 0) {
    577  1.23.2.1    martin 			if_statinc(&sc->is_if, if_ierrors);
    578       1.2     ragge 			goto rnext;
    579       1.2     ragge 		}
    580      1.19     ozaki 		if_percpuq_enqueue(ifp->if_percpuq, m);
    581       1.1     ragge rnext:
    582       1.1     ragge 		--sc->nrcv;
    583       1.2     ragge 		rp->rmd3 = 0;
    584       1.2     ragge 		rp->rmd1 = MCLBYTES;
    585       1.2     ragge 		if	(++sc->rindex >= NRCV)
    586       1.1     ragge 			sc->rindex = 0;
    587       1.1     ragge 		}
    588       1.3     ragge 	QT_WCSR(CSR_ARQR, ARQR_RRQ);	/* tell device it has buffer */
    589       1.1     ragge 	}
    590       1.1     ragge 
    591       1.2     ragge int
    592      1.14      matt qtioctl(struct ifnet *ifp, u_long cmd, void *data)
    593      1.14      matt {
    594       1.5   thorpej 	int s, error;
    595       1.5   thorpej 
    596       1.5   thorpej 	s = splnet();
    597       1.2     ragge 
    598       1.2     ragge 	error = ether_ioctl(ifp, cmd, data);
    599       1.5   thorpej 	if (error == ENETRESET) {
    600       1.5   thorpej 		if (ifp->if_flags & IFF_RUNNING)
    601       1.5   thorpej 			error = qtinit(ifp);
    602       1.5   thorpej 		else
    603       1.5   thorpej 			error = 0;
    604       1.4     ragge 	}
    605       1.1     ragge 	splx(s);
    606       1.2     ragge 	return (error);
    607       1.2     ragge }
    608       1.1     ragge 
    609       1.2     ragge void
    610      1.14      matt qtsrr(struct qt_softc *sc, int srrbits)
    611      1.14      matt {
    612       1.2     ragge 	char buf[100];
    613      1.15  christos 	snprintb(buf, sizeof(buf), SRR_BITS, srrbits);
    614      1.14      matt 	printf("%s: srr=%s\n", device_xname(sc->sc_dev), buf);
    615      1.14      matt }
    616       1.4     ragge 
    617       1.4     ragge /*
    618       1.4     ragge  * Stop activity on the interface.
    619       1.4     ragge  * Lose outstanding transmit requests. XXX - not good for multicast.
    620       1.4     ragge  */
    621       1.4     ragge void
    622       1.4     ragge qtstop(struct ifnet *ifp, int disable)
    623       1.4     ragge {
    624       1.4     ragge 	struct qt_softc *sc = ifp->if_softc;
    625       1.4     ragge 	int i;
    626       1.4     ragge 
    627       1.4     ragge 	QT_WCSR(CSR_SRQR, 3);
    628       1.4     ragge 	for (i = 0; i < 100; i++)
    629       1.4     ragge 		if ((QT_RCSR(CSR_SRR) & SRR_RESP) == 3)
    630       1.4     ragge 			break;
    631       1.4     ragge 	if (QT_RCSR(CSR_SRR) & SRR_FES)
    632       1.4     ragge 		qtsrr(sc, QT_RCSR(CSR_SRR));
    633       1.4     ragge 	/* Forget already queued transmit requests */
    634       1.4     ragge 	while (sc->nxmit > 0) {
    635       1.4     ragge 		if_ubaend(&sc->sc_ifuba, &sc->sc_ifw[sc->xlast]);
    636       1.4     ragge 		if (++sc->xlast >= NXMT)
    637       1.4     ragge 			sc->xlast = 0;
    638       1.4     ragge 		sc->nxmit--;
    639       1.4     ragge 	}
    640       1.4     ragge 	/* Handle late received packets */
    641       1.4     ragge 	qtrint(sc);
    642       1.4     ragge 	ifp->if_flags &= ~IFF_RUNNING;
    643       1.4     ragge }
    644       1.1     ragge 
    645       1.2     ragge #ifdef notyet
    646       1.1     ragge /*
    647       1.1     ragge  * Reset the device.  This moves it from DELQA-T mode to DELQA-Normal mode.
    648       1.1     ragge  * After the reset put the device back in -T mode.  Then call qtinit() to
    649       1.1     ragge  * reinitialize the ring structures and issue the 'timeout' for the "device
    650       1.1     ragge  * started interrupt".
    651       1.1     ragge */
    652       1.1     ragge 
    653       1.2     ragge void
    654       1.2     ragge qtreset(sc)
    655      1.14      matt 	struct qt_softc *sc;
    656       1.1     ragge 	{
    657       1.6    simonb 
    658       1.1     ragge 	qtturbo(sc);
    659       1.2     ragge 	qtinit(&sc->is_ec.ec_if);
    660       1.1     ragge 	}
    661       1.1     ragge #endif
    662