原创 如何用W7100A实现DDNS客户端(二)

start:

//输入ISP’s DNS IP地址

for(x = 0; x<4; x++)

{

//将字符串分割成一个整数数组

if(x == 0)

split = strtok(tmp_str,".");

else

{

split = strtok(NULL,".");

}

dns_ip[x] = atoi(split);

//检测IP是否有效

if(dns_ip[x] >255 || dns_ip[x] < 0)

{

//检测到无效的IP，重新输入IP地址

goto start;

}

}

// 打印 DNS IP地址

// 输入网络服务器新的IP地址并且检测IP地址是否有效(与上面相同的代码)

//打印网络服务器的IP地址

for(x = 0; x<4; x++)

{

//从闪存中读取之前更新的IP地址

flash_ip[x] = EEP_Read(x);

}

// 比较之前的IP地址和当前的IP地址

if(memcmp(flash_ip,current_ip,4)==0)

{

//检测到相同的IP地址，通知用户并且离开

goto exit; // 退出程序

}

// 继续DDNS协议

dns_query(s,"members.dyndns.org"); //用DNS查询找到members.dyndns.org的IP地址

//去确认我们是否从DNS查询获得IP地址

if( dyndns_ip[0] == 0 && dyndns_ip[1] == 0 && dyndns_ip[2] == 0 && dyndns_ip[3] == 0)

{

//从主机名获取IP地址失败

goto start; // 请求用户重新输入DNS IP地址信息

}

//使用loop循环来发送请求并且接收来自服务器的响应

switch(getSn_SR(s)) //确认socket状态

{

case SOCK_CLOSED:

port++;

if(socket(s,Sn_MR_TCP, port, 0x00) == 1) // 打开TCP模式下的Socket

{

//创建socket成功

sent_flag = 0;

}

else

{

// 创建socket失败

close(s);

}

break;

case SOCK_INIT:

if(connect(s,dyndns_ip,80) == 1) // 连接到DynDNS服务器

{

//成功连接到服务器并且打印连接的IP地址

}

else

{

//连接服务器失败

}

break;

case SOCK_ESTABLISHED:

// 将用户名和密码编译成base64

base64_encode(user_pass,base64_user_pass,strlen(user_pass)); // 创建HTTP HET请求信息

sprintf(request_msg,"GET/nic/update?hostname=%s&myip=%s&wildcard=NOCHG&mx=NOCHG&backm x=NOCHG HTTP/1.1 \r\nHost: members.dyndns.org \r\nAuthorization: Basic %s \r\nUser-Agent:%s \r\n\r\n",host_name ,ip_addr_str ,base64_user_pass,user_agent);

//发送请求信息

send(s,request_msg,strlen(request_msg));

//确认接收缓存器中是否有数据 len = getSn_RX_RSR(s);

if (len > 0)

{

//确认接收到的数据长度是否比缓存器空间大

if(len > MAX_LENGTH) len = MAX_LENGTH;

len = recv(s, reply_msg, len); //将数据存放到reply_msg

}

break;

//在回复串中搜索更新成功

split = strstr(reply_msg,"good");

if(split != NULL)

{

//更新来自回复信息的解析数据成功

split_end = strstr(split,"\r\n0\r\n\r\n");

len = split_end - split;

//将最新的IP地址写入闪存

EEP_Block_Write(0,current_ip, 4);

//打印回应信息

}

else

{

//更新来自回复信息中的失败解析数据

split = strstr(reply_msg,"\r\n\r\n");

split = strstr(split+4,"\r\n");

split += 2;

split_end = strstr(split,"\r\n0\r\n\r\n");

len = split_end - split;

//打印回应信息

}

Void base64_encode(uint8* usrpwd,uint8* base64_userpwd,int len)

{

// 编码表

static char xdata encodingTable [64] = { 'A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z','a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z','0','1','2','3','4','5','6','7','8','9','+','/'};

uint8 xdata in_idx = 0; //输入缓存索引

uint8 xdata out_idx = 0; //输出缓存索引

uint8 xdata remaining = 0; //剩余待处理的字符串

uint8 xdata num = 0; //待处理的字符串数目

uint8 xdata tmp[100] = {0,}; // tmp字符串

num = (len%3); //确定有多少个字符串

if(num == 0)

{

remaining = len + (len/3); //计算编码字符串的长度

}

else

{

switch(num)

{

case 1: remaining = ((len *4)/3)+ 3; //计算编码字符串的长度 break;

case 2: remaining = ((len *4)/3)+ 2; // 计算编码字符串的长度 break;

default:

break;

}

}

while(remaining > 0)

{

//提取前6位并且插入到编码表中

tmp[out_idx] = (usrpwd[in_idx]&0xFC) >> 2;

base64_userpwd[out_idx] = encodingTable[tmp[out_idx]];

//提取下一个6位并且插入到编码表中

tmp[out_idx + 1] = (((usrpwd[in_idx]&0x03) <<4) | ((usrpwd[in_idx+1]&0xF0)>>4));

base64_userpwd[out_idx + 1] = encodingTable[tmp[out_idx + 1]];

//提取下一个6位并且插入到编码表中

tmp[out_idx + 2] = (((usrpwd[in_idx+1]&0x0F) <<2) | ((usrpwd[in_idx+2]&0xC0)>>6));

base64_userpwd[out_idx + 2] = encodingTable[tmp[out_idx + 2]];

//提权下一个6位并且插入到编码表中

tmp[out_idx + 3] = (usrpwd[in_idx+2]&0x3F);

base64_userpwd[out_idx + 3] = encodingTablse[tmp[out_idx + 3]];

//最后4位的特殊情况应用

if(remaining == 4)

{

switch(num)

{

case 1: // 添加字符 ‘==’到空白编译好的字符串 memcpy(base64_userpwd+out_idx + 2,"==",2);

break;

case 2: // 添加一个 ‘=’字符到空白编译好的字符串

tmp[out_idx + 2] = (((usrpwd[in_idx+1]&0x0F) <<2) | ((usrpwd[in_idx+2]&0xC0)>>6));

base64_userpwd[out_idx + 2] = encodingTable[tmp[out_idx + 2]]; memcpy(base64_userpwd+out_idx + 3,"=",1);

break;

default:

break;

}

}

out_idx += 4; // 索引递增

in_idx += 3; //索引递增

remaining -= 4; //剩余字符串计数器递减

}

}