444 lines
18 KiB
C
444 lines
18 KiB
C
#include <string.h>
|
||
#include "enc28j60.h"
|
||
#include "ip_arp_udp_tcp.h"
|
||
#include "net.h"
|
||
#include "hal.h"
|
||
#include "led.h"
|
||
//#include "uart.h"
|
||
#include "simple_server.h"
|
||
#include "general_type.h"
|
||
#include "temp.h"
|
||
#define PSTR(s) s
|
||
|
||
unsigned char i_1=0,i_2=0,i_3=0,i_4=0;
|
||
unsigned char led1=0,led2=0,led3=0,led4=0,led=0;
|
||
|
||
unsigned char temp[]={"0123456789ABCDEF"};
|
||
unsigned char temp1[]={"0123456789"};
|
||
u16 temp_1;
|
||
unsigned char temp_2[5];
|
||
unsigned char temp_3[7];
|
||
|
||
//extern void delay_ms(unsigned char ms);
|
||
|
||
// please modify the following two lines. mac and ip have to be unique
|
||
// in your local area network. You can not have the same numbers in
|
||
// two devices:
|
||
static unsigned char mymac[6] = {0x04,0x02,0x35,0x00,0x00,0x01};
|
||
//static unsigned char myip[4] = {192,168,0,100};
|
||
// base url (you can put a DNS name instead of an IP addr. if you have
|
||
// a DNS server (baseurl must end in "/"):
|
||
static unsigned int mywwwport =80; // listen port for tcp/www (max range 1-254)
|
||
// or on a different port:
|
||
//static char baseurl[]="http://10.0.0.24:88/";
|
||
//static unsigned int mywwwport =88; // listen port for tcp/www (max range 1-254)
|
||
//
|
||
static unsigned int myudpport =1200; // listen port for udp
|
||
// how did I get the mac addr? Translate the first 3 numbers into ascii is: TUX
|
||
|
||
#define BUFFER_SIZE 1500//400
|
||
static unsigned char buf[BUFFER_SIZE+1];
|
||
static unsigned char BUF;
|
||
// the password string (only the first 5 char checked), (only a-z,0-9,_ characters):
|
||
static char password[]="123456"; // must not be longer than 9 char
|
||
#define LED1_ON() LED1_RUN(1);
|
||
#define LED2_ON() LED2_RUN(1);
|
||
#define LED3_ON() LED3_RUN(1);
|
||
#define LED4_ON() LED4_RUN(1);
|
||
|
||
#define LED1_OFF() LED1_RUN(0);
|
||
#define LED2_OFF() LED2_RUN(0);
|
||
#define LED3_OFF() LED3_RUN(0);
|
||
#define LED4_OFF() LED4_RUN(0);
|
||
//
|
||
unsigned char verify_password(char *str)
|
||
{
|
||
// the first characters of the received string are
|
||
// a simple password/cookie:
|
||
//用 法: int strncmp(char *str1, char *str2, int maxlen);
|
||
//说明:比较字符串str1和str2的大小，如果str1小于str2，返回值就<0，反之如果str1大于str2，返回值就>0，
|
||
//如果str1等于str2，返回值就=0，maxlen指的是str1与str2的比较的字符数。
|
||
//此函数功能即比较字符串str1和str2的前maxlen个字符。
|
||
if (strncmp(password,str,5)==0)
|
||
{
|
||
return(1);
|
||
}
|
||
return(0);
|
||
}
|
||
|
||
// takes a string of the form password/commandNumber and analyse it
|
||
// return values: -1 invalid password, otherwise command number
|
||
// -2 no command given but password valid
|
||
unsigned char analyse_get_url(char *str)
|
||
{
|
||
unsigned char i=0;
|
||
if (verify_password(str)==0) //判断密码是否正确，函数返回0说明密码正确即verify_password(str)==0
|
||
{
|
||
return(-1); ////当验证是密码且是正确时就将-1返回跳出函数，不是密码或者密码错误就往下执行
|
||
}
|
||
// find first "/"
|
||
// passw not longer than 9 char:
|
||
while(*str && i<10 && *str >',' && *str<'{')
|
||
{
|
||
if (*str=='/')
|
||
{
|
||
str++;
|
||
break;
|
||
}
|
||
i++;
|
||
str++;
|
||
}
|
||
if (*str < 0x3a && *str > 0x2f) //当是ASCII码时将其返回
|
||
{
|
||
// is a ASCII number, return it
|
||
return(*str-0x30);
|
||
}
|
||
return(-2);
|
||
}
|
||
|
||
// prepare the webpage by writing the data to the tcp send buffer
|
||
/**********************************************************************
|
||
功能：打印页面代码
|
||
***********************************************************************/
|
||
unsigned int print_webpage(unsigned char *buf,unsigned char on_off1,unsigned char on_off2,unsigned char on_off3,unsigned char on_off4)
|
||
{
|
||
unsigned int plen,j;
|
||
unsigned char macmac[17];
|
||
plen=fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\nPragma: no-cache\r\n\r\n"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<META HTTP-EQUIV=Refresh content=5>"));//页面开始处
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<form action=""/"" method=get>"));//页面开始处
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=7><center>基于STM32的以太网通信系统设计</center></font><br><p><p>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<marquee behavior=alternate scrollamount=15>系统资源：STM32F103RBT6,128K Flash, 64K SRAM</marquee><P>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<marquee behavior=alternate>嵌入式服务器IP:192.168.1.100 MAC:04-02-35-00-00-01</marquee><P>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<p><center><a href="));
|
||
plen=fill_tcp_data(buf,plen,"http://");
|
||
plen=fill_tcp_data(buf,plen,my_ip);
|
||
plen=fill_tcp_data(buf,plen,"/?led=");
|
||
if (led1==0x31)
|
||
{
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("5><font size=5>关闭LED1:</font></a>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=5 color=\"#00FF00\"> LED1亮</font></center>"));
|
||
}
|
||
else if (led1==0x35|led1==0)
|
||
{
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("1><font size=5>点亮LED1:</font></a>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=5> LED1灭</font></center>"));
|
||
}
|
||
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<p><center><a href="));
|
||
plen=fill_tcp_data(buf,plen,"http://");
|
||
plen=fill_tcp_data(buf,plen,my_ip);
|
||
plen=fill_tcp_data(buf,plen,"/?led=");
|
||
if (led2==0x32)
|
||
{
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("6><font size=5>关闭LED2:</font></a>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=5 color=\"#00FF00\"> LED2亮</font></center>"));
|
||
}
|
||
else if(led2==0x36|led2==0)
|
||
{
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("2><font size=5>点亮LED2:</font></a>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=5> LED2灭</font></center>"));
|
||
}
|
||
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<p><center><a href="));
|
||
plen=fill_tcp_data(buf,plen,"http://");
|
||
plen=fill_tcp_data(buf,plen,my_ip);
|
||
plen=fill_tcp_data(buf,plen,"/?led=");
|
||
|
||
if (led3==0x33)
|
||
{
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("7><font size=5>关闭LED3:</font></a>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=5 color=\"#00FF00\"> LED3亮</font></center>"));
|
||
}
|
||
else if(led3==0x37|led3==0)
|
||
{
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("3><font size=5>点亮LED3:</font></a>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=5> LED3灭</font></center>"));
|
||
}
|
||
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<p><center><a href="));
|
||
plen=fill_tcp_data(buf,plen,"http://");
|
||
plen=fill_tcp_data(buf,plen,my_ip);
|
||
plen=fill_tcp_data(buf,plen,"/?led=");
|
||
|
||
if (led4==0x34)
|
||
{
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("8><font size=5>关闭LED4:</font></a>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=5 color=\"#00FF00\"> LED4亮</font></center>"));
|
||
}
|
||
else if(led4==0x38|led4==0)
|
||
{
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("4><font size=5>点亮LED4:</font></a>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=5> LED4灭</font></center>"));
|
||
}
|
||
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=5><center > STM32内部温度传感器温度： "));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR(temp_2));
|
||
plen=fill_tcp_data_p(buf,plen,"°C</center></font>");
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=5 color=\"#ff6600\"><center><hr> <br>宇运电子</center>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=5 color=\"#00FF00\"><center><br>世界触手可及 一切皆有可能</center></font>"));
|
||
plen=fill_tcp_data_p(buf,plen," <a href=http://mcu-web.taobao.com><center>想了解更多登入官方淘宝店:http://mcu-web.taobao.com</center></a>");
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=5 ><center>您电脑本地IP地址："));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR(tempfwip));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR(" 您电脑网卡物理地址："));
|
||
for(j=0;j<17;j++)
|
||
macmac[j]=tempfwmac[j];
|
||
plen=fill_tcp_data_p(buf,plen,PSTR(macmac));
|
||
plen=fill_tcp_data_p(buf,plen,"</center></font>");
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("</form>")); ////页面结束
|
||
return(plen);
|
||
}
|
||
|
||
unsigned int simple_server(void)
|
||
{
|
||
|
||
unsigned int plen,i1=0;
|
||
unsigned int dat_p;
|
||
unsigned char ii;
|
||
unsigned char cmd,*buf1;
|
||
unsigned int payloadlen=0;
|
||
LED1_ON();
|
||
LED2_ON();
|
||
LED3_ON();
|
||
LED4_ON();
|
||
plen = enc28j60getrev();
|
||
/*initialize enc28j60*/
|
||
enc28j60Init(mymac);
|
||
// ENC28J60_Init(mymac);
|
||
//把IP地址和MAC地址写入各自的缓存区 ipaddr[] macaddr[]
|
||
init_ip_arp_udp_tcp(mymac,myip,mywwwport);
|
||
//指示灯状态:0x476 is PHLCON LEDA(绿)=links status, LEDB(红)=receive/transmit
|
||
//enc28j60PhyWrite(PHLCON,0x7a4);
|
||
//PHLCON：PHY 模块LED 控制寄存器
|
||
enc28j60PhyWrite(PHLCON,0x0476);
|
||
enc28j60clkout(2); // change clkout from 6.25MHz to 12.5MHz
|
||
|
||
//init the ethernet/ip layer:
|
||
while(1)
|
||
{
|
||
get_temperature(&temp_1);
|
||
temp_2[0]=temp1[temp_1/100];
|
||
temp_2[1]=temp1[temp_1%100/10];
|
||
temp_2[2]='.';
|
||
temp_2[3]=temp1[temp_1%10]; //°C
|
||
plen=0;
|
||
plen = enc28j60PacketReceive(BUFFER_SIZE, buf);
|
||
|
||
/*plen will ne unequal to zero if there is a valid packet (without crc error) */
|
||
if(plen==0)
|
||
{
|
||
continue;
|
||
}
|
||
|
||
|
||
// arp is broadcast if unknown but a host may also
|
||
// verify the mac address by sending it to
|
||
// a unicast address.
|
||
|
||
//ARP 帧包发送 42
|
||
if(eth_type_is_arp_and_my_ip(buf,plen))
|
||
{
|
||
make_arp_answer_from_request(buf);
|
||
continue;
|
||
}
|
||
|
||
// check if ip packets are for us:
|
||
if(eth_type_is_ip_and_my_ip(buf,plen)==0)
|
||
{
|
||
continue;
|
||
}
|
||
|
||
|
||
if(buf[IP_PROTO_P]==IP_PROTO_ICMP_V && buf[ICMP_TYPE_P]==ICMP_TYPE_ECHOREQUEST_V)
|
||
{
|
||
// a ping packet, let's send pong PING的回应
|
||
make_echo_reply_from_request(buf, plen);
|
||
/*获取mac地址*/
|
||
for(ii=0;ii<6;ii++)
|
||
{
|
||
fwmac[ii]=buf[ii];
|
||
tempfwmac[ii*3+0]=temp[fwmac[ii]/16];
|
||
tempfwmac[ii*3+1]=temp[fwmac[ii]%16];
|
||
if(ii<5)
|
||
tempfwmac[ii*3+2]='-';
|
||
}
|
||
|
||
/*获取ip地址*/
|
||
for(ii=0;ii<4;ii++)
|
||
{
|
||
fwip[ii]=buf[ii+30];//0xbf
|
||
tempfwip[ii*4+0]=temp1[fwip[ii]/100]; //temp1[]={"0123456789"};
|
||
tempfwip[ii*4+1]=temp1[fwip[ii]%100/10];
|
||
tempfwip[ii*4+2]=temp1[fwip[ii]%100%10];
|
||
if(ii<3)
|
||
tempfwip[ii*4+3]='.';
|
||
}
|
||
|
||
|
||
|
||
continue;
|
||
}
|
||
// tcp port www start, compare only the lower byte端口网络开始，仅比低字节
|
||
if (buf[IP_PROTO_P]==IP_PROTO_TCP_V&&buf[TCP_DST_PORT_H_P]==0&&buf[TCP_DST_PORT_L_P]==mywwwport)
|
||
{
|
||
|
||
/*获取mac地址*/
|
||
for(ii=0;ii<6;ii++)
|
||
{
|
||
fwmac[ii]=buf[ii+6];
|
||
tempfwmac[ii*3+0]=temp[fwmac[ii]/16];
|
||
tempfwmac[ii*3+1]=temp[fwmac[ii]%16];
|
||
if(ii<5)
|
||
tempfwmac[ii*3+2]='-';
|
||
}
|
||
|
||
/*获取ip地址*/
|
||
iptemp[0]=buf[30];
|
||
iptemp[1]=buf[27];
|
||
iptemp[2]=buf[28];
|
||
iptemp[3]=buf[29];
|
||
|
||
for(ii=0;ii<4;ii++)
|
||
{
|
||
fwip[ii]=iptemp[ii];
|
||
tempfwip[ii*4+0]=temp1[fwip[ii]/100];
|
||
tempfwip[ii*4+1]=temp1[fwip[ii]%100/10];
|
||
tempfwip[ii*4+2]=temp1[fwip[ii]%100%10];
|
||
if(ii<3)
|
||
tempfwip[ii*4+3]='.';
|
||
}
|
||
|
||
if (buf[TCP_FLAGS_P] & TCP_FLAGS_SYN_V)
|
||
{
|
||
make_tcp_synack_from_syn(buf);
|
||
// make_tcp_synack_from_syn does already send the syn,ack
|
||
continue;
|
||
}
|
||
if (buf[TCP_FLAGS_P] & TCP_FLAGS_ACK_V)
|
||
{
|
||
init_len_info(buf); // init some data structures
|
||
// we can possibly have no data, just ack:
|
||
dat_p=get_tcp_data_pointer();
|
||
if (dat_p==0)
|
||
{
|
||
if (buf[TCP_FLAGS_P] & TCP_FLAGS_FIN_V)
|
||
{
|
||
// finack, answer with ack
|
||
make_tcp_ack_from_any(buf);
|
||
}
|
||
// just an ack with no data, wait for next packet
|
||
continue;
|
||
}
|
||
if (strncmp("GET ",(char *)&(buf[dat_p]),4)!=0)
|
||
{
|
||
// head, post and other methods:
|
||
// for possible status codes see:
|
||
// http://www.w3.org/Protocols/rfc2616/rfc2616-sec10.html
|
||
plen=fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n<h1>200 OK</h1>"));
|
||
goto SENDTCP;
|
||
}
|
||
if (strncmp("/ ",(char *)&(buf[dat_p+4]),2)==0)
|
||
{
|
||
plen=fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<form action=""/"" method=get>"));//页面开始处
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<center>密码：<input type=password name=""mm"" ></center><br>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<center><input type=submit value=""登入""><input type=reset value=""重设""></center>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("</form>")); ////页面结束
|
||
goto SENDTCP;
|
||
}
|
||
if(strncmp("/?mm=654321",(char *)&(buf[dat_p+4]),11)!=0)
|
||
{
|
||
if(strncmp("/?led",(char *)&(buf[dat_p+4]),5)==0) goto SENDTCP1;
|
||
plen=fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 200 OK\r\nContent-Type: text/html\r\n\r\n"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<form action=""/"" method=get>"));//页面开始处
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<center>密码：<input type=password name=""mm"" ></center><br>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<center><input type=submit value=""登入""><input type=reset value=""重设""></center><br><br><br><br>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("<font size=6><center>密码错误请重新输入！！</center></font><br>"));
|
||
plen=fill_tcp_data_p(buf,plen,PSTR("</form>")); ////页面结束
|
||
goto SENDTCP;
|
||
|
||
}
|
||
|
||
SENDTCP1:
|
||
cmd=analyse_get_url((char *)&(buf[dat_p+10]));
|
||
BUF=buf[64];
|
||
cmd=BUF;
|
||
if (cmd==-1)
|
||
{
|
||
plen=fill_tcp_data_p(buf,0,PSTR("HTTP/1.0 401 Unauthorized\r\nContent-Type: text/html\r\n\r\n<h1>401 Unauthorized</h1>"));
|
||
goto SENDTCP;
|
||
}
|
||
if (cmd==0x31)
|
||
{
|
||
LED1_OFF();
|
||
led1=i_1=0x31;
|
||
|
||
}
|
||
else if(cmd==0x35)
|
||
{
|
||
LED1_ON();
|
||
led1=i_1=0x35;
|
||
}
|
||
if (cmd==0x32)
|
||
{
|
||
LED2_OFF();
|
||
led2=i_2=0x32;
|
||
}
|
||
else if(cmd==0x36)
|
||
{
|
||
LED2_ON();
|
||
led2=i_2=0x36;
|
||
}
|
||
if (cmd==0x33)
|
||
{
|
||
LED3_OFF();
|
||
led3=i_3=0x33;
|
||
|
||
}
|
||
else if(cmd==0x37)
|
||
{
|
||
LED3_ON();
|
||
led3=i_3=0x37;
|
||
}
|
||
if (cmd==0x34)
|
||
{
|
||
LED4_OFF();
|
||
led4=i_4=0x34;
|
||
|
||
}
|
||
else if(cmd==0x38)
|
||
{
|
||
LED4_ON();
|
||
led4=i_4=0x38;
|
||
}
|
||
// if (cmd==-2) or any other value
|
||
// just display the status:
|
||
plen=print_webpage(buf,(i_1),(i_2),(i_3),(i_4)); /////////////////////////////////////////////////
|
||
SENDTCP:
|
||
make_tcp_ack_from_any(buf); // send ack for http get
|
||
make_tcp_ack_with_data(buf,plen); // send data
|
||
continue;
|
||
}
|
||
}
|
||
// tcp port www end
|
||
//
|
||
// udp start, we listen on udp port 1200=0x4B0
|
||
if (buf[IP_PROTO_P]==IP_PROTO_UDP_V&&buf[UDP_DST_PORT_H_P]==4&&buf[UDP_DST_PORT_L_P]==0xb0)
|
||
{
|
||
payloadlen= buf[UDP_LEN_H_P];
|
||
payloadlen=payloadlen<<8;
|
||
payloadlen=(payloadlen+buf[UDP_LEN_L_P])-UDP_HEADER_LEN;
|
||
//payloadlen=buf[UDP_LEN_L_P]-UDP_HEADER_LEN;
|
||
|
||
ANSWER:
|
||
//while(1){
|
||
for(i1=0; i1<payloadlen; i1++) buf1[i1]=buf[UDP_DATA_P+i1];
|
||
|
||
//make_udp_reply_from_request(buf,str,strlen(str),myudpport);
|
||
make_udp_reply_from_request(buf,buf1,payloadlen,myudpport);
|
||
}
|
||
}
|
||
return 0;
|
||
}
|
||
|