Environmental Simulator
Dependencies: 4DGL-uLCD-SE ShiftBrite TMP36 GZ mbed
Revision 0:52ac517d1aba, committed 2016-11-02
- Comitter:
- Colmustard
- Date:
- Wed Nov 02 19:17:09 2016 +0000
- Commit message:
- Initial publication
Changed in this revision
diff -r 000000000000 -r 52ac517d1aba 4DGL-uLCD-SE.lib --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/4DGL-uLCD-SE.lib Wed Nov 02 19:17:09 2016 +0000 @@ -0,0 +1,1 @@ +https://mbed.org/users/4180_1/code/4DGL-uLCD-SE/#e39a44de229a
diff -r 000000000000 -r 52ac517d1aba ShiftBrite.lib --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/ShiftBrite.lib Wed Nov 02 19:17:09 2016 +0000 @@ -0,0 +1,1 @@ +http://developer.mbed.org/users/jwaters9/code/ShiftBrite/#466ea48e852a
diff -r 000000000000 -r 52ac517d1aba TMP36-GZ.lib --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/TMP36-GZ.lib Wed Nov 02 19:17:09 2016 +0000 @@ -0,0 +1,1 @@ +http://developer.mbed.org/users/tylerjw/code/TMP36-GZ/#2b0feb7bdebc
diff -r 000000000000 -r 52ac517d1aba main.cpp --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/main.cpp Wed Nov 02 19:17:09 2016 +0000 @@ -0,0 +1,455 @@ +// ESP8266 Static page WEB server to control Mbed + +#include "mbed.h" +#include "uLCD_4DGL.h" +#include "ShiftBrite.h" +#include "TMP36GZ.h" + +uLCD_4DGL uLCD(p28, p27, p11); //On board LCD display + +Serial pc(USBTX, USBRX); +Serial esp(p13, p14); // tx, rx + +SPI spi(p5, p6, p7); //SPI setup for ShiftBrite +ShiftBrite myBrite(p15,p16,spi); //latch, enable, spi + + +TMP36GZ temp_sensor(p20); // temp + +// Standard Mbed LED definitions +DigitalOut led1(LED1); +DigitalOut led2(LED2); +DigitalOut led3(LED3); +DigitalOut led4(LED4); + +// some test values to show on web page +AnalogIn Ain1(p18); +AnalogIn Ain2(p20); + +inline float random_number() +{ + return (rand()/(float(RAND_MAX))); +} + + +char ssid[32] = "TayKyr4180"; // enter WiFi router ssid inside the quotes +char pwd [32] = "123456789"; // enter WiFi router password inside the quotes + +float temperature, AdcIn, Ht; +float R1=100000, R2=10000; // resistor values to give a 10:1 reduction of measured AnalogIn voltage +char Vcc[10]; +char Temp[10]; + +// things for sending/receiving data over serial +volatile int tx_in=0; +volatile int tx_out=0; +volatile int rx_in=0; +volatile int rx_out=0; +const int buffer_size = 4095; +char tx_buffer[buffer_size+1]; +char rx_buffer[buffer_size+1]; +void Tx_interrupt(); +void Rx_interrupt(); +void send_line(); +void read_line(); + +int DataRX; +int update; +int count; +char cmdbuff[1024]; +char replybuff[4096]; +char webdata[4096]; // This may need to be bigger depending on WEB browser used +char webbuff[4096]; // Currently using 1986 characters, Increase this if more web page data added +char timebuf[30]; +void SendCMD(),getreply(),ReadWebData(),startserver(); +void gettime(),setRTC(),gettemp(),getbattery(); +char rx_line[1024]; +int port =80; // set server port +int SERVtimeout =5; // set server timeout in seconds in case link breaks. +struct tm t; +// manual set RTC values +int minute =00; // 0-59 +int hour =12; // 2-23 +int dayofmonth =26; // 1-31 +int month =8; // 1-12 +int year =15; // last 2 digits +int x =0; +int countB =0; + +int main() +{ + pc.baud(115200); + esp.baud(9600); + led1=1,led2=0,led3=0, led4=0; + // Setup a serial interrupt function to receive data + esp.attach(&Rx_interrupt, Serial::RxIrq); + // Setup a serial interrupt function to transmit data + esp.attach(&Tx_interrupt, Serial::TxIrq); + if (time(NULL) < 1420070400) { + setRTC(); + } + startserver(); + DataRX=0; + count=0; + while(1) { + if(DataRX==1) { + ReadWebData(); + esp.attach(&Rx_interrupt, Serial::RxIrq); + } + if(update==1) // update time, hit count, and analog levels in the HUZZAH chip + { + // get new values + gettime(); + gettemp(); + getbattery(); + count++; + // send new values + sprintf(cmdbuff, "count,time,analog1,analog2=%d,\"%s\",\"%s\",\"%s\"\r\n",count,timebuf,Temp,Vcc); + SendCMD(); + getreply(); + update=0; + } + } +} + +// Reads and processes GET and POST web data +void ReadWebData() +{ + wait_ms(200); + esp.attach(NULL,Serial::RxIrq); + DataRX=0; + memset(webdata, '\0', sizeof(webdata)); + strcpy(webdata, rx_buffer); + memset(rx_buffer, '\0', sizeof(rx_buffer)); + rx_in = 0; + rx_out = 0; + // check web data for form information + + if(strstr(webdata, "check=Storm") != NULL ) { + uLCD.media_init(); + uLCD.set_sector_address(0x0000, 0x0104); + uLCD.display_image(0,0); + // Lightning loop + while(strstr(webdata, "check=Storm") != NULL && countB < 100 ){ + //get a new random number + x = rand() % 256 + 20; + myBrite.Write(125,249,255); + myBrite.Brightness(x,x,x); + //fast update rate for flashes + wait(0.02); + myBrite.Write(0,0,0); + //add a random pause between flashes + if (random_number()>0.9025) { + myBrite.Write(0,0,0); + wait(x/100); + } + countB = countB+1; + } + countB = 0; + } + if(strstr(webdata, "check=SunnyDay") != NULL ) { + myBrite.Write(255,255,255); + myBrite.Brightness(255,255,255); + uLCD.media_init(); + uLCD.set_sector_address(0x0000, 0x00C3); + uLCD.display_image(0,0); + } + if(strstr(webdata, "check=Dawn") != NULL ) { + myBrite.Write(255,214,170); + myBrite.Brightness(255,255,255); + uLCD.media_init(); + uLCD.set_sector_address(0x0000, 0x0041); + uLCD.display_image(0,0); + } + if(strstr(webdata, "check=Dusk") != NULL ) { + myBrite.Write(255,214,170); + myBrite.Brightness(255,255,255); + uLCD.media_init(); + uLCD.set_sector_address(0x0000, 0x0082); + uLCD.display_image(0,0); + } + if(strstr(webdata, "check=CloudyDay") != NULL ) { + myBrite.Write(201,226,255); + myBrite.Brightness(255,255,255); + uLCD.media_init(); + uLCD.set_sector_address(0x0000, 0x0000); + uLCD.display_image(0,0); + } + + if(strstr(webdata, "POST") != NULL ) { // set update flag if POST request + update=1; + } + if(strstr(webdata, "GET") != NULL && strstr(webdata, "favicon") == NULL ) { // set update flag for GET request but do not want to update for favicon requests + update=1; + } +} +// Starts webserver +void startserver() +{ + gettime(); + gettemp(); + getbattery(); + pc.printf("++++++++++ Resetting ESP ++++++++++\r\n"); + strcpy(cmdbuff,"node.restart()\r\n"); + SendCMD(); + wait(2); + getreply(); + + pc.printf("\n++++++++++ Starting Server ++++++++++\r\n> "); + + // initial values + sprintf(cmdbuff, "count,time,analog1,analog2=0,\"%s\",\"%s\",\"%s\"\r\n",timebuf,Temp,Vcc); + SendCMD(); + getreply(); + wait(0.5); + + //create server + sprintf(cmdbuff, "srv=net.createServer(net.TCP,%d)\r\n",SERVtimeout); + SendCMD(); + getreply(); + wait(0.5); + strcpy(cmdbuff,"srv:listen(80,function(conn)\r\n"); + SendCMD(); + getreply(); + wait(0.3); + strcpy(cmdbuff,"conn:on(\"receive\",function(conn,payload) \r\n"); + SendCMD(); + getreply(); + wait(0.3); + + //print data to mbed + strcpy(cmdbuff,"print(payload)\r\n"); + SendCMD(); + getreply(); + wait(0.2); + + //web page data + strcpy(cmdbuff,"conn:send('<!DOCTYPE html><html><body><h1>Lab 4 Mini Project - Environmental Simulator</h1>')\r\n"); + SendCMD(); + getreply(); + wait(0.4); + strcpy(cmdbuff,"conn:send('Hit count: '..count..'')\r\n"); + SendCMD(); + getreply(); + wait(0.2); + strcpy(cmdbuff,"conn:send('<br>Last hit (based on mbed RTC time): '..time..'<br><hr>')\r\n"); + SendCMD(); + getreply(); + wait(0.4); + strcpy(cmdbuff,"conn:send('Temperature: '..analog1..' <sup>o</sup>C <br><hr>')\r\n"); + SendCMD(); + getreply(); + wait(0.3); + strcpy(cmdbuff,"conn:send('<form method=\"POST\"')\r\n"); + SendCMD(); + getreply(); + wait(0.3); + /* + strcpy(cmdbuff,"conn:send('<form method=\"POST\"><strong> Temperature:  <input type=\"text\" size=6 value=\""); + SendCMD(); + getreply(); + wait(0.3); + strcpy(cmdbuff,Temp); + SendCMD(); + getreply(); + wait(0.3); + */ + + strcpy(cmdbuff, "conn:send('<p><input type=\"text\" name=\"check\" value=\"\"> Lighting Conditions (choose from: Storm, Dawn, SunnyDay, CloudyDay, or Dusk)')\r\n"); + SendCMD(); + getreply(); + wait(0.3); + + strcpy(cmdbuff,"conn:send('<p><input type=\"submit\" value=\"send-refresh\"></form>')\r\n"); + SendCMD(); + getreply(); + wait(0.3); + strcpy(cmdbuff, "conn:send('<p><h2>How to use:</h2><ul><li>Select a checkbox to flip on/off</li><li>Click Send-Refresh to send data and refresh values</li></ul></body></html>')\r\n"); + SendCMD(); + getreply(); + wait(0.5); + // end web page data + strcpy(cmdbuff, "conn:on(\"sent\",function(conn) conn:close() end)\r\n"); // close current connection + SendCMD(); + getreply(); + wait(0.3); + strcpy(cmdbuff, "end)\r\n"); + SendCMD(); + getreply(); + wait(0.2); + strcpy(cmdbuff, "end)\r\n"); + SendCMD(); + getreply(); + wait(0.2); + + strcpy(cmdbuff, "tmr.alarm(0, 1000, 1, function()\r\n"); + SendCMD(); + getreply(); + wait(0.2); + strcpy(cmdbuff, "if wifi.sta.getip() == nil then\r\n"); + SendCMD(); + getreply(); + wait(0.2); + strcpy(cmdbuff, "print(\"Connecting to AP...\\n\")\r\n"); + SendCMD(); + getreply(); + wait(0.2); + strcpy(cmdbuff, "else\r\n"); + SendCMD(); + getreply(); + wait(0.2); + strcpy(cmdbuff, "ip, nm, gw=wifi.sta.getip()\r\n"); + SendCMD(); + getreply(); + wait(0.2); + strcpy(cmdbuff,"print(\"IP Address: \",ip)\r\n"); + SendCMD(); + getreply(); + wait(0.2); + strcpy(cmdbuff,"tmr.stop(0)\r\n"); + SendCMD(); + getreply(); + wait(0.2); + strcpy(cmdbuff,"end\r\n"); + SendCMD(); + getreply(); + wait(0.2); + strcpy(cmdbuff,"end)\r\n"); + SendCMD(); + getreply(); + wait(0.2); + + pc.printf("\n\n++++++++++ Ready ++++++++++\r\n\n"); +} + + +// ESP Command data send +void SendCMD() +{ + int i; + char temp_char; + bool empty; + i = 0; +// Start Critical Section - don't interrupt while changing global buffer variables + NVIC_DisableIRQ(UART1_IRQn); + empty = (tx_in == tx_out); + while ((i==0) || (cmdbuff[i-1] != '\n')) { +// Wait if buffer full + if (((tx_in + 1) % buffer_size) == tx_out) { +// End Critical Section - need to let interrupt routine empty buffer by sending + NVIC_EnableIRQ(UART1_IRQn); + while (((tx_in + 1) % buffer_size) == tx_out) { + } +// Start Critical Section - don't interrupt while changing global buffer variables + NVIC_DisableIRQ(UART1_IRQn); + } + tx_buffer[tx_in] = cmdbuff[i]; + i++; + tx_in = (tx_in + 1) % buffer_size; + } + if (esp.writeable() && (empty)) { + temp_char = tx_buffer[tx_out]; + tx_out = (tx_out + 1) % buffer_size; +// Send first character to start tx interrupts, if stopped + esp.putc(temp_char); + } +// End Critical Section + NVIC_EnableIRQ(UART1_IRQn); + return; +} + +// Get Command and ESP status replies +void getreply() +{ + read_line(); + sscanf(rx_line,replybuff); +} + +// Read a line from the large rx buffer from rx interrupt routine +void read_line() { + int i; + i = 0; +// Start Critical Section - don't interrupt while changing global buffer variables + NVIC_DisableIRQ(UART1_IRQn); +// Loop reading rx buffer characters until end of line character + while ((i==0) || (rx_line[i-1] != '\r')) { +// Wait if buffer empty + if (rx_in == rx_out) { +// End Critical Section - need to allow rx interrupt to get new characters for buffer + NVIC_EnableIRQ(UART1_IRQn); + while (rx_in == rx_out) { + } +// Start Critical Section - don't interrupt while changing global buffer variables + NVIC_DisableIRQ(UART1_IRQn); + } + rx_line[i] = rx_buffer[rx_out]; + i++; + rx_out = (rx_out + 1) % buffer_size; + } +// End Critical Section + NVIC_EnableIRQ(UART1_IRQn); + rx_line[i-1] = 0; + return; +} + + +// Interupt Routine to read in data from serial port +void Rx_interrupt() { + DataRX=1; + //led3=1; +// Loop just in case more than one character is in UART's receive FIFO buffer +// Stop if buffer full + while ((esp.readable()) && (((rx_in + 1) % buffer_size) != rx_out)) { + rx_buffer[rx_in] = esp.getc(); +// Uncomment to Echo to USB serial to watch data flow + pc.putc(rx_buffer[rx_in]); + rx_in = (rx_in + 1) % buffer_size; + } + //led3=0; + return; +} + + +// Interupt Routine to write out data to serial port +void Tx_interrupt() { + //led2=1; +// Loop to fill more than one character in UART's transmit FIFO buffer +// Stop if buffer empty + while ((esp.writeable()) && (tx_in != tx_out)) { + esp.putc(tx_buffer[tx_out]); + tx_out = (tx_out + 1) % buffer_size; + } + //led2=0; + return; +} + +void gettime() +{ + time_t seconds = time(NULL); + strftime(timebuf,50,"%H:%M:%S %a %d %b %y", localtime(&seconds)); +} + +void setRTC() +{ + t.tm_sec = (0); // 0-59 + t.tm_min = (minute); // 0-59 + t.tm_hour = (hour); // 0-23 + t.tm_mday = (dayofmonth); // 1-31 + t.tm_mon = (month-1); // 0-11 "0" = Jan, -1 added for Mbed RCT clock format + t.tm_year = ((year)+100); // year since 1900, current DCF year + 100 + 1900 = correct year + set_time(mktime(&t)); // set RTC clock +} +// Analog in example +void getbattery() +{ + AdcIn=Ain1.read(); + Ht = (AdcIn*3.3); // set the numeric to the exact MCU analog reference voltage for greater accuracy + sprintf(Vcc,"%2.3f",Ht); +} +// Temperature example +void gettemp() +{ + + //Temp=temp_sensor.sample(); + sprintf(Temp,"%3.3f",temp_sensor.sample()); +} \ No newline at end of file
diff -r 000000000000 -r 52ac517d1aba mbed.bld --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/mbed.bld Wed Nov 02 19:17:09 2016 +0000 @@ -0,0 +1,1 @@ +http://mbed.org/users/mbed_official/code/mbed/builds/9bcdf88f62b0 \ No newline at end of file