X-Git-Url: http://git.joshuawise.com/netwatch.git/blobdiff_plain/47c41031c5ec29bb8d8047cd287aa8b0b7af1fd3..bec09bd18a879a22688c68febaff8c65da41f752:/net/3c90x.c

diff --git a/net/3c90x.c b/net/3c90x.c
index a9d15df..5686327 100644
--- a/net/3c90x.c
+++ b/net/3c90x.c
@@ -218,26 +218,24 @@ enum Commands
 #define INT_CMDINPROGRESS	(1<<12)
 #define INT_WINDOWNUMBER	(7<<13)
 
-
-/*** TX descriptor ***/
-typedef struct
-    {
-    unsigned int	DnNextPtr;
-    unsigned int	FrameStartHeader;
-    unsigned int	DataAddr;
-    unsigned int	DataLength;
-    }
-    TXD __attribute__ ((aligned(8))); /* 64-bit aligned for bus mastering */
+/* These structures are all 64-bit aligned, as needed for bus-mastering I/O. */
+typedef struct {
+	unsigned int addr;
+	unsigned int len;
+} segment_t __attribute__ ((aligned(8)));
+
+typedef struct {
+	unsigned int next;
+	unsigned int hdr;
+	segment_t segments[64 /* XXX magic */];
+} txdesc_t __attribute__ ((aligned(8)));
 
 /*** RX descriptor ***/
-typedef struct
-    {
-    unsigned int	UpNextPtr;
-    unsigned int	UpPktStatus;
-    unsigned int	DataAddr;
-    unsigned int	DataLength;
-    }
-    RXD __attribute__ ((aligned(8))); /* 64-bit aligned for bus mastering */
+typedef struct {
+	unsigned int	next;
+	unsigned int	status;
+	segment_t segments[64];
+} rxdesc_t __attribute__ ((aligned(8)));
 
 /*** Global variables ***/
 static struct
@@ -247,11 +245,11 @@ static struct
     unsigned char	CurrentWindow;
     unsigned int	IOAddr;
     unsigned char	HWAddr[ETH_ALEN];
-    TXD			TransmitDPD;
-    RXD			ReceiveUPD;
     }
     INF_3C90X;
+
 static struct nic nic;
+static txdesc_t txdesc;
 
 #define _outl(v,a) outl((a),(v))
 #define _outw(v,a) outw((a),(v))
@@ -405,13 +403,6 @@ a3c90x_internal_WriteEeprom(int ioaddr, int address, unsigned short value)
  ***/
 static void a3c90x_reset(void)
     {
-#ifdef	CFG_3C90X_PRESERVE_XCVR
-    int cfg;
-    /** Read the current InternalConfig value. **/
-    _set_window(INF_3C90X.IOAddr, winTxRxOptions3);
-    cfg = inl(INF_3C90X.IOAddr + regInternalConfig_3_l);
-#endif
-
     /** Send the reset command to the card **/
     outputf("3c90x: issuing RESET");
     _issue_command(INF_3C90X.IOAddr, cmdGlobalReset, 0);
@@ -424,18 +415,6 @@ static void a3c90x_reset(void)
     _outw(0, INF_3C90X.IOAddr + regStationMask_2_3w+2);
     _outw(0, INF_3C90X.IOAddr + regStationMask_2_3w+4);
 
-#ifdef	CFG_3C90X_PRESERVE_XCVR
-    /** Re-set the original InternalConfig value from before reset **/
-    _set_window(INF_3C90X.IOAddr, winTxRxOptions3);
-    _outl(cfg, INF_3C90X.IOAddr + regInternalConfig_3_l);
-
-    /** enable DC converter for 10-Base-T **/
-    if ((cfg&0x0300) == 0x0300)
-	{
-	_issue_command(INF_3C90X.IOAddr, cmdEnableDcConverter, 0);
-	}
-#endif
-
     /** Issue transmit reset, wait for command completion **/
     _issue_command(INF_3C90X.IOAddr, cmdTxReset, 0);
     if (! INF_3C90X.isBrev)
@@ -472,150 +451,210 @@ static void a3c90x_reset(void)
  *** size - size of the non-header part of the packet that needs transmitted;
  *** pkt - the pointer to the packet data itself.
  ***/
-static void
-a3c90x_transmit(unsigned int size, const char *pkt)
+static void _transmit(struct pbuf *p)
 {
 	unsigned char status;
-	unsigned int i, retries;
-
-	for (retries=0; retries < XMIT_RETRIES; retries++)
+	static struct pbuf *oldpbuf = NULL;
+	unsigned int n, len;
+	
+	if (oldpbuf)
 	{
-		if (retries != 0)
-			outputf("3c90x: retrying packet send (%d)", retries);
-		
-		_issue_command(INF_3C90X.IOAddr, cmdStallCtl, 2 /* Stall download */);
-
-		/** Setup the DPD (download descriptor) **/
-		INF_3C90X.TransmitDPD.DnNextPtr = 0;
-		/** set notification for transmission completion (bit 15) **/
-		INF_3C90X.TransmitDPD.FrameStartHeader = (size) | 0x8000;
-		INF_3C90X.TransmitDPD.DataAddr = memory_v2p((void*)pkt);
-		INF_3C90X.TransmitDPD.DataLength = size + (1<<31);
-
-		/** Send the packet **/
-		outl(INF_3C90X.IOAddr + regDnListPtr_l, memory_v2p(&(INF_3C90X.TransmitDPD)));
-		_issue_command(INF_3C90X.IOAddr, cmdStallCtl, 3 /* Unstall download */);
-		
-		oneshot_start_ms(100);
-		while((inl(INF_3C90X.IOAddr + regDnListPtr_l) != 0) && oneshot_running())
-			;
-		if (!oneshot_running())
-			outputf("3c90x: Download engine pointer timeout");
-
-		oneshot_start_ms(10);	/* Give it 10 ms */
+		int i = 0;
 		while (!(inw(INF_3C90X.IOAddr + regCommandIntStatus_w) & INT_TXCOMPLETE) && oneshot_running())
-			;
-
+			i++;
+		if (i)
+			outputf("3c90x: had to wait %d loops to tx", i);
 		if (!(inw(INF_3C90X.IOAddr + regCommandIntStatus_w) & INT_TXCOMPLETE))
 		{
 			outputf("3c90x: tx timeout? txstat %02x", inb(INF_3C90X.IOAddr + regTxStatus_b));
 			outputf("3c90x: Gen sts %04x", inw(INF_3C90X.IOAddr + regCommandIntStatus_w));
-			continue;
 		}
 		status = inb(INF_3C90X.IOAddr + regTxStatus_b);
 		outb(INF_3C90X.IOAddr + regTxStatus_b, 0x00);
-		
-		/** successful completion (sans "interrupt Requested" bit) **/
-		if ((status & 0xbf) == 0x80)
-			return;
-
-		outputf("3c90x: Status (%hhX)", status);
-		/** check error codes **/
-		if (status & 0x02)
-		{
-			outputf("3c90x: Tx Reclaim Error (%hhX)", status);
-			a3c90x_reset();
-		} else if (status & 0x04) {
-			outputf("3c90x: Tx Status Overflow (%hhX)", status);
-			for (i=0; i<32; i++)
-				_outb(0x00, INF_3C90X.IOAddr + regTxStatus_b);
-			/** must re-enable after max collisions before re-issuing tx **/
-			_issue_command(INF_3C90X.IOAddr, cmdTxEnable, 0);
-		} else if (status & 0x08) {
-			outputf("3c90x: Tx Max Collisions (%hhX)", status);
-			/** must re-enable after max collisions before re-issuing tx **/
-			_issue_command(INF_3C90X.IOAddr, cmdTxEnable, 0);
-		} else if (status & 0x10) {
-			outputf("3c90x: Tx Underrun (%hhX)", status);
-			a3c90x_reset();
-		} else if (status & 0x20) {
-			outputf("3c90x: Tx Jabber (%hhX)", status);
-			a3c90x_reset();
-		} else if ((status & 0x80) != 0x80) {
-			outputf("3c90x: Internal Error - Incomplete Transmission (%hhX)", status);
-			a3c90x_reset();
-		}
+		pbuf_free(oldpbuf);
+		oldpbuf = NULL;
 	}
 
-	/** failed after RETRY attempts **/
-	outputf("3c90x: Failed to send after %d retries", retries);
-	return;
-}
-
+	_issue_command(INF_3C90X.IOAddr, cmdStallCtl, 2 /* Stall download */);
 
+	/** Setup the DPD (download descriptor) **/
+	txdesc.next = 0;
+	len = 0;
+	n = 0;
+	oldpbuf = p;
+	for (; p; p = p->next)
+	{
+		txdesc.segments[n].addr = v2p(p->payload);
+		txdesc.segments[n].len = p->len | (p->next ? 0 : (1 << 31));
+		len += p->len;
+		pbuf_ref(p);
+		n++;
+	}
+	/** set notification for transmission completion (bit 15) **/
+	txdesc.hdr = (len) | 0x8000;
+	
+	/** Send the packet **/
+	outl(INF_3C90X.IOAddr + regDnListPtr_l, v2p(&txdesc));
+	_issue_command(INF_3C90X.IOAddr, cmdStallCtl, 3 /* Unstall download */);
+		
+	oneshot_start_ms(10);
+	while((inl(INF_3C90X.IOAddr + regDnListPtr_l) != 0) && oneshot_running())
+		;
+	if (!oneshot_running())
+	{
+		outputf("3c90x: Download engine pointer timeout");
+		return;
+	}
 
-/*** a3c90x_poll: exported routine that waits for a certain length of time
- *** for a packet, and if it sees none, returns 0.  This routine should
- *** copy the packet to nic->packet if it gets a packet and set the size
- *** in nic->packetlen.  Return 1 if a packet was found.
- ***/
-static int
-a3c90x_poll(struct nic *nic, int retrieve)
-    {
-    int i, errcode;
+#if 0		
+	/** successful completion (sans "interrupt Requested" bit) **/
+	if ((status & 0xbf) == 0x80)
+		return;
 
-    if (!(inw(INF_3C90X.IOAddr + regCommandIntStatus_w)&0x0010))
+	outputf("3c90x: Status (%hhX)", status);
+	/** check error codes **/
+	if (status & 0x02)
 	{
-	return 0;
+		outputf("3c90x: Tx Reclaim Error (%hhX)", status);
+		a3c90x_reset();
+	} else if (status & 0x04) {
+		outputf("3c90x: Tx Status Overflow (%hhX)", status);
+		for (i=0; i<32; i++)
+			_outb(0x00, INF_3C90X.IOAddr + regTxStatus_b);
+		/** must re-enable after max collisions before re-issuing tx **/
+		_issue_command(INF_3C90X.IOAddr, cmdTxEnable, 0);
+	} else if (status & 0x08) {
+		outputf("3c90x: Tx Max Collisions (%hhX)", status);
+		/** must re-enable after max collisions before re-issuing tx **/
+		_issue_command(INF_3C90X.IOAddr, cmdTxEnable, 0);
+	} else if (status & 0x10) {
+		outputf("3c90x: Tx Underrun (%hhX)", status);
+		a3c90x_reset();
+	} else if (status & 0x20) {
+		outputf("3c90x: Tx Jabber (%hhX)", status);
+		a3c90x_reset();
+	} else if ((status & 0x80) != 0x80) {
+		outputf("3c90x: Internal Error - Incomplete Transmission (%hhX)", status);
+		a3c90x_reset();
 	}
+#endif
+}
 
-    if ( ! retrieve ) return 1;
+/***************************** Receive routines *****************************/
+#define MAX_RECV_SIZE 1536
+#define RECV_BUFS 4
 
-    /** we don't need to acknowledge rxComplete -- the upload engine
-     ** does it for us.
-     **/
+static rxdesc_t rxdescs[RECV_BUFS];
+static struct pbuf *pbufs[RECV_BUFS] = {0,};
 
-    /** Build the up-load descriptor **/
-    INF_3C90X.ReceiveUPD.UpNextPtr = 0;
-    INF_3C90X.ReceiveUPD.UpPktStatus = 0;
-    INF_3C90X.ReceiveUPD.DataAddr = memory_v2p(nic->packet);
-    INF_3C90X.ReceiveUPD.DataLength = 1536 + (1<<31);
+/* rxcons is the pointer to the receive descriptor that the ethernet card will
+ * write into next.
+ */
+static int rxcons = 0;
 
-    /** Submit the upload descriptor to the NIC **/
-    _outl(memory_v2p(&(INF_3C90X.ReceiveUPD)),
-         INF_3C90X.IOAddr + regUpListPtr_l);
+/* rxprod is the pointer to the receive descriptor that the driver will
+ * allocate next.
+ */
+static int rxprod = 0;
 
-    /** Wait for upload completion (upComplete(15) or upError (14)) **/
-    for(i=0;i<40000;i++);
-    while((INF_3C90X.ReceiveUPD.UpPktStatus & ((1<<14) | (1<<15))) == 0)
-	for(i=0;i<40000;i++);
+/* _recv_prepare fills the 3c90x's ring buffer with fresh pbufs from lwIP.
+ * The upload engine need not be stalled.
+ */
+static void _recv_prepare(struct nic *nic)
+{
+	int oldprod;
 
-    /** Check for Error (else we have good packet) **/
-    if (INF_3C90X.ReceiveUPD.UpPktStatus & (1<<14))
+	oldprod = rxprod;
+	while ((rxprod != rxcons) || !pbufs[rxprod])
 	{
-	errcode = INF_3C90X.ReceiveUPD.UpPktStatus;
-	if (errcode & (1<<16))
-	    outputf("3C90X: Rx Overrun (%hX)",errcode>>16);
-	else if (errcode & (1<<17))
-	    outputf("3C90X: Runt Frame (%hX)",errcode>>16);
-	else if (errcode & (1<<18))
-	    outputf("3C90X: Alignment Error (%hX)",errcode>>16);
-	else if (errcode & (1<<19))
-	    outputf("3C90X: CRC Error (%hX)",errcode>>16);
-	else if (errcode & (1<<20))
-	    outputf("3C90X: Oversized Frame (%hX)",errcode>>16);
-	else
-	    outputf("3C90X: Packet error (%hX)",errcode>>16);
-	return 0;
+		int i;
+		struct pbuf *p;
+		
+		if (!pbufs[rxprod])
+			pbufs[rxprod] = p = pbuf_alloc(PBUF_RAW, MAX_RECV_SIZE, PBUF_POOL);
+		else {
+			outputf("WARNING: 3c90x has pbuf in slot %d", rxprod);
+			p = pbufs[rxprod];
+		}
+		
+		if (!p)
+		{
+			outputf("3c90x: out of memory for rx pbuf?");
+			break;
+		}
+		
+		rxdescs[rxprod].status = 0;
+		rxdescs[rxprod].next = 0;
+		for (i = 0; p; p = p->next, i++)
+		{
+			rxdescs[rxprod].segments[i].addr = v2p(p->payload);
+			rxdescs[rxprod].segments[i].len = p->len | (p->next ? 0 : (1 << 31));
+		}
+		
+		/* Hook in the new one after and only after it's been fully set up. */
+		rxdescs[(rxprod + RECV_BUFS - 1) % RECV_BUFS].next = v2p(&(rxdescs[rxprod]));
+		rxprod = (rxprod + 1) % RECV_BUFS;
 	}
+	
+	if (inl(INF_3C90X.IOAddr + regUpListPtr_l) == 0 && pbufs[oldprod])	/* Ran out of shit, and got new shit? */
+	{
+		outl(INF_3C90X.IOAddr + regUpListPtr_l, v2p(&rxdescs[oldprod]));
+		outputf("3c90x: WARNING: Ran out of rx slots");
+	}
+	
+}
 
-    /** Ok, got packet.  Set length in nic->packetlen. **/
-    nic->packetlen = (INF_3C90X.ReceiveUPD.UpPktStatus & 0x1FFF);
-
-    return 1;
-    }
-
+/* _recv polls the ring buffer to see if any packets are available.  If any 
+ * are, then eth_recv is called for each available.  _recv returns how many
+ * packets it received successfully.  Whether _recv got any packets or not,
+ * _recv does not block, and reinitializes the ring buffer with fresh pbufs.
+ */
+static int _recv(struct nic *nic)
+{
+	int errcode, n = 0;
+	struct pbuf *p;
+	
+	/* Nothing to do? */
+	while ((rxdescs[rxcons].status & ((1<<14) | (1<<15))) != 0)
+	{
+		/** Check for Error (else we have good packet) **/
+		if (rxdescs[rxcons].status & (1<<14))
+		{
+			errcode = rxdescs[rxcons].status;
+			if (errcode & (1<<16))
+				outputf("3C90X: Rx Overrun (%hX)",errcode>>16);
+			else if (errcode & (1<<17))
+				outputf("3C90X: Runt Frame (%hX)",errcode>>16);
+			else if (errcode & (1<<18))
+				outputf("3C90X: Alignment Error (%hX)",errcode>>16);
+			else if (errcode & (1<<19))
+				outputf("3C90X: CRC Error (%hX)",errcode>>16);
+			else if (errcode & (1<<20))
+				outputf("3C90X: Oversized Frame (%hX)",errcode>>16);
+			else
+				outputf("3C90X: Packet error (%hX)",errcode>>16);
+		
+			p = NULL;	
+			pbuf_free(pbufs[rxcons]);		/* Bounce the old one before setting it up again. */
+		} else {
+			p = pbufs[rxcons];
+			pbuf_realloc(p, rxdescs[rxcons].status & 0x1FFF);	/* Resize the packet to how large it actually is. */
+		}
+		
+		pbufs[rxcons] = NULL;
+		rxdescs[rxcons].status = 0; 
+		rxcons = (rxcons + 1) % RECV_BUFS;
+		
+		if (p)
+		{
+			eth_recv(nic, p);
+			n++;
+		}
+	}
 
+	_recv_prepare(nic);	/* Light the NIC up again. */
+	return n;
+}
 
 /*** a3c90x_disable: exported routine to disable the card.  What's this for?
  *** the eepro100.c driver didn't have one, so I just left this one empty too.
@@ -783,12 +822,6 @@ static int a3c90x_probe(struct pci_dev * pci, void * data)
     _outw(0, INF_3C90X.IOAddr + regStationMask_2_3w+2);
     _outw(0, INF_3C90X.IOAddr + regStationMask_2_3w+4);
 
-    /** Fill in our entry in the etherboot arp table **/
-/* XXX ? for lwip? 
-    for(i=0;i<ETH_ALEN;i++)
-	nic.node_addr[i] = (eeprom[HWADDR_OFFSET + i/2] >> (8*((i&1)^1))) & 0xff;
-*/
-
     /** Read the media options register, print a message and set default
      ** xcvr.
      **
@@ -809,45 +842,44 @@ static int a3c90x_probe(struct pci_dev * pci, void * data)
     linktype = 0x0008;
     if (mopt & 0x01)
 	{
-	outputf("%s100Base-T4",(c++)?", ":"");
+	outputf("  100Base-T4");
 	linktype = 0x0006;
 	}
     if (mopt & 0x04)
 	{
-	outputf("%s100Base-FX",(c++)?", ":"");
+	outputf("  100Base-FX");
 	linktype = 0x0005;
 	}
     if (mopt & 0x10)
 	{
-	outputf("%s10Base-2",(c++)?", ":"");
+	outputf("  10Base-2");
 	linktype = 0x0003;
 	}
     if (mopt & 0x20)
 	{
-	outputf("%sAUI",(c++)?", ":"");
+	outputf("  AUI");
 	linktype = 0x0001;
 	}
     if (mopt & 0x40)
 	{
-	outputf("%sMII",(c++)?", ":"");
+	outputf("  MII");
 	linktype = 0x0006;
 	}
     if ((mopt & 0xA) == 0xA)
 	{
-	outputf("%s10Base-T / 100Base-TX",(c++)?", ":"");
+	outputf("  10Base-T / 100Base-TX");
 	linktype = 0x0008;
 	}
     else if ((mopt & 0xA) == 0x2)
 	{
-	outputf("%s100Base-TX",(c++)?", ":"");
+	outputf("  100Base-TX");
 	linktype = 0x0008;
 	}
     else if ((mopt & 0xA) == 0x8)
 	{
-	outputf("%s10Base-T",(c++)?", ":"");
+	outputf("  10Base-T");
 	linktype = 0x0008;
 	}
-    outputf(".");
 
     /** Determine transceiver type to use, depending on value stored in
      ** eeprom 0x16
@@ -908,9 +940,13 @@ static int a3c90x_probe(struct pci_dev * pci, void * data)
 
     /** Set the RX filter = receive only individual pkts & multicast & bcast. **/
     _issue_command(INF_3C90X.IOAddr, cmdSetRxFilter, 0x01 + 0x02 + 0x04);
+    
+    /* Stick some packets in the queue. */
+    _recv_prepare(&nic);
+    
+    /* And light up the RX engine. */
     _issue_command(INF_3C90X.IOAddr, cmdRxEnable, 0);
 
-
     /**
      ** set Indication and Interrupt flags , acknowledge any IRQ's
      **/
@@ -919,8 +955,8 @@ static int a3c90x_probe(struct pci_dev * pci, void * data)
     _issue_command(INF_3C90X.IOAddr, cmdAcknowledgeInterrupt, 0x661);
 
     /* * Set our exported functions **/
-    nic.poll     = a3c90x_poll;
-    nic.transmit = a3c90x_transmit;
+    nic.recv     = _recv;
+    nic.transmit = _transmit;
     memcpy(nic.hwaddr, INF_3C90X.HWAddr, 6);
     eth_register(&nic);