Local version for working on Nucleo F401 and Ethernet shield
Dependencies: WIZnet_Library mbed
Fork of Embedded_web_wiznet by
main.cpp@4:21669521476c, 2014-12-28 (annotated)
- Committer:
- highroads
- Date:
- Sun Dec 28 16:45:31 2014 +0000
- Revision:
- 4:21669521476c
- Parent:
- 2:606891a51c85
- Child:
- 5:8f5448521cd8
Translated messages to English
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
Ademir501 | 0:2f0a30377d42 | 1 | //w5500 |
Ademir501 | 0:2f0a30377d42 | 2 | #include "mbed.h" |
Ademir501 | 0:2f0a30377d42 | 3 | #include "WIZnetInterface.h" |
Ademir501 | 0:2f0a30377d42 | 4 | |
Ademir501 | 0:2f0a30377d42 | 5 | #define ECHO_SERVER_PORT 80 |
Ademir501 | 0:2f0a30377d42 | 6 | |
highroads | 2:606891a51c85 | 7 | //SPI spi(PTD7, PTD6, PTD5); // mosi, miso, sclk |
highroads | 2:606891a51c85 | 8 | WIZnetInterface eth(SPI_MOSI, SPI_MISO, SPI_SCK,SPI_CS,PB_4); // spi, cs, reset |
highroads | 2:606891a51c85 | 9 | Serial pc(SERIAL_TX,SERIAL_RX); |
highroads | 2:606891a51c85 | 10 | //DigitalOut led(LED1); |
highroads | 2:606891a51c85 | 11 | DigitalOut SD_CS(PB_5); |
highroads | 2:606891a51c85 | 12 | |
Ademir501 | 0:2f0a30377d42 | 13 | |
Ademir501 | 0:2f0a30377d42 | 14 | void f_ethernet_init(void); |
Ademir501 | 0:2f0a30377d42 | 15 | |
Ademir501 | 0:2f0a30377d42 | 16 | |
Ademir501 | 1:f39ba31afda9 | 17 | |
highroads | 2:606891a51c85 | 18 | const char * IP_Addr = "192.168.1.210"; |
Ademir501 | 0:2f0a30377d42 | 19 | const char * IP_Subnet = "255.255.255.0"; |
highroads | 2:606891a51c85 | 20 | const char * IP_Gateway = "192.168.1.1"; |
Ademir501 | 1:f39ba31afda9 | 21 | char data[8]; |
Ademir501 | 1:f39ba31afda9 | 22 | int lenght; |
Ademir501 | 1:f39ba31afda9 | 23 | |
Ademir501 | 0:2f0a30377d42 | 24 | int ret,dummy; |
Ademir501 | 0:2f0a30377d42 | 25 | int lv=1; |
Ademir501 | 1:f39ba31afda9 | 26 | bool status; |
Ademir501 | 0:2f0a30377d42 | 27 | |
Ademir501 | 0:2f0a30377d42 | 28 | |
Ademir501 | 0:2f0a30377d42 | 29 | char a[]={"HTTP/1.0 200 OK\r\nContent-Type: text/html\r\nPragma: no-cache\r\n\r\n"}; |
Ademir501 | 0:2f0a30377d42 | 30 | char b[]={"<html>\r\n<body>\r\n"}; |
Ademir501 | 1:f39ba31afda9 | 31 | char c[]={"<body bgcolor=\"green\">"}; |
Ademir501 | 1:f39ba31afda9 | 32 | char c1[]={"<body bgcolor=\"000ff0\"></body>\r\n"}; |
Ademir501 | 1:f39ba31afda9 | 33 | char d[]={"<title>FRDM KL46Z</title>\r\n"}; |
Ademir501 | 1:f39ba31afda9 | 34 | char e[]={"<center><h2>Pagina Web usando Wiznet</h2>\r\n"}; |
Ademir501 | 1:f39ba31afda9 | 35 | char f[]={"<br /><hr></center>\r\n"}; |
Ademir501 | 1:f39ba31afda9 | 36 | //char g[]={"<FONT FACE=\"Arial\" SIZE=\"8\" COLOR=\"FF0000\">"}; |
Ademir501 | 1:f39ba31afda9 | 37 | //char w[]={"<meta http-equiv=\"refresh\" content=\"10; url=/\">\r\n"}; |
Ademir501 | 1:f39ba31afda9 | 38 | char h[]={"<center><div STYLE=\"position:absolute;bgcolor:black; top:100px; left:200px;width:54px\">"}; |
Ademir501 | 0:2f0a30377d42 | 39 | |
Ademir501 | 1:f39ba31afda9 | 40 | //char r[]={"HTTP/1.1 200 OK\r\n"}; |
Ademir501 | 1:f39ba31afda9 | 41 | //char s[]={"Content-Type: text/html\r\n"}; |
Ademir501 | 1:f39ba31afda9 | 42 | //char t[]={"Connection: close\r\n"}; |
Ademir501 | 1:f39ba31afda9 | 43 | //char u[]={"Refresh: 5\r\n\r\n"}; |
Ademir501 | 1:f39ba31afda9 | 44 | //char v[]={"<!DOCTYOE HTML>\r\n"}; |
Ademir501 | 1:f39ba31afda9 | 45 | //char y[]={"<html>\r\n"}; |
Ademir501 | 0:2f0a30377d42 | 46 | |
Ademir501 | 0:2f0a30377d42 | 47 | |
Ademir501 | 1:f39ba31afda9 | 48 | char paq_en[64]; |
Ademir501 | 1:f39ba31afda9 | 49 | |
Ademir501 | 0:2f0a30377d42 | 50 | |
Ademir501 | 0:2f0a30377d42 | 51 | int main() |
Ademir501 | 0:2f0a30377d42 | 52 | { |
highroads | 2:606891a51c85 | 53 | SD_CS=1; |
Ademir501 | 0:2f0a30377d42 | 54 | f_ethernet_init(); |
Ademir501 | 0:2f0a30377d42 | 55 | TCPSocketServer server; |
Ademir501 | 1:f39ba31afda9 | 56 | TCPSocketConnection client; |
Ademir501 | 0:2f0a30377d42 | 57 | server.bind(ECHO_SERVER_PORT); |
Ademir501 | 0:2f0a30377d42 | 58 | server.listen(); |
Ademir501 | 0:2f0a30377d42 | 59 | pc.printf("\nEsperando conexion con cliente...\n"); |
Ademir501 | 1:f39ba31afda9 | 60 | |
Ademir501 | 1:f39ba31afda9 | 61 | |
Ademir501 | 0:2f0a30377d42 | 62 | while(lv) |
Ademir501 | 0:2f0a30377d42 | 63 | { |
Ademir501 | 0:2f0a30377d42 | 64 | lv=server.accept(client); |
Ademir501 | 0:2f0a30377d42 | 65 | if(!lv) |
Ademir501 | 0:2f0a30377d42 | 66 | { |
Ademir501 | 0:2f0a30377d42 | 67 | pc.printf("Cliente conectado: %s\n", client.get_address()); |
Ademir501 | 0:2f0a30377d42 | 68 | |
Ademir501 | 0:2f0a30377d42 | 69 | } |
Ademir501 | 0:2f0a30377d42 | 70 | else |
Ademir501 | 0:2f0a30377d42 | 71 | { |
Ademir501 | 0:2f0a30377d42 | 72 | wait(10); |
Ademir501 | 0:2f0a30377d42 | 73 | } |
Ademir501 | 0:2f0a30377d42 | 74 | } |
Ademir501 | 1:f39ba31afda9 | 75 | client.receive(data,sizeof(data)); |
Ademir501 | 1:f39ba31afda9 | 76 | pc.printf("%c",data); |
Ademir501 | 1:f39ba31afda9 | 77 | |
Ademir501 | 1:f39ba31afda9 | 78 | client.send(a,sizeof(a)); |
Ademir501 | 1:f39ba31afda9 | 79 | client.send(b,sizeof(b)); |
Ademir501 | 1:f39ba31afda9 | 80 | client.send(c,sizeof(c)); |
Ademir501 | 1:f39ba31afda9 | 81 | client.send(d,sizeof(d)); |
Ademir501 | 1:f39ba31afda9 | 82 | client.send(e,sizeof(e)); |
Ademir501 | 1:f39ba31afda9 | 83 | client.send(f,sizeof(f)); |
Ademir501 | 1:f39ba31afda9 | 84 | |
Ademir501 | 1:f39ba31afda9 | 85 | |
Ademir501 | 1:f39ba31afda9 | 86 | while(1) |
Ademir501 | 1:f39ba31afda9 | 87 | { |
Ademir501 | 1:f39ba31afda9 | 88 | while(client.is_connected()) |
Ademir501 | 1:f39ba31afda9 | 89 | { |
Ademir501 | 1:f39ba31afda9 | 90 | dummy++; |
Ademir501 | 1:f39ba31afda9 | 91 | |
Ademir501 | 1:f39ba31afda9 | 92 | |
Ademir501 | 1:f39ba31afda9 | 93 | client.send(h,sizeof(h)); |
Ademir501 | 1:f39ba31afda9 | 94 | sprintf(paq_en,"<p style=\"color:white;font-size:200px\">%d</p></div></center>\r\n",dummy); |
Ademir501 | 1:f39ba31afda9 | 95 | client.send(paq_en,sizeof(paq_en)); |
Ademir501 | 1:f39ba31afda9 | 96 | wait(1); |
Ademir501 | 1:f39ba31afda9 | 97 | client.send(h,sizeof(h)); |
Ademir501 | 1:f39ba31afda9 | 98 | sprintf(paq_en,"<p style=\"color:green;font-size:200px\">%d</p></div></center>\r\n",dummy); |
Ademir501 | 1:f39ba31afda9 | 99 | client.send(paq_en,sizeof(paq_en)); |
Ademir501 | 1:f39ba31afda9 | 100 | |
Ademir501 | 1:f39ba31afda9 | 101 | } |
Ademir501 | 1:f39ba31afda9 | 102 | server.bind(ECHO_SERVER_PORT); |
Ademir501 | 1:f39ba31afda9 | 103 | server.listen(); |
Ademir501 | 1:f39ba31afda9 | 104 | server.accept(client); |
Ademir501 | 0:2f0a30377d42 | 105 | |
Ademir501 | 1:f39ba31afda9 | 106 | |
Ademir501 | 0:2f0a30377d42 | 107 | client.send(a,sizeof(a)); |
Ademir501 | 0:2f0a30377d42 | 108 | client.send(b,sizeof(b)); |
Ademir501 | 0:2f0a30377d42 | 109 | client.send(c,sizeof(c)); |
Ademir501 | 0:2f0a30377d42 | 110 | client.send(d,sizeof(d)); |
Ademir501 | 0:2f0a30377d42 | 111 | client.send(e,sizeof(e)); |
Ademir501 | 1:f39ba31afda9 | 112 | client.send(f,sizeof(f)); |
Ademir501 | 1:f39ba31afda9 | 113 | client.send(paq_en,sizeof(paq_en)); |
Ademir501 | 1:f39ba31afda9 | 114 | } |
Ademir501 | 0:2f0a30377d42 | 115 | |
Ademir501 | 1:f39ba31afda9 | 116 | |
Ademir501 | 0:2f0a30377d42 | 117 | } |
Ademir501 | 0:2f0a30377d42 | 118 | |
Ademir501 | 0:2f0a30377d42 | 119 | void f_ethernet_init() |
Ademir501 | 0:2f0a30377d42 | 120 | { |
highroads | 2:606891a51c85 | 121 | uint8_t mac[]={0x90,0xa2,0xDa,0x0d,0x42,0xe0}; |
highroads | 2:606891a51c85 | 122 | // mbed_mac_address((char *)mac); |
highroads | 4:21669521476c | 123 | pc.printf("\tStarting Ethernet Server ...\n\r"); |
highroads | 2:606891a51c85 | 124 | wait(1.0); |
highroads | 2:606891a51c85 | 125 | ret = eth.init(mac); |
Ademir501 | 0:2f0a30377d42 | 126 | if(!ret) |
Ademir501 | 0:2f0a30377d42 | 127 | { |
highroads | 4:21669521476c | 128 | pc.printf("Initialized, MAC= %s\n\r",eth.getMACAddress()); |
Ademir501 | 0:2f0a30377d42 | 129 | } |
Ademir501 | 0:2f0a30377d42 | 130 | else |
Ademir501 | 0:2f0a30377d42 | 131 | { |
highroads | 4:21669521476c | 132 | pc.printf("Communication Failure ... Restart devices ...\n\r"); |
Ademir501 | 0:2f0a30377d42 | 133 | } |
highroads | 4:21669521476c | 134 | pc.printf("Connected"); |
Ademir501 | 1:f39ba31afda9 | 135 | wait(0.5); |
Ademir501 | 0:2f0a30377d42 | 136 | pc.printf("."); |
Ademir501 | 1:f39ba31afda9 | 137 | wait(0.5); |
Ademir501 | 0:2f0a30377d42 | 138 | pc.printf(".\n\r"); |
Ademir501 | 1:f39ba31afda9 | 139 | wait(0.5); |
Ademir501 | 0:2f0a30377d42 | 140 | ret = eth.connect(); |
Ademir501 | 0:2f0a30377d42 | 141 | if(!ret) |
Ademir501 | 0:2f0a30377d42 | 142 | { |
highroads | 4:21669521476c | 143 | pc.printf("Connection Established!\n\n\r"); |
Ademir501 | 0:2f0a30377d42 | 144 | wait(1); |
Ademir501 | 0:2f0a30377d42 | 145 | pc.printf("IP=%s\n\rMASK=%s\n\rGW=%s\n\r",eth.getIPAddress(), eth.getNetworkMask(), eth.getGateway()); |
Ademir501 | 0:2f0a30377d42 | 146 | } |
Ademir501 | 0:2f0a30377d42 | 147 | else |
Ademir501 | 0:2f0a30377d42 | 148 | { |
highroads | 4:21669521476c | 149 | pc.printf("Communication Failure ... Restart devices ...\n\r"); |
Ademir501 | 0:2f0a30377d42 | 150 | } |
Ademir501 | 1:f39ba31afda9 | 151 | } |
Ademir501 | 1:f39ba31afda9 | 152 |