M2X demo using the Freescale FRDM-KL46Z and Multitech Socketmodem MTSMS-H5

Dependencies:   M2XStreamClient MMA8451Q SocketModem jsonlite mbed

Fork of MTS_M2x_Example by Multi-Hackers

Committer:
mfiore
Date:
Sat Jan 04 06:27:12 2014 +0000
Revision:
1:b12a128aae0e
Parent:
0:032beb056844
Child:
2:76e0d5968991
updated SocketModem to latest; updated Cell initialization code

Who changed what in which revision?

UserRevisionLine numberNew contents of line
mfiore 0:032beb056844 1 #include "mbed.h"
mfiore 0:032beb056844 2 #include "M2XStreamClient.h"
mfiore 0:032beb056844 3 #include "include_me.h"
mfiore 0:032beb056844 4
mfiore 0:032beb056844 5 using namespace mts;
mfiore 0:032beb056844 6
mfiore 0:032beb056844 7 const char key[] = "1f706ed9764457981e61b427767f65a5";
mfiore 0:032beb056844 8 const char feed[] = "5996c26815bd3245c8ec35089d51b614";
mfiore 0:032beb056844 9 const char stream[] = "test_test_test";
mfiore 0:032beb056844 10
mfiore 1:b12a128aae0e 11 // set to 1 for cellular shield board
mfiore 1:b12a128aae0e 12 // set to 0 for wifi shield board
mfiore 1:b12a128aae0e 13 #define CELL_SHIELD 1
mfiore 1:b12a128aae0e 14
mfiore 0:032beb056844 15 int main() {
mfiore 1:b12a128aae0e 16 #if CELL_SHIELD
mfiore 1:b12a128aae0e 17 for (int i = 30; i >= 0; i = i - 2) {
mfiore 1:b12a128aae0e 18 wait(2);
mfiore 1:b12a128aae0e 19 printf("Waiting %d seconds...\n\r", i);
mfiore 1:b12a128aae0e 20 }
mfiore 1:b12a128aae0e 21
mfiore 0:032beb056844 22 MTSSerialFlowControl* serial = new MTSSerialFlowControl(PTD3, PTD2, PTA12, PTC8);
mfiore 0:032beb056844 23 serial->baud(115200);
mfiore 1:b12a128aae0e 24 Transport::setTransport(Transport::CELLULAR);
mfiore 0:032beb056844 25 Cellular* cell = Cellular::getInstance();
mfiore 0:032beb056844 26 cell->init(serial);
mfiore 0:032beb056844 27
mfiore 0:032beb056844 28 int max_tries = 5;
mfiore 0:032beb056844 29 int i;
mfiore 0:032beb056844 30 std::string apn = "wap.cingular";
mfiore 0:032beb056844 31
mfiore 0:032beb056844 32 i = 0;
mfiore 0:032beb056844 33 while (i++ < max_tries) {
mfiore 0:032beb056844 34 if (cell->getRegistration() == Cellular::REGISTERED) {
mfiore 0:032beb056844 35 printf("registered with tower\n\r");
mfiore 0:032beb056844 36 break;
mfiore 0:032beb056844 37 } else if (i >= max_tries) {
mfiore 0:032beb056844 38 printf("failed to register with tower\n\r");
mfiore 0:032beb056844 39 } else {
mfiore 0:032beb056844 40 wait(3);
mfiore 0:032beb056844 41 }
mfiore 0:032beb056844 42 }
mfiore 0:032beb056844 43
mfiore 1:b12a128aae0e 44 printf("signal strength: %d\n\r", cell->getSignalStrength());
mfiore 1:b12a128aae0e 45
mfiore 0:032beb056844 46 i = 0;
mfiore 1:b12a128aae0e 47 printf("setting APN to %s\n\r", apn.c_str());
mfiore 0:032beb056844 48 while (i++ < max_tries) {
mfiore 0:032beb056844 49 if (cell->setApn(apn) == SUCCESS) {
mfiore 0:032beb056844 50 printf("successfully set APN\n\r");
mfiore 0:032beb056844 51 break;
mfiore 0:032beb056844 52 } else if (i >= max_tries) {
mfiore 0:032beb056844 53 printf("failed to set APN\n\r");
mfiore 0:032beb056844 54 } else {
mfiore 0:032beb056844 55 wait(1);
mfiore 0:032beb056844 56 }
mfiore 0:032beb056844 57 }
mfiore 0:032beb056844 58
mfiore 0:032beb056844 59 i = 0;
mfiore 1:b12a128aae0e 60 printf("bringing up PPP link\n\r");
mfiore 0:032beb056844 61 while (i++ < max_tries) {
mfiore 0:032beb056844 62 if (cell->connect()) {
mfiore 0:032beb056844 63 printf("PPP link is up\n\r");
mfiore 0:032beb056844 64 break;
mfiore 0:032beb056844 65 } else if (i >= max_tries) {
mfiore 0:032beb056844 66 printf("failed to bring PPP link up\n\r");
mfiore 0:032beb056844 67 } else {
mfiore 0:032beb056844 68 wait(1);
mfiore 0:032beb056844 69 }
mfiore 0:032beb056844 70 }
mfiore 1:b12a128aae0e 71 #else
mfiore 1:b12a128aae0e 72 for (int i = 6; i >= 0; i = i - 2) {
mfiore 1:b12a128aae0e 73 wait(2);
mfiore 1:b12a128aae0e 74 printf("Waiting %d seconds...\n\r", i);
mfiore 0:032beb056844 75 }
mfiore 0:032beb056844 76 MTSSerial* serial = new MTSSerial(PTD3, PTD2, 256, 256);
mfiore 0:032beb056844 77 serial->baud(9600);
mfiore 0:032beb056844 78 Transport::setTransport(Transport::WIFI);
mfiore 0:032beb056844 79 Wifi* wifi = Wifi::getInstance();
mfiore 0:032beb056844 80 printf("Init: %s\n\r", wifi->init(serial) ? "SUCCESS" : "FAILURE");
mfiore 1:b12a128aae0e 81 printf("Set Network: %s\n\r", getCodeNames(wifi->setNetwork("", Wifi::WPA2, "")).c_str());
mfiore 0:032beb056844 82 printf("Set DHCP: %s\n\r", getCodeNames(wifi->setDeviceIP("DHCP")).c_str());
mfiore 0:032beb056844 83 printf("Signal Strnegth (dBm): %d\n\r", wifi->getSignalStrength());
mfiore 0:032beb056844 84 printf("Is Connected: %s\n\r", wifi->isConnected() ? "True" : "False");
mfiore 0:032beb056844 85 printf("Connect: %s\n\r", wifi->connect() ? "Success" : "Failure");
mfiore 0:032beb056844 86 printf("Is Connected: %s\n\r", wifi->isConnected() ? "True" : "False");
mfiore 1:b12a128aae0e 87 #endif
mfiore 0:032beb056844 88
mfiore 0:032beb056844 89 /* send some data */
mfiore 1:b12a128aae0e 90 Client client;
mfiore 1:b12a128aae0e 91 M2XStreamClient m2xClient(&client, key);
mfiore 0:032beb056844 92 int ret;
mfiore 0:032beb056844 93 int num;
mfiore 0:032beb056844 94 while (true) {
mfiore 0:032beb056844 95 num = rand();
mfiore 0:032beb056844 96 printf("sending %d\r\n", num);
mfiore 0:032beb056844 97 ret = m2xClient.send(feed, stream, num);
mfiore 0:032beb056844 98 printf("send() returned %d\r\n", ret);
mfiore 0:032beb056844 99 wait(5);
mfiore 0:032beb056844 100 }
mfiore 0:032beb056844 101 }