rtl8019.c

华恒瑞科公司的S3C44B0开发板音频测试程序

/*修改说明:加高电压后,去掉了SetRegPage中判断net_start标志*/

#include "../inc/config.h"
#include "../inc/board.h"
#include "tftp/Emac.h"
#include "tftp/eth.h"
#include "tftp/mac.h"
#include "utils.h"
#include "Rtl8019.h"

//#define	DEBUG_NET	
#define	RPSTART	0x4c
#define	RPSTOP	0x80
#define	SPSTART	0x40

static U8 rBNRY;

static U8 SrcMacID[ETH_ALEN] = {0x00,0x80,0x48,0x12,0x34,0x56};
//static U8 DstMacID[ETH_ALEN];

static U8 net_start;

void SetRegPage(U8 PageIdx)
{
	U8 temp;
	
	temp = inportb(BaseAddr);	
//	temp = (temp&(0x3a|net_start))|(PageIdx<<6);	//ensure bit0 clear!!!
	temp = (temp&0x3b)|(PageIdx<<6);						
	outportb(temp, BaseAddr);
}
/*
static void ClearRam()
{
	int i;
	SetRegPage(0);
	outport(RSAR0, 0x4000);
	outport(RBCR0, 256*32);
	outportb(BaseAddr, 0x12);
	for(i=0; i<256*26; i++)
		outportb(RWPORT, 0x0);
}

static void ReadMacID()
{	
	SetRegPage(1);
	
	SrcMacID[0]=inportb(PAR0);
	SrcMacID[1]=inportb(PAR1);
	SrcMacID[2]=inportb(PAR2);
	SrcMacID[3]=inportb(PAR3);
	SrcMacID[4]=inportb(PAR4);
	SrcMacID[5]=inportb(PAR5);
}
*/
static void SetMacID()
{	
	SetRegPage(1);
	
	outportb(SrcMacID[0], PAR0);
	outportb(SrcMacID[1], PAR1);
	outportb(SrcMacID[2], PAR2);
	outportb(SrcMacID[3], PAR3);
	outportb(SrcMacID[4], PAR4);
	outportb(SrcMacID[5], PAR5);
}

static U8 Rst8019()
{
	int i;
	
	outportb(0x5a, RstAddr);
	i = 20000;
	while(i--);
	SetRegPage(0);
	return (inportb(ISR)&0x80);
}

static void WakeRtl8019as()
{
	SetRegPage(3);	
	outportb(0xcf, CR9346);		//set eem1-0, 11 ,enable write config register
	outportb(0x70, CONFIG3);	//clear pwrdn, sleep mode, set led0 as led_link, led1 as led_rx	
	outportb(0x3f, CR9346); 	//disable write config register
}

static void InitRS8019()
{
	net_start = 1;
	outportb(0x21, BaseAddr);	/* set page 0 and stop */
	outportb(RPSTART, Pstart);	/* set Pstart 0x4c */
	outportb(RPSTOP, Pstop);	/* set Pstop 0x80 */
	outportb(RPSTART, BNRY);	/* BNRY-> the last page has been read */	
	outportb(SPSTART, TPSR);	/* transmit page start register, 0x40 */
	outportb(0xcc, RCR);		/* set RCR 0xcc */	
	outportb(0xe0, TCR);		/* set TCR 0xe0 */
#ifdef	RTL8019_OP_16
	outportb(0xc9, DCR);		/* set DCR 0xc9, 16bit DMA */	
#else
	outportb(0xc8, DCR);		/* 8bit DMA */
#endif
	outportb(0x03, IMR);		/* set IMR 0x03 */
	outportb(0xff, ISR);	
	
	SetRegPage(1);	
	outportb(RPSTART+1, CURR);
	outportb(0x00, MAR0);
	outportb(0x41, MAR1);
	outportb(0x00, MAR2);
	outportb(0x80, MAR3);
	outportb(0x00, MAR4);
	outportb(0x00, MAR5);
	outportb(0x00, MAR6);
	outportb(0x00, MAR7);
	outportb(0x22, BaseAddr);	/* set page 0 and start */
	
	net_start = 0;	
	rBNRY = RPSTART;
}

int board_eth_init(void)
{	
	int i;
	
	WakeRtl8019as();
	
	if(!Rst8019()) {
//		puts("Rtl8019 Reset Failed!\n");
//		printf("%x ", inportb(ISR));		
//		return -1;
	}
//	puts("Rtl8019 Reset Successfully\n");		
		
	InitRS8019();
	
	i  = inportb(ID8019L);	
	i |= inportb(ID8019H)<<8;
	
	SetMacID();	
	
/*		//a test for arp request			
		while(1)	
		{
			int i;
			U8 data[80];
			
			for(i = 0; i<6; i++)
				data[i] = 0xff;				
			for(; i<12; i++)
				data[i] = SrcMacID[i-6];
				
			data[i++] = 8;
			data[i++] = 6;
			data[i++] = 0;
			data[i++] = 1;
			data[i++] = 8;
			data[i++] = 0;
			data[i++] = 6;
			data[i++] = 4;
			data[i++] = 0;
			data[i++] = 1;
			
			for(; i<28; i++)
				data[i] = SrcMacID[i-22];
				
			data[i++] = 0xc0;
			data[i++] = 0xa8;
			data[i++] = 0xa8;
			data[i++] = 0x65;
			
			for(; i<38; i++)
				data[i] = 0;
				
			data[i++] = 0xc0;
			data[i++] = 0xa8;
			data[i++] = 0xa8;
			data[i++] = 0x64;				
			
			s3c44b0_eth_send(data, 60);
			getch();			
		}				
*/			
/*	while(1)
	{
		int i;
		static int q = 0;
		U8 data[80];
		
		q++;
		for(i=0; i<60; i++)
			if(q&1)
				data[i] = i;
			else
				data[i] = 60-i;
				
		s3c44b0_eth_send(data, 60);
		getch();		
		//outportb(BaseAddr, 0x22);				
	}
*/
	return 0;
}

int board_eth_lnk_stat(void)
{
	return 0;
}

int board_eth_send(unsigned char *data, unsigned int len)
{
	static sFlag = 0;
	int i;
	U8 send_page;
	
	send_page  = SPSTART;
	send_page += (sFlag&1)?6:0;
	sFlag++;			
		
	if(len<60)	
		for(; len<60; len++)
			data[len] = 0x20;		//just for pad, any data										
	
	SetRegPage(0);
	outportb(0x22, BaseAddr);
	outportb(0, RSAR0);
	outportb(send_page, RSAR1);
	outportb(len&0xff, RBCR0);
	outportb(len>>8, RBCR1);
	outportb(0x12, BaseAddr);
#ifdef	RTL8019_OP_16
	len += len&1;
	for(i=0; i<(len>>1); i++)
		outportw(((U16 *)data)[i], RWPORT);
#else	
	for(i=0; i<len; i++)
		outportb(data[i], RWPORT);		// tarns to ram			
#endif		
	/*	outportb(RSAR0, 0);
		outportb(RSAR1, SPSTART);
		outportb(RBCR0, len&0xff);	
		outportb(RBCR1, len>>8);	
		outportb(BaseAddr, 0x0a);		
		for(i=0; i<len; i++)
			data[i] = inportb(RWPORT);
			printf("%x ", data[i]);					
	*/
	//outport(RSAR0, SPSTART<<8);		
	//outportb(RSAR0, 0);
	//outportb(RSAR1, SPSTART);			
		while(inportb(BaseAddr)&4);
	outportb(send_page, TPSR);
	outportb(len&0xff, TBCR0);
	outportb(len>>8, TBCR1);
	outportb(0x1e, BaseAddr);			// begin to send

	return 0;
}

int board_eth_rcv(unsigned char *data, unsigned int *len)
{
	U8 RxPageBeg, RxPageEnd;
	U8 RxNextPage;
	U8 RxStatus;
	int i, RxLength;
	U16 *data_16;
	
	data_16 = (U16 *)data;
	
	SetRegPage(0);
		outportb(rBNRY, BNRY);	//???
	if(inportb(ISR)&1)			//接收成功
		outportb(0x1, ISR);		//清除中断标志
	else
		return -1;
		
	SetRegPage(1);
	RxPageEnd = inportb(CURR);
	SetRegPage(0);
	/*
	RxPageBeg = inportb(BNRY)+1;
	if(RxPageBeg>=RPSTOP)
		RxPageBeg = RPSTART;
		
	if(RxPageBeg==RxPageEnd)
		return -1;			//no data received
	*/
	RxPageBeg = rBNRY+1;
	if(RxPageBeg>=RPSTOP)
		RxPageBeg = RPSTART;
	outportb(0x22, BaseAddr);
		
	//outport(RSAR0, RxPageBeg<<8);
	//outport(RBCR0, 256);
	outportb(0, RSAR0);
	outportb(RxPageBeg, RSAR1);
	outportb(4, RBCR0);
	outportb(0, RBCR1);
	outportb(0xa, BaseAddr);
#ifdef	RTL8019_OP_16
	RxLength   = inportw(RWPORT);
	RxStatus   = RxLength&0xff;
	RxNextPage = RxLength>>8;
	RxLength   = inportw(RWPORT);
	RxLength  += RxLength&1;
#else
	RxStatus   = inportb(RWPORT);
	RxNextPage = inportb(RWPORT);	
	RxLength   = inportb(RWPORT);
	RxLength  |= inportb(RWPORT)<<8;
#endif	
	
//		printf("\nRxBeg = %x, RxEnd = %x, staus = %x, nextpage = %x,  size = %x", RxPageBeg, RxPageEnd, RxStatus, RxNextPage, RxLength);
//		printf("\nbeg=%x,len=%x",  RxPageBeg, RxLength);
		
	if(RxLength>ETH_FRAME_LEN)
	{
		if(RxPageEnd==RPSTART)
			rBNRY = RPSTOP-1;
		else
			rBNRY = RxPageEnd-1;
		outportb(rBNRY, BNRY);
		return -1;
	}
	outportb(4, RSAR0);
	outportb(RxPageBeg, RSAR1);
	outportb(RxLength, RBCR0);
	outportb(RxLength>>8, RBCR1);	
	outportb(0xa, BaseAddr);

#ifdef	RTL8019_OP_16
	i = 2;
	data_16 -= i;
	RxLength >>= 1;
	for(; RxLength--;) {
		if(!(i&0x7f)) {
			outportb(RxPageBeg, BNRY);
				RxPageBeg++;
				if(RxPageBeg>=RPSTOP)
					RxPageBeg = RPSTART;
		}
		data_16[i++] = inportw(RWPORT);
//		printf("%x,", data_16[i-1]);
	}	
#else
	i     = 4;
	data -= i;
	for(; RxLength--;)
	{
		if(!(i&0xff))
			{
				outportb(RxPageBeg, BNRY);
				RxPageBeg++;
				if(RxPageBeg>=RPSTOP)
					RxPageBeg = RPSTART;					
			}
		data[i++] = inportb(RWPORT);		
	}
#endif	
	outportb(RxPageBeg, BNRY);
	rBNRY = RxPageBeg;
	
	return 0;		
/*			
	//outport(RSAR0, RxPageBeg<<8);
	//outport(RBCR0, 256);
	outportb(RSAR0, 0);
	outportb(RSAR1, RxPageBeg);
	outportb(RBCR0, 0);
	outportb(RBCR1, 1);	
	outportb(BaseAddr, 0xa);
	RxStatus   = inportb(RWPORT);
	RxNextPage = inportb(RWPORT);	
	RxLength   = inportb(RWPORT);
	RxLength  |= inportb(RWPORT)<<8;
	
		printf("\nRxBeg = %x, RxEnd = %x, staus = %x, nextpage = %x,  size = %x", RxPageBeg, RxPageEnd, RxStatus, RxNextPage, RxLength);		
	
	i     = 4;
	data -= 4;
	do{
		data[i++] = inportb(RWPORT);									
	}while(i&0xff);			
	
	if(RxLength>ETH_FRAME_LEN)
	{
		if(RxPageEnd==RPSTART)
			rBNRY = RPSTOP-1;
		else
			rBNRY = RxPageEnd-1;						
		outportb(BNRY, rBNRY);		 	
		return -1;		
	}		
	
	RxLength -= 252;	
	if(RxLength>0)	
	{
		outportb(RSAR0, 0);
		outportb(RSAR1, RxPageBeg);
		outportb(RBCR0, RxLength&0xff);
		outportb(RBCR1, RxLength>>8);		
		outportb(BaseAddr, 0xa);
		for(; RxLength--;)
		{										
			if(!(i&0xff))
			{
//				outportb(BNRY, RxPageBeg);				
				RxPageBeg++;
				if(RxPageBeg>=RPSTOP)
					RxPageBeg = RPSTART;					
			}
			data[i++] = inportb(RWPORT);
		}				
	}	
	outportb(BNRY, RxPageBeg);	
	rBNRY = RxPageBeg;		
			
//	printf("-%x,%x\n", RxNextPage-1, inportb(BNRY));		
		
	return 0;*/
}

int board_eth_get_addr(unsigned char *addr)
{
	memcpy(addr, SrcMacID, ETH_ALEN);
	return 0;
}