Ethernet communication for biomedical purposes
Dependencies: C12832_lcd EthernetNetIf HTTPClient_ToBeRemoved mbed
Fork of TwitterExample by
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?
User | Revision | Line number | New 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 | } |