自己动手编写嵌入式Bootloader之（2）

第二部分：通过网口下载内核映像

要实现通过网口下载文件的功能，从底层到上层需要做的工作包括：开发板上的网卡芯片的驱动程序；TCP/IP协议栈的实现；TFTP客户端应用程序的实现。我们使用的OK2440开发板配备CS8900A网卡芯片。 为了简单起见，网络数据包的发送和接收都使用轮询方式，不使用中断；协议栈只使用ARP/IP/UDP协议，不涉及TCP及其他协议；应用程序只实现最简单的TFTP客户端。

1. 全局配置信息

发送和接收的数据缓冲区，使用全局静态缓冲区，不使用动态内存分配。第一阶段运行结束之后，CPU内部4KB的SteppingStone可以用作其它用途，我们就用它做网络数据接收、发送的缓冲区。亦可用作标准输入输出的缓冲区。
unsigned char *TxBuf = (unsigned char *)0;
unsigned char *RxBuf = (unsigned char *)1024;

使用若干个全局变量来保存网络配置信息：
unsigned char    NetOurEther[6] =            /* Our ethernet address        */
        {0x00, 0x09, 0x58, 0xD8, 0x11, 0x22};
开发板的MAC地址，这个是任意设置的。

unsigned char    NetServerEther[6] =            /* Boot server enet address    */
    {0x00, 0x14, 0x2A, 0xA5, 0x50, 0x97};
服务器也就是主机的MAC地址，这个要跟主机MAC一致，可以在主机上运行ifconfig命令查到。

unsigned long    NetOurIP = 0xC0A801FC;        /* Our IP addr 192.168.1.252    */
unsigned long    NetServerIP = 0xC0A801F9;       /* Server IP   192.168.1.249    */
网络协议中IP地址一般是用一个4字节整型数表示的。

2. CS8900A以太网驱动程序

static unsigned short get_reg (int regno) {     CS8900_PPTR = regno;     return CS8900_PDATA; }   static void put_reg (int regno, unsigned short val) {     CS8900_PPTR = regno;     CS8900_PDATA = val; }

put_reg (PP_IA + 0, 0x00 | 0x09 << 8);     put_reg (PP_IA + 2, 0x58 | 0xD8 << 8);     put_reg (PP_IA + 4, 0x11 | 0x22 << 8);

因为是Little Endian, 所以0x09<<8， 但是在寄存器内存中还是 0x00放在前面。

/* 只接收目标地址为本网卡的无错误数据包 */     put_reg (PP_RxCTL, PP_RxCTL_IA | PP_RxCTL_Broadcast | PP_RxCTL_RxOK);     /* 当进行接收操作时，不要产生任何中断 */     put_reg (PP_RxCFG, 0);     /* 当进行发送操作时，不要产生任何中断 */     put_reg (PP_TxCFG, 0);     /* 当进行缓存操作时，不要产生任何中断 */     put_reg (PP_BufCFG, 0);     /* 使能发送和接收模式 */     put_reg (PP_LineCTL, PP_LineCTL_Rx | PP_LineCTL_Tx);

发送数据包：

/* initiate a transmit sequence */     CS8900_TxCMD = PP_TxCmd_TxStart_Full;     CS8900_TxLEN = length;

使用TxCMD下达发送数据的命令后，再读取 PP_BusSTAT 总线状态寄存器判断是否做好发送数据的准备。当get_reg (PP_BusSTAT) & PP_BusSTAT_TxRDY 不等于零时表示可以发送了。 使用一个循环进行实际的发送操作：

for (addr = packet; length > 0; length -= 2)         {             CS8900_RTDATA = *addr++;         }

这里 addr 也是unsigned short类型的指针， 每次向CS8900_RTDATA写入两个字节数据。这里假设要发送的数据包长度为偶数。

最后，通过读取PP_TER寄存器可以知道是否发送完毕，是否发送成功。

接收数据包：

首先，通过读取PP_RER寄存器判断是否接收到数据。如果接收到数据，则连续两次读取 CS8900_RTDATA 的值，
    status = CS8900_RTDATA;        /* stat */
    rxlen = CS8900_RTDATA;        /* len */
rxlen 为接收到的数据长度。
然后用一个循环连续读取 rxlen 长度的数据：

for (addr = (unsigned short *) &RxBuf[0], i = rxlen >> 1; i > 0;          i--)         *addr++ = CS8900_RTDATA;     if (rxlen & 1)         *addr++ = CS8900_RTDATA;

其中 RxBuf 为预先在内存中开辟的一块接收缓冲区。 每次循环读取两个字节，还需要处理长度为奇数的情况。

最后，把RxBuf交给上层的协议处理：net_receive( &RxBuf[0], rxlen );

3. Ethernet MAC层协议的实现

上层的数据包（如IP包、ARP包）到来时，需要添加一个14字节的MAC头， 然后再交给网卡发送出去。 MAC头包含目的MAC地址、源MAC地址、协议类型三个字段。如下图所示。数据包末尾的CRC校验我们不使用。


使用下面的代码填充MAC头。其中协议类型，对IP为0x0800, 对ARP为0x0806

struct mac_header *p = (struct mac_header*)(buf);     memcpy (p->dest, NetServerEther, 6);     memcpy (p->src, NetOurEther, 6);     p->proto = htons(proto);

4. ARP协议的实现

    ARP数据包长度为28字节，其中各字节的含义如下图所示：


对各个段作简单的解释：
Hardware type (HTYPE)  每个数据链路层协议都被分配到一个数，比如，Ethernet 是 1
Protocol type (PTYPE)  在这个域，每个网络层协议都被分配到一个数（标号），比如，IP是0x0800
Hardware length (HLEN)  硬件地址的长度。以太网Ethernet的MAC地址长度是6个字节
Protocol length (PLEN)  维基上写的是“逻辑地址”的长度，其实也就是网络层地址的长度。IPv4地址的长度为4个字节。
Operation  表明发送者的操作，也就是数据包的类型：1表示ARP请求；2表示ARP回应；3表示RARP请求；4表示RARP回应。
Sender hardware address (SHA)  发送者的硬件地址
Sender protocol address (SPA)  发送者的协议地址，也就是发送者IP地址。
Target hardware address (THA)  目标接收者的硬件MAC地址。如果是ARP请求，这个域被忽略。
Target protocol address (TPA)  目标接收者的IP地址。

知道了包结构，我们就可以设计一个结构体:

struct arp_header{     unsigned short        ar_hrd;        /* Format of hardware address    */     unsigned short        ar_pro;        /* Format of protocol address    */     unsigned char        ar_hln;     /* Length of hardware address    */     unsigned char        ar_pln;     /* Length of protocol address    */     unsigned short        ar_op;        /* Operation            */     unsigned char        ar_sha[6];    /* Sender hardware address    */     unsigned long        ar_spa;     /* Sender protocol address    */     unsigned char        ar_tha[6];    /* Target hardware address    */     unsigned long        ar_tpa;     /* Target protocol address    */ }__attribute__ ((packed));

属性 __attribute__((packet)) 告诉编译器使用紧缩方式存放结构体内容（1 Byte align）， 不使用默认的4字节对齐， 这样就不会产生冗余字节。此时的 sizeof(struct arp_header) = 28。 如果不加packed属性， 运行 sizeof(struct arp_header) 得到 32， 而不是 28。 数据段就产生了错位。

前面已经说过，我们只实现接收ARP请求并发送ARP应答的功能，因此只用一个简单的函数就可实现：

static int arp_handle( unsigned char *buf, unsigned int len ) {     struct arp_header *pRx, *pTx;     pRx = (struct arp_header *)(buf);     pTx = (struct arp_header *)&TxBuf[256];     switch (htons(pRx->ar_op))     {         case ARP_REQUEST:             if (pRx->ar_tpa == htonl(NetOurIP))             {                 pTx->ar_hrd = htons(0x01);                 pTx->ar_pro = htons(PROTO_IP);                 pTx->ar_hln = 0x06;                 pTx->ar_pln = 0x04;                 pTx->ar_op = htons(ARP_REPLY);                 memcpy(pTx->ar_sha, NetOurEther, 6);                 pTx->ar_spa = htonl(NetOurIP);                 memcpy (pTx->ar_tha, pRx->ar_sha, 6);                       pTx->ar_tpa = pRx->ar_spa;                 mac_send( (unsigned char*)pTx, sizeof(struct arp_header), PROTO_ARP);             }             break;         case ARP_REPLY:             printf("/n/rGot ARP reply/n");             break;         default:             printf("/n/r ar_op Not Support./n");             break;     }     return 0; }

接收到的数据保存在pRx地址处，要发送的数据地址指定为pTx位于发送缓冲区中。如果接收到的是ARP请求包并且IP地址也符合，则在pTx处构造一个ARP应答包并交给mac_send（）发送出去。

5. IP协议的实现

IP数据包的格式如下表所示：

struct ip_header *p = (struct ip_header*)(buf);     p->ver_ihl = 0x45;                  // 1 Byte     p->tos = 0x00;                      // 1 Byte     p->tlen = htons(len);               // 2 Byte     p->identification = htons(0x00);    // 2 Byte     p->flags_fo = htons(0x4000);        // 2 Byte     p->ttl = 0xFF;                      // 1 Byte     p->proto = 17;                      // 1 Byte, 17 for UDP     p->ip_src = htonl(NetOurIP);        // 4 Byte     p->ip_dest = htonl(NetServerIP);    // 4 Byte     p->crc = 0x0;                       // 2 Byte, To be     p->crc = checksum( buf, sizeof(struct ip_header) );

CheckSum 校验和：
IP，TCP,UDP等许多协议的头部都设置了校验和项，它们采用的算法是一样的，将被校验的数据按16位进行划分（若数据字节长度为奇数，则在数据尾部补一个字节0），对每16位求反码和，然后再对和取反码。 代码如下：

unsigned short checksum(unsigned char *ptr, int len) {     unsigned long sum = 0;     unsigned short *p = (unsigned short *)ptr;     while (len > 1)     {         sum += *p++;         len -= 2;     }     if(len == 1)         sum += *(unsigned char *)p;     while(sum>>16)         sum = (sum&0xffff) + (sum>>16);     return (unsigned short)((~sum)&0xffff); }

6. UDP协议的实现

struct udp_header *P = (struct udp_header*)(buf);     P->port_src = htons(0x8DA4); // 2 Byte     P->port_dest = htons(port);  // 2 Byte     P->tlen = htons(len);        // 2 Byte     P->crc = 0x00;               // Do Not Checksum, 2 Byte

关于源端口号和目的端口号的设定，在TFTP实现时会详细说明。

7. TFTP客户端的实现

tftp是一个很简单的文件传输协议，在传输层使用UDP协议。它有四种类型的包： 读请求RRQ包，DATA包，ACK包，ERROR包，每个包的前两个字节Opcode指定包的类型。（RRQ用于请求下载，WRQ用于请求上传，我们只用到RRQ）。

int tftp_download(unsigned char *addr, const char *filename) {     int i=0;     unsigned short curblock = 1;     tftp_send_request( &TxBuf[256], filename );     msdelay(100);     while (1)     {         eth_rx();                if( pGtftp == NULL )             continue;                  if ( ntohs(pGtftp->opcode) == TFTP_DATA )         {             if (ntohs(pGtftp->u.blocknum) == curblock)             {                 printf("/r Current Block Number = %d", curblock);                 for (i=0; i<iGLen-4; i++)                 {                     *(addr++) = *(pGtftp->data+i);                 }                 tftp_send_ack( &TxBuf[256], curblock);                                  if (iGLen < TFTP_DATASIZE+4)                 {                     break;                 }                 curblock += 1;             }             else if (ntohs(pGtftp->u.blocknum) < curblock)             {                 tftp_send_ack( &TxBuf[256], ntohs(pGtftp->u.blocknum));             }             else             {                 printf("/n/rBlock Number Not Match.");                 printf("Block Number = %d, curblock = %d/n", ntohs(pGtftp->u.blocknum), curblock);               }         }         else if ( ntohs(pGtftp->opcode) == TFTP_ERROR )         {             switch( ntohs(pGtftp->u.errcode) )             {                // 此处省略             }         }         else if ( ntohs(pGtftp->opcode) == TFTP_RRQ )         {}// 此处省略若干 else if                 pGtftp = NULL;         iGLen = 0;     }          printf("/n/rTransfer complete: %d Bytes./n/r", (curblock-1)*TFTP_DATASIZE + iGLen-4 );          return 0; }