Ian Kilburn / Embedded_web_wiznet

Local version for working on Nucleo F401 and Ethernet shield

Dependencies:   WIZnet_Library mbed

Fork of Embedded_web_wiznet by IPN ESIME ZACATENCO

main.cpp@2:606891a51c85, 2014-12-28 (annotated)

Committer:
highroads
Date:
Sun Dec 28 15:41:29 2014 +0000
Revision:
2:606891a51c85
Parent:
1:f39ba31afda9
Child:
4:21669521476c
working with arduino ethernet shield

Who changed what in which revision?

UserRevisionLine numberNew 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);
Ademir501 0:2f0a30377d42 123 pc.printf("\tIniciando Servidor Ethernet...\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 {
Ademir501 0:2f0a30377d42 128 pc.printf("Inicializado, MAC= %s\n\r",eth.getMACAddress());
Ademir501 0:2f0a30377d42 129 }
Ademir501 0:2f0a30377d42 130 else
Ademir501 0:2f0a30377d42 131 {
Ademir501 0:2f0a30377d42 132 pc.printf("Fallo comunicacion... Reinicie dispositivos...\n\r");
Ademir501 0:2f0a30377d42 133 }
Ademir501 0:2f0a30377d42 134 pc.printf("Conectando.");
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 {
Ademir501 0:2f0a30377d42 143 pc.printf("Conexion Establecida!\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 {
Ademir501 0:2f0a30377d42 149 pc.printf("Fallo conexion... Reinicie dispositivos...\n\r");
Ademir501 0:2f0a30377d42 150 }
Ademir501 1:f39ba31afda9 151 }
Ademir501 1:f39ba31afda9 152