331 lines
		
	
	
		
			7.3 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			331 lines
		
	
	
		
			7.3 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| /*
 | |
| ne2000.c
 | |
| 
 | |
| Driver for the ne2000 ethernet cards. This file contains only the ne2000
 | |
| specific code, the rest is in dp8390.c
 | |
| 
 | |
| Created:	March 15, 1994 by Philip Homburg <philip@f-mnx.phicoh.com>
 | |
| */
 | |
| 
 | |
| #include "../drivers.h"
 | |
| 
 | |
| #include <net/gen/ether.h>
 | |
| #include <net/gen/eth_io.h>
 | |
| #if __minix_vmd
 | |
| #include "config.h"
 | |
| #endif
 | |
| 
 | |
| #include "local.h"
 | |
| #include "dp8390.h"
 | |
| #include "ne2000.h"
 | |
| 
 | |
| #if ENABLE_NE2000
 | |
| 
 | |
| #define N 100
 | |
| 
 | |
| #define MILLIS_TO_TICKS(m)  (((m)*HZ/1000)+1)
 | |
| 
 | |
| _PROTOTYPE( typedef int (*testf_t), (dpeth_t *dep, int pos, u8_t *pat)	);
 | |
| 
 | |
| u8_t	pat0[]= { 0x00, 0x00, 0x00, 0x00 };
 | |
| u8_t	pat1[]= { 0xFF, 0xFF, 0xFF, 0xFF };
 | |
| u8_t	pat2[]= { 0xA5, 0x5A, 0x69, 0x96 };
 | |
| u8_t	pat3[]= { 0x96, 0x69, 0x5A, 0xA5 };
 | |
| 
 | |
| _PROTOTYPE( static int test_8, (dpeth_t *dep, int pos, u8_t *pat)	);
 | |
| _PROTOTYPE( static int test_16, (dpeth_t *dep, int pos, u8_t *pat)	);
 | |
| _PROTOTYPE( static void ne_stop, (dpeth_t *dep)				);
 | |
| _PROTOTYPE( static void milli_delay, (unsigned long millis)		);
 | |
| 
 | |
| /*===========================================================================*
 | |
|  *				ne_probe				     *
 | |
|  *===========================================================================*/
 | |
| int ne_probe(dep)
 | |
| dpeth_t *dep;
 | |
| {
 | |
| 	int byte;
 | |
| 	int i;
 | |
| 	int loc1, loc2;
 | |
| 	testf_t f;
 | |
| 
 | |
| 	dep->de_dp8390_port= dep->de_base_port + NE_DP8390;
 | |
| 
 | |
| 	/* We probe for an ne1000 or an ne2000 by testing whether the
 | |
| 	 * on board is reachable through the dp8390. Note that the
 | |
| 	 * ne1000 is an 8bit card and has a memory region distict from
 | |
| 	 * the 16bit ne2000
 | |
| 	 */
 | |
| 
 | |
| 	for (dep->de_16bit= 0; dep->de_16bit < 2; dep->de_16bit++)
 | |
| 	{
 | |
| 		/* Reset the ethernet card */
 | |
| 		byte= inb_ne(dep, NE_RESET);
 | |
| 		milli_delay(2);
 | |
| 		outb_ne(dep, NE_RESET, byte);
 | |
| 		milli_delay(2);
 | |
| 
 | |
| 		/* Reset the dp8390 */
 | |
| 		outb_reg0(dep, DP_CR, CR_STP | CR_DM_ABORT);
 | |
| 		for (i= 0; i < 0x1000 && ((inb_reg0(dep, DP_ISR) & ISR_RST) == 0); i++)
 | |
| 			; /* Do nothing */
 | |
| 
 | |
| 		/* Check if the dp8390 is really there */
 | |
| 		if ((inb_reg0(dep, DP_CR) & (CR_STP|CR_DM_ABORT)) !=
 | |
| 			(CR_STP|CR_DM_ABORT))
 | |
| 		{
 | |
| 			return 0;
 | |
| 		}
 | |
| 
 | |
| 		/* Disable the receiver and init TCR and DCR. */
 | |
| 		outb_reg0(dep, DP_RCR, RCR_MON);
 | |
| 		outb_reg0(dep, DP_TCR, TCR_NORMAL);
 | |
| 		if (dep->de_16bit)
 | |
| 		{
 | |
| 			outb_reg0(dep, DP_DCR, DCR_WORDWIDE | DCR_8BYTES |
 | |
| 				DCR_BMS);
 | |
| 		}
 | |
| 		else
 | |
| 		{
 | |
| 			outb_reg0(dep, DP_DCR, DCR_BYTEWIDE | DCR_8BYTES |
 | |
| 				DCR_BMS);
 | |
| 		}
 | |
| 
 | |
| 		if (dep->de_16bit)
 | |
| 		{
 | |
| 			loc1= NE2000_START;
 | |
| 			loc2= NE2000_START + NE2000_SIZE - 4;
 | |
| 			f= test_16;
 | |
| 		}
 | |
| 		else
 | |
| 		{
 | |
| 			loc1= NE1000_START;
 | |
| 			loc2= NE1000_START + NE1000_SIZE - 4;
 | |
| 			f= test_8;
 | |
| 		}
 | |
| 		if (f(dep, loc1, pat0) && f(dep, loc1, pat1) &&
 | |
| 			f(dep, loc1, pat2) && f(dep, loc1, pat3) &&
 | |
| 			f(dep, loc2, pat0) && f(dep, loc2, pat1) &&
 | |
| 			f(dep, loc2, pat2) && f(dep, loc2, pat3))
 | |
| 		{
 | |
| 			/* We don't need a memory segment */
 | |
| 			dep->de_linmem= 0;
 | |
| 			if (!dep->de_pci)
 | |
| 				dep->de_initf= ne_init;
 | |
| 			dep->de_stopf= ne_stop;
 | |
| 			dep->de_prog_IO= 1;
 | |
| 			return 1;
 | |
| 		}
 | |
| 	}
 | |
| 	return 0;
 | |
| }
 | |
| 
 | |
| /*===========================================================================*
 | |
|  *				ne_init					     *
 | |
|  *===========================================================================*/
 | |
| void ne_init(dep)
 | |
| dpeth_t *dep;
 | |
| {
 | |
| 	int i;
 | |
| 	int word, sendq_nr;
 | |
| 
 | |
| 	/* Setup a transfer to get the ethernet address. */
 | |
| 	if (dep->de_16bit)
 | |
| 		outb_reg0(dep, DP_RBCR0, 6*2);
 | |
| 	else
 | |
| 		outb_reg0(dep, DP_RBCR0, 6);
 | |
| 	outb_reg0(dep, DP_RBCR1, 0);
 | |
| 	outb_reg0(dep, DP_RSAR0, 0);
 | |
| 	outb_reg0(dep, DP_RSAR1, 0);
 | |
| 	outb_reg0(dep, DP_CR, CR_DM_RR | CR_PS_P0 | CR_STA);
 | |
| 
 | |
| 	for (i= 0; i<6; i++)
 | |
| 	{
 | |
| 		if (dep->de_16bit)
 | |
| 		{
 | |
| 			word= inw_ne(dep, NE_DATA);
 | |
| 			dep->de_address.ea_addr[i]= word;
 | |
| 		}
 | |
| 		else
 | |
| 		{
 | |
| 			dep->de_address.ea_addr[i] = inb_ne(dep, NE_DATA);
 | |
| 		}
 | |
| 	}
 | |
| 	dep->de_data_port= dep->de_base_port + NE_DATA;
 | |
| 	if (dep->de_16bit)
 | |
| 	{
 | |
| 		dep->de_ramsize= NE2000_SIZE;
 | |
| 		dep->de_offset_page= NE2000_START / DP_PAGESIZE;
 | |
| 	}
 | |
| 	else
 | |
| 	{
 | |
| 		dep->de_ramsize= NE1000_SIZE;
 | |
| 		dep->de_offset_page= NE1000_START / DP_PAGESIZE;
 | |
| 	}
 | |
| 
 | |
| 	/* Allocate one send buffer (1.5KB) per 8KB of on board memory. */
 | |
| 	sendq_nr= dep->de_ramsize / 0x2000;
 | |
| 	if (sendq_nr < 1)
 | |
| 		sendq_nr= 1;
 | |
| 	else if (sendq_nr > SENDQ_NR)
 | |
| 		sendq_nr= SENDQ_NR;
 | |
| 	dep->de_sendq_nr= sendq_nr;
 | |
| 	for (i= 0; i<sendq_nr; i++)
 | |
| 	{
 | |
| 		dep->de_sendq[i].sq_sendpage= dep->de_offset_page +
 | |
| 			i*SENDQ_PAGES;	
 | |
| 	}
 | |
| 
 | |
| 	dep->de_startpage= dep->de_offset_page + i*SENDQ_PAGES;
 | |
| 	dep->de_stoppage= dep->de_offset_page + dep->de_ramsize / DP_PAGESIZE;
 | |
| 
 | |
| 	/* Can't override the default IRQ. */
 | |
| 	dep->de_irq &= ~DEI_DEFAULT;
 | |
| 
 | |
| 	if (!debug)
 | |
| 	{
 | |
| 		printf("%s: NE%d000 at %X:%d\n",
 | |
| 			dep->de_name, dep->de_16bit ? 2 : 1,
 | |
| 			dep->de_base_port, dep->de_irq);
 | |
| 	}
 | |
| 	else
 | |
| 	{
 | |
| 		printf("%s: Novell NE%d000 ethernet card at I/O address "
 | |
| 			"0x%X, memory size 0x%X, irq %d\n",
 | |
| 			dep->de_name, dep->de_16bit ? 2 : 1,
 | |
| 			dep->de_base_port, dep->de_ramsize, dep->de_irq);
 | |
| 	}
 | |
| }
 | |
| 
 | |
| /*===========================================================================*
 | |
|  *				test_8					     *
 | |
|  *===========================================================================*/
 | |
| static int test_8(dep, pos, pat)
 | |
| dpeth_t *dep;
 | |
| int pos;
 | |
| u8_t *pat;
 | |
| {
 | |
| 	u8_t buf[4];
 | |
| 	int i;
 | |
| 	int r;
 | |
| 
 | |
| 	outb_reg0(dep, DP_ISR, 0xFF);
 | |
| 
 | |
| 	/* Setup a transfer to put the pattern. */
 | |
| 	outb_reg0(dep, DP_RBCR0, 4);
 | |
| 	outb_reg0(dep, DP_RBCR1, 0);
 | |
| 	outb_reg0(dep, DP_RSAR0, pos & 0xFF);
 | |
| 	outb_reg0(dep, DP_RSAR1, pos >> 8);
 | |
| 	outb_reg0(dep, DP_CR, CR_DM_RW | CR_PS_P0 | CR_STA);
 | |
| 
 | |
| 	for (i= 0; i<4; i++)
 | |
| 		outb_ne(dep, NE_DATA, pat[i]);
 | |
| 
 | |
| 	for (i= 0; i<N; i++)
 | |
| 	{
 | |
| 		if (inb_reg0(dep, DP_ISR) & ISR_RDC)
 | |
| 			break;
 | |
| 	}
 | |
| 	if (i == N)
 | |
| 	{
 | |
| 		if (debug)
 | |
| 		{
 | |
| 			printf("%s: NE1000 remote DMA test failed\n",
 | |
| 				dep->de_name);
 | |
| 		}
 | |
| 		return 0;
 | |
| 	}
 | |
| 
 | |
| 	outb_reg0(dep, DP_RBCR0, 4);
 | |
| 	outb_reg0(dep, DP_RBCR1, 0);
 | |
| 	outb_reg0(dep, DP_RSAR0, pos & 0xFF);
 | |
| 	outb_reg0(dep, DP_RSAR1, pos >> 8);
 | |
| 	outb_reg0(dep, DP_CR, CR_DM_RR | CR_PS_P0 | CR_STA);
 | |
| 
 | |
| 	for (i= 0; i<4; i++)
 | |
| 		buf[i]= inb_ne(dep, NE_DATA);
 | |
| 
 | |
| 	r= (memcmp(buf, pat, 4) == 0);
 | |
| 	return r;
 | |
| }
 | |
| 
 | |
| /*===========================================================================*
 | |
|  *				test_16					     *
 | |
|  *===========================================================================*/
 | |
| static int test_16(dep, pos, pat)
 | |
| dpeth_t *dep;
 | |
| int pos;
 | |
| u8_t *pat;
 | |
| {
 | |
| 	u8_t buf[4];
 | |
| 	int i;
 | |
| 	int r;
 | |
| 
 | |
| 	outb_reg0(dep, DP_ISR, 0xFF);
 | |
| 
 | |
| 	/* Setup a transfer to put the pattern. */
 | |
| 	outb_reg0(dep, DP_RBCR0, 4);
 | |
| 	outb_reg0(dep, DP_RBCR1, 0);
 | |
| 	outb_reg0(dep, DP_RSAR0, pos & 0xFF);
 | |
| 	outb_reg0(dep, DP_RSAR1, pos >> 8);
 | |
| 	outb_reg0(dep, DP_CR, CR_DM_RW | CR_PS_P0 | CR_STA);
 | |
| 
 | |
| 	for (i= 0; i<4; i += 2)
 | |
| 	{
 | |
| 		outw_ne(dep, NE_DATA, *(u16_t *)(pat+i));
 | |
| 	}
 | |
| 
 | |
| 	for (i= 0; i<N; i++)
 | |
| 	{
 | |
| 		if (inb_reg0(dep, DP_ISR) & ISR_RDC)
 | |
| 			break;
 | |
| 	}
 | |
| 	if (i == N)
 | |
| 	{
 | |
| 		if (debug)
 | |
| 		{
 | |
| 			printf("%s: NE2000 remote DMA test failed\n",
 | |
| 				dep->de_name);
 | |
| 		}
 | |
| 		return 0;
 | |
| 	}
 | |
| 
 | |
| 	outb_reg0(dep, DP_RBCR0, 4);
 | |
| 	outb_reg0(dep, DP_RBCR1, 0);
 | |
| 	outb_reg0(dep, DP_RSAR0, pos & 0xFF);
 | |
| 	outb_reg0(dep, DP_RSAR1, pos >> 8);
 | |
| 	outb_reg0(dep, DP_CR, CR_DM_RR | CR_PS_P0 | CR_STA);
 | |
| 
 | |
| 	for (i= 0; i<4; i += 2)
 | |
| 	{
 | |
| 		*(u16_t *)(buf+i)= inw_ne(dep, NE_DATA);
 | |
| 	}
 | |
| 
 | |
| 	r= (memcmp(buf, pat, 4) == 0);
 | |
| 	return r;
 | |
| }
 | |
| 
 | |
| /*===========================================================================*
 | |
|  *				ne_stop					     *
 | |
|  *===========================================================================*/
 | |
| static void ne_stop(dep)
 | |
| dpeth_t *dep;
 | |
| {
 | |
| 	int byte;
 | |
| 
 | |
| 	/* Reset the ethernet card */
 | |
| 	byte= inb_ne(dep, NE_RESET);
 | |
| 	milli_delay(2);
 | |
| 	outb_ne(dep, NE_RESET, byte);
 | |
| }
 | |
| 
 | |
| static void milli_delay(unsigned long millis)
 | |
| {
 | |
| 	tickdelay(MILLIS_TO_TICKS(millis));
 | |
| }
 | |
| 
 | |
| #endif /* ENABLE_NE2000 */
 | |
| 
 | |
| /*
 | |
|  * $PchId: ne2000.c,v 1.10 2004/08/03 12:03:00 philip Exp $
 | |
|  */
 | 
