Tom De Smedt / Mbed 2 deprecated EthernetBM

Ethernet communication for biomedical purposes

Dependencies:   C12832_lcd EthernetNetIf HTTPClient_ToBeRemoved mbed

Fork of TwitterExample by Donatien Garnier

TwitterExample.cpp@5:e68d9f6a8866, 2013-11-25 (annotated)

Committer:
TomDS
Date:
Mon Nov 25 13:07:13 2013 +0000
Revision:
5:e68d9f6a8866
Parent:
4:9aff8f7be9b8 
Temporary Publication - Biomedical Ethernet Communication

Who changed what in which revision?

UserRevisionLine numberNew contents of line
donatien 0:96e3b1c49f9b 1 #include "mbed.h"
donatien 0:96e3b1c49f9b 2 #include "EthernetNetIf.h"
donatien 0:96e3b1c49f9b 3 #include "HTTPClient.h"
TomDS 4:9aff8f7be9b8 4 #include "C12832_lcd.h"
TomDS 4:9aff8f7be9b8 5
TomDS 5:e68d9f6a8866 6 // http://mbed.org/forum/mbed/topic/2238/
TomDS 5:e68d9f6a8866 7 //
TomDS 5:e68d9f6a8866 8 //
TomDS 5:e68d9f6a8866 9 //
TomDS 5:e68d9f6a8866 10
TomDS 5:e68d9f6a8866 11
donatien 0:96e3b1c49f9b 12 EthernetNetIf eth;
TomDS 4:9aff8f7be9b8 13 HTTPClient http;
TomDS 4:9aff8f7be9b8 14 C12832_LCD lcd;
TomDS 5:e68d9f6a8866 15
TomDS 5:e68d9f6a8866 16 //char[] ip = "192.168.200.183";
TomDS 5:e68d9f6a8866 17 //char[] site = "http://"+ip+"/Ethernet/watmeetik.txt";
TomDS 4:9aff8f7be9b8 18
donatien 0:96e3b1c49f9b 19 int main() {
TomDS 4:9aff8f7be9b8 20
TomDS 5:e68d9f6a8866 21 // SETUP ETHERNET CONNECTION
TomDS 4:9aff8f7be9b8 22 lcd.printf("Start\n");
TomDS 4:9aff8f7be9b8 23 wait(1);
TomDS 4:9aff8f7be9b8 24 lcd.printf("\r\nSetting up...\r\n");
donatien 0:96e3b1c49f9b 25 EthernetErr ethErr = eth.setup();
donatien 0:96e3b1c49f9b 26 if(ethErr)
donatien 0:96e3b1c49f9b 27 {
TomDS 4:9aff8f7be9b8 28 lcd.printf("Error %d in setup.\n", ethErr);
donatien 0:96e3b1c49f9b 29 return -1;
donatien 0:96e3b1c49f9b 30 }
TomDS 4:9aff8f7be9b8 31 lcd.printf("\r\nSetup OK\r\n");
TomDS 4:9aff8f7be9b8 32
TomDS 5:e68d9f6a8866 33
TomDS 5:e68d9f6a8866 34 // GET HTTP REQUEST
TomDS 4:9aff8f7be9b8 35 HTTPText txt;
donatien 0:96e3b1c49f9b 36
TomDS 5:e68d9f6a8866 37 HTTPResult r = http.get("http://192.168.200.183/Ethernet/watmeetik.txt", &txt);
TomDS 4:9aff8f7be9b8 38 if(r==HTTP_OK)
donatien 0:96e3b1c49f9b 39 {
TomDS 4:9aff8f7be9b8 40 lcd.printf("Result :\"%s\"\n", txt.gets());
donatien 0:96e3b1c49f9b 41 }
donatien 0:96e3b1c49f9b 42 else
donatien 0:96e3b1c49f9b 43 {
TomDS 4:9aff8f7be9b8 44 lcd.printf("Error %d\n", r);
TomDS 4:9aff8f7be9b8 45 }
TomDS 4:9aff8f7be9b8 46
TomDS 5:e68d9f6a8866 47 wait(1);
TomDS 5:e68d9f6a8866 48 lcd.cls();
TomDS 5:e68d9f6a8866 49 lcd.printf("\nPOST\n");
TomDS 5:e68d9f6a8866 50 wait(1);
TomDS 5:e68d9f6a8866 51
TomDS 4:9aff8f7be9b8 52
TomDS 5:e68d9f6a8866 53 // POST HTTP REQUEST
TomDS 5:e68d9f6a8866 54 HTTPMap msg;
TomDS 5:e68d9f6a8866 55 msg["m1"] = "test1";
TomDS 5:e68d9f6a8866 56 //http.basicAuth("gast","gast");
TomDS 5:e68d9f6a8866 57 HTTPResult r2 = http.post("http://192.168.200.183/Ethernet/resultaten.txt", msg, NULL);
TomDS 5:e68d9f6a8866 58
TomDS 5:e68d9f6a8866 59 if (r2 == HTTP_OK)
TomDS 5:e68d9f6a8866 60 {
TomDS 5:e68d9f6a8866 61 lcd.printf("Update succesful\n");
TomDS 5:e68d9f6a8866 62 }
TomDS 5:e68d9f6a8866 63 else
TomDS 5:e68d9f6a8866 64 {
TomDS 5:e68d9f6a8866 65 printf("problem occured, returncode%d\n",r2);
TomDS 5:e68d9f6a8866 66 }
TomDS 5:e68d9f6a8866 67
TomDS 5:e68d9f6a8866 68
TomDS 5:e68d9f6a8866 69
TomDS 5:e68d9f6a8866 70
TomDS 5:e68d9f6a8866 71 while(1){}
TomDS 5:e68d9f6a8866 72
donatien 0:96e3b1c49f9b 73
donatien 0:96e3b1c49f9b 74 return 0;
TomDS 4:9aff8f7be9b8 75
TomDS 4:9aff8f7be9b8 76 }