[置顶] UIP成功移植到CC2530上

      最近老板有个项目，其中要做一个Zigbee的无线接入点，即将ZigBee无线传感网络中的数据通过TCP/IP协议传输到以太网上。传统的这种无线接入点即网关都是上位机加下位机模式做成的，即主控芯片（如ARM）加无线模块（如cc2530），ARM与cc2530通过UARST通信，cc2530建立WSN网络，ARM与PC机通过TCP/IP通信，考虑到此系统的成本以及其中的数据传输量不大，就不用ARM，直接将cc2530做成网关，这就需要将TCP/IP协议栈移植到cc2530上，同时与ZigBee协议栈能很好的协同运行。

       因为cc2530的FLASH有256K,Z-stack占用了大部分，所以要用TCP/IP,只能移植一个轻量型网络协议栈，现在比较流行的就是Adam Dunkels写的lwIP和uIP,还有Micrium的uc/IP，lwip和uc/ip所占空间较大，移植较为麻烦，所以就用uip。uip是一种免费可的极小的TCP/IP协议栈，主要实现了ARP，ICMP，TCP，UDP协议，在8位或16位单片机上用的较多，对rom和ram要求很少。

       在网上看了一些uip移植到51或STM32的文章，同时也花了两天时间看了uip的实现源码，如果不熟悉TCP/IP协议的话读起来还是很吃力，所以先看看TCP/IP,建议看TCP/IP协议详解——卷一。看完之后大概知道移植过程了。

       移植之前先要写网络芯片驱动程序，我用的是enc28j60，独立控制的SPI接口，因为cc2530的spi接口用来下载调试了，另一个spi被串口复用了，所以只用用GPIO模拟SPI。

      写驱动程序之前认真读了enc28j60的datasheet，在网上也找到了相关的驱动程序，可以稍加修改拿来用。下面贴出spi程序和enc28j60的程序。

 

#include "spi.h"

void WriteByte(u8_t dat)
{
  u8_t i;
  for(i=0;i<8;i++)
  {
    SCKN = 0;
    asm("nop");
    if(dat&0x80)
    {
       SIN = 1;
    }
    else 
       SIN = 0;
    dat <<= 1;
    asm("nop");
    SCKN = 1;
    asm("nop");
  }
  SCKN=0; //空闲状态为低电平
}

u8_t ReadByte(void)
{
  u8_t i,dat;
  SCKN=0;
  dat1=0;
  for(i=0;i<8;i++)
  {	
    SCKN=1;
    dat1 <<=1;
    dat1 |= SON; 
    SCKN=0;	
  }
  return dat;
}

 

     spi.h文件定义了与enc28j60spi接口的GPIO，

       

#ifndef SPI_H
#define SPI_H
#include <ioCC2530.h>

#define SON   P0_5    // MISO
#define SIN   P0_6    // MOSI
#define SCKN  P0_7    // SCK
#define CSN   P1_3    // 28J60-- CS
#define RESET P1_2    // Reset 

void WriteByte(u8_t dat);
u8_t ReadByte(void);

#endif

 

        enc28j60.c文件：

#include "enc28j60.h"
#include "spi.h"

#define MIN(a,b) (a) < (b) ? (a) : (b)
XDATA u8_t Enc28j60Bank;
XDATA u16_t NextPacketPtr;

void delay_100ns()
{
     asm("nop");
     asm("nop");
     asm("nop");
}

void delay_ms(int t1)
{ 
     int i; 
     while(t1--) 
     {
	for(i=10;i;--i)
        {
           delay_100ns();
        }
     } 
}

//*******************************************************************************************
//
// Function : enc28j60ReadOp
// Description : 
//
//*******************************************************************************************
u8_t enc28j60ReadOp(u8_t op, u8_t address)
{
    u8_t dat1;
    // activate CS	
    CSN =0;
    // issue read command
    delay_100ns();
    WriteByte(op | (address & ADDR_MASK));	
    dat1 = ReadByte();
    // do dummy read if needed (for mac and mii, see datasheet page 29)
    if(address & 0x80) 	dat1 = ReadByte();
    // release CS
    CSN=1;
    return(dat1);
}
//*******************************************************************************************
//
// Function : enc28j60WriteOp
// Description : 
//
//*******************************************************************************************
void enc28j60WriteOp(u8_t op, u8_t address, u8_t mydat)
{
    CSN=0;
    // issue write command
    delay_100ns();
    WriteByte( op | (address & ADDR_MASK));
    // write data
    WriteByte(mydat);
    CSN=1;
    delay_100ns();
}
//*******************************************************************************************
//
// Function : icmp_send_request
// Description : Send ARP request packet to destination.
//
//*******************************************************************************************
void enc28j60SetBank(u8_t address)
{
    // set the bank (if needed)
    if((address & BANK_MASK) != Enc28j60Bank)
    {
        // set the bank
        enc28j60WriteOp(ENC28J60_BIT_FIELD_CLR, ECON1, (ECON1_BSEL1|ECON1_BSEL0));
        enc28j60WriteOp(ENC28J60_BIT_FIELD_SET, ECON1, (address & BANK_MASK)>>5);
        Enc28j60Bank = (address & BANK_MASK);
    }
}
//*******************************************************************************************
//
// Function : icmp_send_request
// Description : Send ARP request packet to destination.
//
//*******************************************************************************************
u8_t enc28j60Read(u8_t address)
{
    // select bank to read
    enc28j60SetBank(address);	
    // do the read
    return enc28j60ReadOp(ENC28J60_READ_CTRL_REG, address);
}
//*******************************************************************************************
//
// Function : icmp_send_request
// Description : Send ARP request packet to destination.
//
//*******************************************************************************************
void enc28j60Write(u8_t address, u8_t mydat)
{
    // select bank to write
    enc28j60SetBank(address); 
    // do the write
    enc28j60WriteOp(ENC28J60_WRITE_CTRL_REG, address, mydat);
}
//*******************************************************************************************
//
// Function : icmp_send_request
// Description : Send ARP request packet to destination.
//
//*******************************************************************************************
u16_t enc28j60_read_phyreg(u8_t address)
{
    u16_t mydat;
    // set the PHY register address
    enc28j60Write(MIREGADR, address);
    enc28j60Write(MICMD, MICMD_MIIRD);
    // Loop to wait until the PHY register has been read through the MII
    // This requires 10.24us
    while( (enc28j60Read(MISTAT) & MISTAT_BUSY) );
    
    // Stop reading 这里应该清零
    //enc28j60Write(MICMD, MICMD_MIIRD);
    enc28j60Write(MICMD, 0x0);
    // Obtain results and return
    mydat = enc28j60Read ( MIRDL );
    //PrintHex(mydat);
    //mydat |= enc28j60Read ( MIRDH ); //此地方源代码有误 改成
    mydat |= (enc28j60Read ( MIRDH )<<8);
   // PrintHex(mydat);
    return mydat;
} 
//*******************************************************************************************
//
// Function : icmp_send_request
// Description : Send ARP request packet to destination.
//
//*******************************************************************************************
void enc28j60PhyWrite(u8_t address, u16_t mydat)
{
	// set the PHY register address
    enc28j60Write(MIREGADR, address);
    // write the PHY data
    enc28j60Write(MIWRL, mydat & 0x00ff);
    enc28j60Write(MIWRH, mydat >> 8);
    // wait until the PHY write completes
    while(enc28j60Read(MISTAT) & MISTAT_BUSY)
    {
            delay_100ns();
    }
}

void enc28j60ReadBuffer(u16_t len, u8_t* dat)
{
    // assert CS
    CSN = 0;
    // issue read command
    delay_100ns();
    WriteByte(ENC28J60_READ_BUF_MEM);         
    while(len--)
    {
       *dat++ = ReadByte();
    }	
    // release CS
    CSN = 1;
}

void enc28j60WriteBuffer(u16_t len, u8_t* dat)
{
    // assert CS
    CSN = 0; 
    // issue write command 
    WriteByte(ENC28J60_WRITE_BUF_MEM);
    // while(!(SPSR & (1<<SPIF)));
    while(len--)
    {      
       WriteByte(*dat++);
    }	
    // release CS
    CSN = 1;
}

#define ETHERNET_MIN_PACKET_LENGTH	0x3C
#define ETHERNET_HEADER_LENGTH		0x0E
#define IP_TCP_HEADER_LENGTH 40
#define TOTAL_HEADER_LENGTH (IP_TCP_HEADER_LENGTH+ETHERNET_HEADER_LENGTH)

void enc28j60PacketSend(u16_t len, u8_t* packet)
{
    // Set the write pointer to start of transmit buffer area
    enc28j60Write(EWRPTL, TXSTART_INIT);
    enc28j60Write(EWRPTH, TXSTART_INIT>>8);
    // Set the TXND pointer to correspond to the packet size given
    enc28j60Write(ETXNDL, (TXSTART_INIT+len));
    enc28j60Write(ETXNDH, (TXSTART_INIT+len)>>8);
    // write per-packet control byte
    enc28j60WriteOp(ENC28J60_WRITE_BUF_MEM, 0, 0x00);
    // TODO, fix this up
    if( uip_len <= TOTAL_HEADER_LENGTH )
    {
        // copy the packet into the transmit buffer
        enc28j60WriteBuffer(len, packet);
    }
    else
    {
        len -= TOTAL_HEADER_LENGTH;
        enc28j60WriteBuffer(TOTAL_HEADER_LENGTH, packet);
        enc28j60WriteBuffer(len, (unsigned char *)uip_appdata);
    }
    // send the contents of the transmit buffer onto the network
    enc28j60WriteOp(ENC28J60_BIT_FIELD_SET, ECON1, ECON1_TXRTS);
}

u16_t enc28j60PacketReceive(u16_t maxlen, u8_t* packet)
{
    u16_t rxstat,len;
    if (enc28j60Read(EPKTCNT) == 0)
    { 
      return 0;
    }
// Set the read pointer to the start of the received packet
    enc28j60Write(ERDPTL, (NextPacketPtr));
    enc28j60Write(ERDPTH, (NextPacketPtr)>>8);
// read the next packet pointer
    NextPacketPtr  = enc28j60ReadOp(ENC28J60_READ_BUF_MEM, 0);
    NextPacketPtr |= (enc28j60ReadOp(ENC28J60_READ_BUF_MEM, 0)<<8);     
// read the packet length
    len  = enc28j60ReadOp(ENC28J60_READ_BUF_MEM, 0);
    len |= (enc28j60ReadOp(ENC28J60_READ_BUF_MEM, 0)<<8);
    len -= 4; //以太帧最小46字节 减去4字节的FCS校验和 加上帧头14字节 共64字节
 //PrintHex(len);
// read the receive status
    rxstat  = enc28j60ReadOp(ENC28J60_READ_BUF_MEM, 0);
    rxstat |= enc28j60ReadOp(ENC28J60_READ_BUF_MEM, 0)<<8;
// limit retrieve length
    // (we reduce the MAC-reported length by 4 to remove the CRC)
    len = MIN(len, maxlen);
// copy the packet from the receive buffer
    enc28j60ReadBuffer(len, packet);
// Errata workaround #13. Make sure ERXRDPT is odd
    u16_t rs,re;
    rs = enc28j60Read(ERXSTH);
    rs <<= 8;
    rs |= enc28j60Read(ERXSTL);
    re = enc28j60Read(ERXNDH);
    re <<= 8;
    re |= enc28j60Read(ERXNDL);
    if (NextPacketPtr - 1 < rs || NextPacketPtr - 1 > re)
    {
        enc28j60Write(ERXRDPTL, (re));
        enc28j60Write(ERXRDPTH, (re)>>8);
    }
    else
    {
        enc28j60Write(ERXRDPTL, (NextPacketPtr-1));
        enc28j60Write(ERXRDPTH, (NextPacketPtr-1)>>8);
    }
// decrement the packet counter indicate we are done with this packet
    enc28j60WriteOp(ENC28J60_BIT_FIELD_SET, ECON2, ECON2_PKTDEC);       
    return len;
}

void dev_init(void)
{
    enc28j60_init();
}

void dev_send(void)
{
    enc28j60PacketSend(uip_len, uip_buf);
}

u16_t dev_poll(void)
{
    return enc28j60PacketReceive(UIP_BUFSIZE, uip_buf);
}

void enc28j60_init(void)
{
//SPI INIT
    SpiInit();    
// perform system reset
    enc28j60WriteOp(ENC28J60_SOFT_RESET, 0, ENC28J60_SOFT_RESET);
// check CLKRDY bit to see if reset is complete
    //while(!(enc28j60Read(ESTAT) & ESTAT_CLKRDY));
    // Errata workaround #2, CLKRDY check is unreliable, delay 1 mS instead
    delay_ms(5);
// lamp test
// enc28j60PhyWrite(PHLCON, 0x0AA2);
    
// do bank 0 stuff
    // initialize receive buffer
    // 16-bit transfers, must write low byte first
// set receive buffer start address
    NextPacketPtr = RXSTART_INIT;
    enc28j60Write(ERXSTL, RXSTART_INIT&0xFF);
    enc28j60Write(ERXSTH, RXSTART_INIT>>8);
// set receive pointer address
    enc28j60Write(ERXRDPTL, RXSTART_INIT&0xFF);
    enc28j60Write(ERXRDPTH, RXSTART_INIT>>8);
// set receive buffer end
    // ERXND defaults to 0x1FFF (end of ram)
    enc28j60Write(ERXNDL, RXSTOP_INIT&0xFF);
    enc28j60Write(ERXNDH, RXSTOP_INIT>>8);
// set transmit buffer start
    // ETXST defaults to 0x0000 (beginnging of ram)
    enc28j60Write(ETXSTL, TXSTART_INIT&0xFF);
    enc28j60Write(ETXSTH, TXSTART_INIT>>8);     
// do bank 2 stuff
    // enable MAC receive
    enc28j60Write(MACON1, MACON1_MARXEN|MACON1_TXPAUS|MACON1_RXPAUS);
// bring MAC out of reset
    enc28j60Write(MACON2, 0x00);
// enable automatic padding and CRC operations
    enc28j60WriteOp(ENC28J60_BIT_FIELD_SET, MACON3, MACON3_PADCFG0|MACON3_TXCRCEN|MACON3_FRMLNEN);
// enc28j60Write(MACON3, MACON3_PADCFG0|MACON3_TXCRCEN|MACON3_FRMLNEN);
    // set inter-frame gap (non-back-to-back)
    enc28j60Write(MAIPGL, 0x12);
    enc28j60Write(MAIPGH, 0x0C);
// set inter-frame gap (back-to-back)
    enc28j60Write(MABBIPG, 0x12);
// Set the maximum packet size which the controller will accept
    enc28j60Write(MAMXFLL, MAX_FRAMELEN&0xFF);	
    enc28j60Write(MAMXFLH, MAX_FRAMELEN>>8);
// do bank 3 stuff
    // write MAC address
    // NOTE: MAC address in ENC28J60 is byte-backward
    enc28j60Write(MAADR5, UIP_ETHADDR0);
    enc28j60Write(MAADR4, UIP_ETHADDR1);
    enc28j60Write(MAADR3, UIP_ETHADDR2);
    enc28j60Write(MAADR2, UIP_ETHADDR3);
    enc28j60Write(MAADR1, UIP_ETHADDR4);
    enc28j60Write(MAADR0, UIP_ETHADDR5);  
// no loopback of transmitted frames
    enc28j60PhyWrite(PHCON2, PHCON2_HDLDIS);
// switch to bank 0
    enc28j60SetBank(ECON1);
// enable interrutps
    enc28j60WriteOp(ENC28J60_BIT_FIELD_SET, EIE, EIE_INTIE|EIE_PKTIE);
// enable packet reception 
    enc28j60WriteOp(ENC28J60_BIT_FIELD_SET, ECON1, ECON1_RXEN);      
}

          在上面文件中有一个delay_100ns函数，为什么要写这个函数呢，看了enc28j60的输入输出的时序之后发现在cs置低之后只要要保持100ns，所以每次在写入之前都要延迟100ns左右。cc2530的时钟是32MHz，所以差不多3个机器周期就是100ns了。这个是要注意的地方，我在这之前，调试了半天，一直都没发现有网络数据包出来，然后再仔细读了datasheet才发现的。
       这个驱动根据datasheet写，或者参考网上的，哈哈，只要能实现就行了。         
       有了以上驱动程序就很好移植了！ 废话不多说，直接给移植步骤。
       在网上下载源码，我用的是uip0.9版本。编译环境是IAR，因为cc2530用的是IAR开发环境。

       接下来建立工程，如下图所示：

 

          将spi.c enc28j60.c即相关头文件放在driver目录下，将uip.c uip_arp.c uip_arch.c还有相关头文件放在uip目录下，
linker目录下放的是IAR8051的连接文件（可以不用），将应用程序main.c app.c app.h文件放在user目录下。
      将uip源代码中unix文件夹中的main函数改一下，其中tapdev_read函数替换成我们的dev_poll，将tapdev_send替换成dev_send，然后将http相关的东西删去，我们先实现简单的功能。
      根据源码文件夹中的doc文档，写个简单的历程。

       app.c的代码如下：

 

#include "app.h"
#include "uip.h"
void example1_init(void) 
{
   uip_listen(HTONS(1234));
}
void example1_appcall(void)
{
   struct example1_state *s;
   s = (struct example1_state *)uip_conn->appstate;  
   if(uip_connected()) {
      s->state = WELCOME_SENT;
      uip_send("Welcome!\n", 9);
      return;
   } 

   if(uip_acked() && s->state == WELCOME_SENT) {
      s->state = WELCOME_ACKED;
   }
   if(uip_newdata()) {
      uip_send("ok\n", 3);
   }
   if(uip_rexmit()) {
      switch(s->state) {
      case WELCOME_SENT:
         uip_send("Welcome!\n", 9);
         break;
      case WELCOME_ACKED:
         uip_send("ok\n", 3);
         break;
      }
   }
}

      对了，还有个重要的问题，就是大小端的问题，这个也是我调试好久未果的一个经验。cc2530是8051内核的，是小端，所以在uipopt.h文件中做如下改动
#ifndef BYTE_ORDER
#define BYTE_ORDER     LITTLE_ENDIAN
#endif /* BYTE_ORDER */  
      还有个编译设置的问题，具体按照如下来：

 

     好了，然后编译连接，过程中可能有一些警告和错误，一个一个耐心排除，很容易。
     用网线连上电脑，然后打开命令终端，输入ping 219.223.173.242  我主机ip是219.223.173.243
    如下结果：

           

 

        然后打开网络调试助手

 

 

     如程序需要的结果相同，哈哈！过几天实现一个web服务器！
    接下来的工作就是将uip移植到z-stack上，在cc2530上实现网关的功能！
    有需要源码的可以联系我！