小盒子的小盒

【原创】LWIP-1.2.0+RTL8019+uC/OS-II--代码篇1

0
阅读(3162)

<RTL8019.h>

/*
**************************************************************************************************************
*      Copyright (c) 2006 - 2010 Small.Box Corp. All rights reserved.                                            
*                                         
* FILENAME
*   LD_RTL8019.h
*
* VERSION
*   V1.00
*
* HISTORY
*   2006/09/27  Ver 1.0 Created by Small.Box
*
* REMARK
*   None    
*
*
**************************************************************************************************************
*/


#include <stdio.h>
#include <string.h>
#include <stdlib.h>

#ifndef _SB_RTL8019_H_
#define _SB_RTL8019_H_

#define ADDR_SFT  8

//#define RTL8019_OP_16


#define BaseAddr 0x71000000    //nGCS3->8019_AEN
#define RWPORT (BaseAddr+(0x10<<ADDR_SFT)) //dma read write address, form 0x10 - 0x17
#define RstAddr (BaseAddr+(0x18<<ADDR_SFT)) //reset register, 0x18, 0x1a, 0x1c, 0x1e

/* page 0 */
#define Pstart (BaseAddr+(1<<ADDR_SFT)) //page start
#define Pstop (BaseAddr+(2<<ADDR_SFT)) //page stop
#define BNRY (BaseAddr+(3<<ADDR_SFT))
#define TPSR (BaseAddr+(4<<ADDR_SFT)) //transmit page start
#define TBCR0 (BaseAddr+(5<<ADDR_SFT))
#define TBCR1 (BaseAddr+(6<<ADDR_SFT))
#define ISR  (BaseAddr+(7<<ADDR_SFT)) //interrupt status register

#define RSAR0 (BaseAddr+(8<<ADDR_SFT)) //dma read address
#define RSAR1 (BaseAddr+(9<<ADDR_SFT))
#define RBCR0 (BaseAddr+(10<<ADDR_SFT)) //dma read byte count
#define RBCR1 (BaseAddr+(11<<ADDR_SFT))

#define RCR  (BaseAddr+(12<<ADDR_SFT)) //receive config
#define TCR  (BaseAddr+(13<<ADDR_SFT)) //transmit config
#define DCR  (BaseAddr+(14<<ADDR_SFT)) //data config
#define IMR  (BaseAddr+(15<<ADDR_SFT)) //interrupt mask

#define ID8019L (BaseAddr+(10<<ADDR_SFT))
#define ID8019H (BaseAddr+(11<<ADDR_SFT))

/* page 1 */
#define PAR0 (BaseAddr+(1<<ADDR_SFT))
#define PAR1 (BaseAddr+(2<<ADDR_SFT))
#define PAR2 (BaseAddr+(3<<ADDR_SFT))
#define PAR3 (BaseAddr+(4<<ADDR_SFT))
#define PAR4 (BaseAddr+(5<<ADDR_SFT))
#define PAR5 (BaseAddr+(6<<ADDR_SFT))

#define CURR (BaseAddr+(7<<ADDR_SFT))  
#define MAR0 (BaseAddr+(8<<ADDR_SFT))
#define MAR1 (BaseAddr+(9<<ADDR_SFT))
#define MAR2 (BaseAddr+(10<<ADDR_SFT))
#define MAR3 (BaseAddr+(11<<ADDR_SFT))
#define MAR4 (BaseAddr+(12<<ADDR_SFT))
#define MAR5 (BaseAddr+(13<<ADDR_SFT))
#define MAR6 (BaseAddr+(14<<ADDR_SFT))
#define MAR7 (BaseAddr+(15<<ADDR_SFT))

/* page 2 */

/* page 3 */
#define CR9346 (BaseAddr+(1<<ADDR_SFT))
#define CONFIG0 (BaseAddr+(3<<ADDR_SFT))
#define CONFIG1 (BaseAddr+(4<<ADDR_SFT))
#define CONFIG2 (BaseAddr+(5<<ADDR_SFT))
#define CONFIG3 (BaseAddr+(6<<ADDR_SFT))


int board_eth_init(void);
int board_eth_send(unsigned char *data, unsigned short len);
int board_eth_rcv(unsigned char *data, unsigned int *len);

#endif


/*$PAGE$*/

<RTL8019.c>

/*
**************************************************************************************************************
*      Copyright (c) 2006 - 2010 Small.Box Corp. All rights reserved.                                            
*                                         
* FILENAME
*   RTL8019.c
*
* VERSION
*   V1.00
*
* HISTORY
*   2006/09/27      Ver 1.0 Created by Small.Box
*   2006/10/17      Ver 1.1 目前以太网驱动运行【发送、接收】稳定
*
* REMARK
*   None    
*
*
**************************************************************************************************************
*/


#include <stdio.h>
#include <string.h>
#include <stdlib.h>


#include "RTL8019.h"

#include "includes.h"

#include "opt.h"


#define RPSTART 0x4c


#ifdef RTL8019_OP_16
#define RPSTOP 0x80
#else
#define RPSTOP 0x60
#endif

#define SPSTART 0x40


static U8 rBNRY;
static U8 SrcMacID[ETH_ALEN] = {0x00,0x50,0xba,0x33,0xbe,0x44};

/*
*******************************************************************************
*        RTL8019IOInit
*
*Description: 初始化I/O口
*
*Arguments : 无
*    
*Returns : 无
*
*Note  : V1.0 by Small.Box at 2006.09.27
*
*******************************************************************************
*/

void RTL8019IOInit(void)
{

    //这里初始化ARM与RTL8019连接的I/O口,由移植人,自己添加,这里不在上传我的代码

}

 

/*
*******************************************************************************
*        SetRegPage
*
*Description: 设置8019选中页地址
*
*Arguments : PageIdx 选中第几页【0.1.2.3】
*    
*
*Returns : 无
*
*Note  : V1.0 by Small.Box at 2006.09.27
*    
*    PageIdx = 0 -> temp = 0x21
*    PageIdx = 1 -> temp = 0x61
*    PageIdx = 2 -> temp = 0xA1
*    PageIdx = 3 -> temp = 0xE1
*
*******************************************************************************
*/

void SetRegPage(U8 PageIdx)
{
 U8 temp;
 
 temp = inportb(BaseAddr);
 temp = (temp&0x3b)|(PageIdx<<6);      
 outportb(temp, BaseAddr);
}


/*
*******************************************************************************
*        SetMacID
*
*Description: 设置8019物理MAC地址
*
*Arguments : 无
*    
*
*Returns : 无
*
*Note  : V1.0 by Small.Box at 2006.09.27
*
*******************************************************************************
*/

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);
}


/*
*******************************************************************************
*        Rst8019
*
*Description: 8019软复位
*
*Arguments : 无
*    
*
*Returns : 无
*
*Note  : V1.0 by Small.Boxat 2006.09.27
*
*******************************************************************************
*/

static U8 Rst8019()
{
 int i;
 
 outportb(0x5a, RstAddr);
 //需要添加一个延时代码,为了确保复位指令正常运行
 SetRegPage(0);
 return (inportb(ISR)&0x80);
}


/*
*******************************************************************************
*        WakeRtl8019as
*
*Description: 设置8019第三页寄存器
*
*Arguments : 无
*    
*
*Returns : 无
*
*Note  : V1.0 by Small.Box at 2006.10.09
*    
*
*******************************************************************************
*/

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
}


/*
*******************************************************************************
*        InitRS8019
*
*Description: RTL8019AS初始化
*
*Arguments : 无
*    
*
*Returns : 无
*
*Note  : V1.0 by Small.Box at 2006.10.09
*    
*
*******************************************************************************
*/

static void InitRS8019()
{
 int i;
 

 outportb(0x21, BaseAddr);
 for(i=0;i<1000;i++);  //延时确保芯片处于停止模式

 outportb(RPSTART, Pstart);
 outportb(RPSTOP, Pstop);
 outportb(RPSTART, BNRY);
      
 outportb(SPSTART, TPSR);
 outportb(0xcc, RCR);
 outportb(0xe0, TCR);
#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(0x00, MAR1);
 outportb(0x00, MAR2);
 outportb(0x00, MAR3);
 outportb(0x00, MAR4);
 outportb(0x00, MAR5);
 outportb(0x00, MAR6);
 outportb(0x00, MAR7);
 
 outportb(0x22, BaseAddr); // set page 0 and start
  rBNRY = RPSTART;
 
}

/*
*******************************************************************************
*        board_eth_init
*
*Description: RTL8019AS初始化
*    [1]初始化arm I/O口
*    [2]复位rtl8019
*    [3]初始化rtl8019寄存器
*    [4]设置rtl8019物理地址MAC
*
*
*Arguments : 无
*    
*
*Returns : (0)
*
*Note  : V1.0 by Small.Box at 2006.10.09
*    
*
*******************************************************************************
*/

int board_eth_init(void)
{
 int i;
 
 RTL8019IOInit();


 //WakeRtl8019as();
 
 if(!Rst8019()) {
  //复位失败
  return -1;
 
 } else {
  //复位成功
 }
 
 InitRS8019();
 
 i  = inportb(ID8019L);
 i |= inportb(ID8019H)<<8;
 
 SetMacID();
 
 return 0;
}

/*
*******************************************************************************
*        board_eth_send
*
*Description: RTL8019AS发送驱动程序
*
*Arguments : *data 发送的数据
*    *len 发送数据的长度
*    
*Returns : (0)  异常
*
*
*Note  : 页 0x40 ~ 0x4b 为发送缓冲区 共计大小12页
*    以太网最大的一个数据包是1514字节+4字节校验.
*    一个最大的数据包需要6页=256*6=1536字节.
*    12页可以放两个最大的包.我们把前6页0x40--0x45称为发送缓冲1,
*    接下来的6页0x46--0x4B称为发送缓冲2.
*
*    V1.0 by Small.Boxat 2006.10.09   存在只能发送256个数据的bug
*    V1.1 Modify By Small.Box at 2006.10.17  修改了只能发送256个数据的bug
*    目前运行稳定
*******************************************************************************
*/

int board_eth_send(unsigned char *data, unsigned short len)
{
 static sFlag = 0;
 int i;
 U8 send_page;
 
#if 0
 LWIP_DEBUGF(RTL8019_DEBUG, ("*****************************\r\n"));
 LWIP_DEBUGF(RTL8019_DEBUG, ("RTL8019's Send len    = %d   \r\n",len));
 LWIP_DEBUGF(RTL8019_DEBUG, ("*****************************\r\n"));
#endif
 
 send_page  = SPSTART;   
 send_page += (sFlag&1)?6:0;
 sFlag++;      //Modify by Small.Box at 06.10.17 13:11pm
 
 if(len<60) {
  for(; len<60; len++)
   data[len] = 0x20;
 }
 
 SetRegPage(0);
 outportb(0x22, BaseAddr);
 outportb(0, RSAR0);
 outportb(send_page, RSAR1);
 
 outportb((unsigned char)len&0xff, RBCR0);
 outportb((unsigned char)(len>>8), RBCR1);

 outportb(0x12, BaseAddr);
 
#ifdef RTL8019_OP_16
 len += len&1;
 for(i=0; i<(len>>1); i++)
  outportb(((U16 *)data)[i], RWPORT);
#else
 for(i=0; i<len; i++)
  outportb(data[i], RWPORT);
#endif  

 while(inportb(BaseAddr)&4);
 outportb(send_page, TPSR);

 outportb((unsigned char)len&0xff, TBCR0);
 outportb((unsigned char)(len>>8), TBCR1);
 
 outportb(0x1e, BaseAddr);
 return 0;
}


/*
*******************************************************************************
*        board_eth_rcv
*
*Description: RTL8019AS接收驱动程序
*
*Arguments : *data 接收的数据
*    *len 接收数据的长度
*    
*Returns : (0)  异常 【复位或溢出】
*    (1)  正常
*    (-1) 接收失败
*
*Note  : V1.0 by Small.Box at 2006.10.09
*    V1.1 Modify by Small.Box at 2006.10.17 修改了只能接收255个数据的bug
*
*******************************************************************************
*/

int board_eth_rcv(unsigned char *data, unsigned int *len)
{ U8 RxPageBeg, RxPageEnd;
 U8 RxNextPage;
 U8 RxStatus;
 int i, isrFlag,RxLength;
 U16 *data_16;
 //int RxStatusJust;

 U8 RxCntH,RxCntL;

 data_16 = (U16 *)data;
 
 SetRegPage(0);
  outportb(rBNRY, BNRY);  //rBNRY = RPSTART = 0x4c
 
 isrFlag = inportb(ISR);   
 if((isrFlag & 0x90) != 0) {
  Printf("\r\n------Rtl8019 Reseting or Overflow!------\r\n");
  InitRS8019();
  return (0);
 }
 else if(isrFlag & 1) {   //接收成功
  //Printf("\r\n------Rtl8019 Receive Successfully!------\r\n");
  outportb(0x1, ISR);   //清除中断标志
 } else {
  //Printf("\r\n------Rtl8019 Receive Failed!------\r\n");
  return (-1);
 }  

 SetRegPage(1);
 RxPageEnd = inportb(CURR);
 LWIP_DEBUGF(RTL8019_DEBUG, ("RTL8019's CURR = %d \r\n",RxPageEnd));
 
 SetRegPage(0);

 RxPageBeg = rBNRY+1;
 if(RxPageBeg>=RPSTOP)
  RxPageBeg = RPSTART;
 
 outportb(0x22, BaseAddr);

 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);
 RxCntH    = inportb(RWPORT);
 RxLength  |= ((unsigned short)RxCntH) << 8;
 *len    = RxLength;
#endif

#if 0
 LWIP_DEBUGF(RTL8019_DEBUG, ("RTL8019's RxStatus  = %d \r\n",RxStatus));
 LWIP_DEBUGF(RTL8019_DEBUG, ("RTL8019's RxNextPage  = %d \r\n",RxNextPage));
 LWIP_DEBUGF(RTL8019_DEBUG, ("RTL8019's RxLength  = %d \r\n",RxLength));  
 LWIP_DEBUGF(RTL8019_DEBUG, ("RTL8019's RxPageBeg  = %d \r\n",RxPageBeg));
#endif
 
 if(RxLength > ETH_FRAME_LEN) {
  if(RxPageEnd==RPSTART)
   rBNRY = RPSTOP-1;
  else
   rBNRY = RxPageEnd-1;
  outportb(rBNRY, BNRY);
  LWIP_DEBUGF(RTL8019_DEBUG, ("RTL8019's Rev Length --->ERROR<---\r\n"));
  return -1;
 }
 
 RxCntH = (unsigned char)(RxLength>>8);
 RxCntL = (unsigned char)(RxLength & 0x00ff);

 LWIP_DEBUGF(RTL8019_DEBUG, ("RTL8019's Rev RxCntH = %d\r\n",RxCntH));
 LWIP_DEBUGF(RTL8019_DEBUG, ("RTL8019's Rev RxCntL = %d\r\n",RxCntL));

 outportb(4, RSAR0);
 outportb(RxPageBeg, RSAR1);
 outportb(RxCntL, RBCR0);
 outportb(RxCntH, 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);
 }
#else
  for(; RxLength--;) {
   
   if(!((unsigned char)i&0xff)) {
    outportb(RxPageBeg, BNRY);
    RxPageBeg++;
    if(RxPageBeg>=RPSTOP)
     RxPageBeg = RPSTART;
    
    LWIP_DEBUGF(RTL8019_DEBUG, ("RTL8019's RxPageBeg(1) = %d \r\n",RxPageBeg));          
   }
   
   *data = inportb(RWPORT);
   data++;

  }
#endif
 
 outportb(RxPageBeg, BNRY);
 rBNRY = RxPageBeg;
 
 return 1;
}


/*$PAGE$*/