来秀一个我我RTL8019以太网程序，可以发送ARP封包。

aishiqi1992

#include <reg52.h>                                    // 引用标准库的头文件
#include <absacc.h>
#include <stdio.h>

#define uchar unsigned char
#define uint unsigned int

#define REG00 XBYTE[0x8000]                        // 端口300H，命令寄存器CR
#define REG01 XBYTE[0x8100]                        // 端口301H
#define REG02 XBYTE[0x8200]                        // 端口302H
#define REG03 XBYTE[0x8300]                        // 端口303H
#define REG04 XBYTE[0x8400]                        // 端口304H
#define REG05 XBYTE[0x8500]                        // 端口305H
#define REG06 XBYTE[0x8600]                        // 端口306H
#define REG07 XBYTE[0x8700]                        // 端口307H
#define REG08 XBYTE[0x8800]                        // 端口308H
#define REG09 XBYTE[0x8900]                        // 端口309H
#define REG0a XBYTE[0x8a00]                        // 端口30aH
#define REG0b XBYTE[0x8b00]                        // 端口30bH
#define REG0c XBYTE[0x8c00]                        // 端口30cH
#define REG0d XBYTE[0x8d00]                        // 端口30dH
#define REG0e XBYTE[0x8e00]                        // 端口30eH
#define REG0f XBYTE[0x8f00]                        // 端口30fH
#define REG10 XBYTE[0x9000]                        // 端口310H
#define REG11 XBYTE[0x9100]                        // 端口311H
#define REG12 XBYTE[0x9200]                        // 端口312H
#define REG13 XBYTE[0x9300]                        // 端口313H
#define REG14 XBYTE[0x9400]                        // 端口314H
#define REG15 XBYTE[0x9500]                        // 端口315H
#define REG16 XBYTE[0x9600]                        // 端口316H
#define REG17 XBYTE[0x9700]                        // 端口317H
#define REG18 XBYTE[0x9800]                        // 端口318H
#define REG19 XBYTE[0x9900]                        // 端口319H
#define REG1a XBYTE[0x9a00]                        // 端口31aH
#define REG1b XBYTE[0x9b00]                        // 端口31bH
#define REG1c XBYTE[0x9c00]                        // 端口31cH
#define REG1d XBYTE[0x9d00]                        // 端口31dH
#define REG1e XBYTE[0x9e00]                        // 端口31eH
#define REG1f XBYTE[0x9f00]                        // 端口31fH

void delay(uint t);
void NICRst();
void SelectPage(uchar pagenum);
void ClearISR();
void setmac();
void RTL8019Init();
void sentdata(struct packet *mypk );

receivedata(char *dat);
#endif
#include "Ethernet.h"

/* 主函数 */
sbit k=P1^6;  
sbit k2=P1^5;

struct ethhead {
unsigned char destmac[6];
unsigned char sourcemac[6];
unsigned int nextprot;
}myeth;

struct arppk{
unsigned int hardware;
unsigned int prottype;
unsigned char hardlen;
unsigned char protlen;
unsigned int operation;
unsigned char sendermac[6];
unsigned char senderip[4];
unsigned char targetmac[6];
unsigned char targetip[4];

}myarp;

struct packet{
unsigned char *dat;
unsigned int len;
struct packet *nextpk;


} ethpacket,arppacket={0};

unsigned char code str[60]={

0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,                        0x27,0x27,0x27,0x27,0x27,0x27,                0x08,0x06//,                0x00,0x01,
//0x08,0x00,        0x06,        0x04,        0x00,0x01,        0x27,0x27,0x27,0x27,0x27,0x27,                0xAC,0x10,0x2A,0xFD,
//0x00,0x00,0x00,0x00,0x00,0x00,                0xAC,0x10,0x2A,0xFE                    


};

unsigned char mymac[6]={0x27,0x27,0x27,0x27,0x27,0x27};
unsigned char myip[4]={0xC0,0xA8,0x01,0x66};
unsigned char destip[4]={0xC0,0xA8,0x01,0x65};

unsigned char  rec[512];
unsigned int reclen;
init()
{
TMOD=0x20;
PCON=0x00;
SCON=0x50;
TH1=0xfd;
TL1=0xfd;
TR1=1;
EA=0;
}

sent(unsigned char ch)
{SBUF=ch;
while(!TI);
TI=0;
}

sentstr(unsigned char *ch,len)
{
unsigned int i;
i=0;
while(i<len)
{
sent(ch);
i++;
}
}



arpans()
{
unsigned char i;

if(rec[38]==myip[0]&&rec[39]==myip[1]&&rec[40]==myip[2]&&rec[41]==myip[3]&&((struct arppk*)(rec+14))->operation==0x0001)
{

for(i=0;i<6;i++){
myeth.sourcemac=mymac;
myeth.destmac=rec[i+6];
myarp.sendermac=mymac;
myarp.targetmac=rec[i+6];

}
for(i=0;i<4;i++)
{
  myarp.senderip=myip;
  myarp.targetip=rec[i+38];
}

myeth.nextprot=0x0806;
myarp.hardware=0x0001;
myarp.prottype=0x0800;
myarp.hardlen=0x06;
myarp.protlen=0x04;
myarp.operation=0x0002;          //01rewquest //02respond

ethpacket.dat=(unsigned char *)&myeth;
ethpacket.len=14;
ethpacket.nextpk=&arppacket;
arppacket.dat=(unsigned char *)&myarp;
arppacket.len=28;
arppacket.nextpk=NULL;

sentdata(&ethpacket);
}
}


arpreq()
{
unsigned char i;
for(i=0;i<6;i++){
myeth.sourcemac=mymac;
myeth.destmac=0xff;
myarp.sendermac=mymac;
myarp.targetmac=0;

}
for(i=0;i<4;i++)
{
  myarp.senderip=myip;
  myarp.targetip=destip;
}

myeth.nextprot=0x0806;
myarp.hardware=0x0001;
myarp.prottype=0x0800;
myarp.hardlen=0x06;
myarp.protlen=0x04;
myarp.operation=0x0001;          //01rewquest //02respond

ethpacket.dat=(unsigned char *)&myeth;
ethpacket.len=14;
ethpacket.nextpk=&arppacket;
arppacket.dat=(unsigned char *)&myarp;
arppacket.len=28;
arppacket.nextpk=NULL;

sentdata(&ethpacket);

}


void main(void)
{
unsigned char ks,ks2;
ks=0;       
init();
        delay(1000);                                // 延时1s，保证电源稳定和网卡自身的上电完成
          
        NICRst();                                        // RTL8019AS热复位

        ClearISR();                                        // 清除ISR寄存器

        RTL8019Init();                                // 初始化RTL8019AS






         while(1)
        {
         if(k2==0&&ks2==0)
         {

          arpreq();



        ks2=1;
        }
        if(k2!=0)ks2=0;       
//        if(!k)



       
if(        receivedata(rec))

{
if(((struct ethhead*)rec)->nextprot==0x0806)arpans();
sentstr(rec,reclen);

}




        }
}

/* 延时t毫秒 */
void delay(uint t)
{
        uint i;
        while(t--)
        {
                /* 对于12M时钟，约延时1ms */
                for (i=0;i<125;i++)
                {}
        }
}

/* RTL8019AS热复位 */
void NICRst()
{
        uchar i,tmp;
        tmp = REG1f;                        // 读RTL8019AS的复位端口
        REG1f = tmp;                        // 写RTL8019AS的复位端口
        for(i=0;i<250;i++);         // 适当延时
}

/* 通过CR寄存器的PS1和PS0设置寄存器页 */
void SelectPage(uchar pagenum)
{
        uchar tmp;
        tmp = REG00;
        tmp = tmp&0x3B;                                // 注意不是0x3F，TXP位在不发送时要置0
        pagenum = pagenum<<6;
        tmp = tmp|pagenum;
        REG00 = tmp;
}

/* 初始化RTL8019AS，PAGE2寄存器只读，PAGE3寄存器不是NE2000兼容的，均不用设置 */
/* 使用0x40-0x4b为网卡的发送缓冲区，共12页，刚好存储2个最大的以太网数据包。
   使用0x4c-0x7f为网卡的接收缓冲区，共52页。因此PSTART=0x4c，PSTOP=0x80
   (0x80为停止页，接收缓冲区直到0x7f，不包括0x80）。刚开始时，网卡没有接收
   到任何数据包，因此BNRY设置为指向第一个接收缓冲区的页0x4c） */
void RTL8019Init()
{
        REG00 = 0x21;        // 选择页0的寄存器，网卡停止运行，因为还没有初始化

        REG01 = 0x4c;        // 寄存器PSTART，设置接收缓冲区的起始页的地址
        REG02 = 0x80;        // 寄存器PSTOP，设置接收缓冲区的结束页的地址
        REG03 = 0x4c;         // 寄存器BNRY，设置为指向第一个接收缓冲区的页0x4c（用作读指针）
        REG04 = 0x40;         // 寄存器TPSR，发送起始页地址初始化为指向第一个发送缓冲区的页
        REG0c = 0xcc;         /* 接收配置寄存器RCR，设置为仅接收自己地址的数据包以及广播地址
                                        和多点播送地址数据包，小于64字节的包丢弃，校验错的数据包不接收 */
        REG0d = 0xe0;         // 发送配置寄存器TCR，设置为启用crc自动生成和校验，正常模式工作
        REG0e = 0xc8;         /* 数据配置寄存器DCR，设置为使用FIFO缓存，普通模式，8位数据传输，
                                           字节顺序为高位字节在前，低位字节在后 */
        REG0f = 0xff;         // 中断屏蔽寄存器IMR，设置为屏蔽所有中断，若为0xff则使能所有中断
        SelectPage(1);         // 选择页1的寄存器
        REG07=0x4d;         // 寄存器CURR，设置为指向当前正在写的页的下一页（用作写指针）

        /* 多址地址寄存器MAR0-MAR7均设置为0x00 */
        REG08 = 0x00;         // MAR0
        REG09 = 0x00;         // MAR1
        REG0a = 0x00;         // MAR2
        REG0b = 0x00;         // MAR3
        REG0c = 0x00;         // MAR4
        REG0d = 0x00;         // MAR5
        REG0e = 0x00;         // MAR6
        REG0f = 0x00;         // MAR7

        setmac();        // 获取以太网物理地址

        REG00 = 0x22;         // 选择页0寄存器，执行命令。
}

/* 上电后清除ISR寄存器 */
void ClearISR()
{
        SelectPage(0);
        REG07 = REG07|0xff;       
}

/* 获取以太网物理地址 */
void setmac()
{

//        SelectPage(0);                        // 选择页0
//        REG08 = 0;                                // 远程DMA起始地址低位寄存器RSAR0，设置为0
//        REG09 = 0;                                // 远程DMA起始地址高位寄存器RSAR1，设置为0        
//        REG0a = 12;                                // 远程DMA计数器低位寄存器RBCR0，设置为12
//        REG0b = 0;                                 // 远程DMA计数器高位寄存器RBCR1，设置为0
       
//        REG00 = 0x0a;                        // 远程DMA，启动命令

        SelectPage(1);                        // 选择页1
//        tmp = REG10;                    // 读取一个字节
        REG01 = mymac[0];                        // 写入PAR0
//        tmp = REG10;                        // 读取一个重复的字节，这个字节被丢弃
//        tmp = REG10;                    // 读取一个字节
        REG02 = mymac[1];                        // 写入PAR1
//        tmp = REG10;                        // 读取一个重复的字节，这个字节被丢弃
//        tmp = REG10;                    // 读取一个字节
        REG03 = mymac[2];                        // 写入PAR2
//        tmp = REG10;                        // 读取一个重复的字节，这个字节被丢弃
//        tmp = REG10;                    // 读取一个字节
        REG04 =mymac [3];                        // 写入PAR3
//        tmp = REG10;                        // 读取一个重复的字节，这个字节被丢弃
//        tmp = REG10;                    // 读取一个字节
        REG05 = mymac[4];                        // 写入PAR4
//        tmp = REG10;                        // 读取一个重复的字节，这个字节被丢弃
//        tmp = REG10;                    // 读取一个字节
        REG06 = mymac[5];                        // 写入PAR5
        SelectPage(0);
}


void sentdata(struct packet *mypk )
  {unsigned int i,len;
struct packet *tmppk;

len =mypk->len;

                                                        tmppk=mypk->nextpk;       
                                                         while(tmppk!=NULL)
                                                         {
                                                         len+=tmppk->len;
                                                         tmppk=tmppk->nextpk;
                                                                }




  REG00=0x21;
  REG07=0x0a;
  //REG08=0x40;
  //REG09=0x00;
  REG08=0x00;
  REG09=0x40;


                                  REG0b=len>>8;
                                  REG0a=len&0x00ff;


   REG00=0x12;

  tmppk=mypk;

        while(tmppk!=NULL)
        {
  for(i=0;i<tmppk->len;i++)
  {
   REG10=*((tmppk->dat)+i);

  }
        tmppk=tmppk->nextpk;
   }


   REG04=0x40;
   
    if(len<60) len=60;
  REG05=len&0xff;
  REG06=len>>8;


   REG00=0x24;       

  }         

        /*
void sentdata(struct ethhead *eth,unsigned char ethlen, struct arppk *arp,unsigned int arplen)
  {unsigned int i,len;
  REG00=0x21;
  REG07=0x0a;
  //REG08=0x40;
  //REG09=0x00;
  REG08=0x00;
  REG09=0x40;
  len=ethlen+arplen;

                                  REG0b=len>>8;
                                  REG0a=len&0x00ff;


   REG00=0x12;

  for(i=0;i<ethlen;i++)
  {
   REG10=*eth;
   eth++;

  }
    for(i=0;i<arplen;i++)
  {
   REG10=*arp;
   arp++;

  }

   REG04=0x40;
   
    if(len<60) len=60;
  REG05=len&0xff;
  REG06=len>>8;


   REG00=0x24;

  }         



void sentdata(unsigned char *dat,unsigned int len)
  {unsigned int i;
  REG00=0x21;
  REG07=0x0a;
  //REG08=0x40;
  //REG09=0x00;
  REG08=0x00;
  REG09=0x40;


                                  REG0b=len>>8;
                                  REG0a=len&0x00ff;


   REG00=0x12;

  for(i=0;i<len;i++)
  {
   REG10=*dat;
   dat++;

  }

   REG04=0x40;
   
    if(len<60) len=60;
  REG05=len&0xff;
  REG06=len>>8;


   REG00=0x24;

  }        */       

receivedata(char *dat)
{
unsigned char tmp,nextpage;
        unsigned int i;
        char bnry,curr;
         SelectPage(0);
        bnry=REG03;
        SelectPage(1);
        curr=REG07;
        bnry++;
        if(bnry>0x7f)bnry=0x4c;


                if(bnry!=curr)
                {
                SelectPage(0);
                REG08=0x00;
                REG09=bnry;
                REG0a=0x00;
                REG0b=04;                          
                REG00=0x0a;

         tmp=REG10;
         nextpage=REG10;
         reclen=REG10;
         tmp=REG10;
         reclen+=tmp<<8;
                REG00=0x22;

        REG08=4;
        REG09=bnry;
        REG0b=reclen>>8;
        REG0a=reclen&0x00ff;
        reclen-=4;
        REG00=0x0a;

                for(i=0;i<reclen;i++)
                {dat=REG10;
       
                  }
                   REG00=0x0a;

                  bnry=nextpage-1;
                  if(bnry<0x4c)bnry=0x7f;
                  REG03=bnry;
                  REG07=0xff;
                        return 1;
                }
         return 0;
                                         
}

wzhansen

MARK

tanguicaicai

学习下~~~