Umar Naeem / C027_SupportTest_coapp

mbed 5.4 with sleep mode

Dependencies:   C027_Support mbed-dev

Fork of C027_SupportTest_coap by Umar Naeem

main.cpp@12:96c7b62c7aaf, 2014-05-09 (annotated)

Committer:
mazgch
Date:
Fri May 09 08:58:25 2014 +0000
Revision:
12:96c7b62c7aaf
Parent:
11:b8505cbbd55c
Child:
13:662bd1df9a72
comments

Who changed what in which revision?

UserRevisionLine numberNew contents of line
lawliet 0:4e3cb26f6019 1 #include "mbed.h"
mazgch 2:b77151f111a9 2 #include "GPS.h"
mazgch 2:b77151f111a9 3 #include "MDM.h"
lawliet 0:4e3cb26f6019 4
mazgch 9:26f694bc31b4 5 //----------------------------------------------------------------------
mazgch 9:26f694bc31b4 6 // You may need to configure these parameters
mazgch 9:26f694bc31b4 7
mazgch 9:26f694bc31b4 8 /** Set your secret SIM pin here "1234"
mazgch 9:26f694bc31b4 9 */
mazgch 9:26f694bc31b4 10 #define SIMPIN NULL
mazgch 9:26f694bc31b4 11
mazgch 9:26f694bc31b4 12 /** The APN of your network operator, sometimes it is "internet"
mazgch 9:26f694bc31b4 13 check your contract with the network operator
mazgch 9:26f694bc31b4 14 */
mazgch 9:26f694bc31b4 15 #define APN "gprs.swisscom.ch"
mazgch 9:26f694bc31b4 16
mazgch 9:26f694bc31b4 17 /** Set the user name for your APN, or NULL if not needed
mazgch 9:26f694bc31b4 18 */
mazgch 9:26f694bc31b4 19 #define USERNAME NULL
mazgch 9:26f694bc31b4 20
mazgch 9:26f694bc31b4 21 /** Set the password for your APN, or NULL if not needed
mazgch 9:26f694bc31b4 22 */
mazgch 9:26f694bc31b4 23 #define PASSWORD NULL
mazgch 9:26f694bc31b4 24
mazgch 10:d2da2028a233 25 //----------------------------------------------------------------------
mazgch 11:b8505cbbd55c 26 /* This example was tested on C027-U20 and C027-G35 with the on board modem.
mazgch 11:b8505cbbd55c 27
mazgch 11:b8505cbbd55c 28 Additionally it was tested with a shield where the SARA-G350 RX/TX/PWRON
mazgch 11:b8505cbbd55c 29 is connected to D0/D1/D4 and the GPS SCL/SDA is connected D15/D15. In this
mazgch 11:b8505cbbd55c 30 configuration the following platforms were tested (it is likely that others
mazgch 11:b8505cbbd55c 31 will work as well)
mazgch 12:96c7b62c7aaf 32 - U-BLOX: C027-XX.
mazgch 12:96c7b62c7aaf 33 - NXP: LPC1549v2
mazgch 12:96c7b62c7aaf 34 - Freescale: FRDM-KL25Z, FRDM-KL46Z
mazgch 12:96c7b62c7aaf 35 - STM: NUCLEO-F401RE, NUCLEO-F030R8
mazgch 11:b8505cbbd55c 36 */
mazgch 10:d2da2028a233 37 #if defined(TARGET_UBLOX_C027) || defined(TARGET_LPC1768)
mazgch 11:b8505cbbd55c 38 #define C027_USEONBOARD // remove this if you have a GSM/GPS shield
mazgch 10:d2da2028a233 39 #ifdef C027_USEONBOARD
mazgch 10:d2da2028a233 40 #include "C027.h"
mazgch 10:d2da2028a233 41 C027 c027;
mazgch 10:d2da2028a233 42 #elif defined(TARGET_LPC1768)
mazgch 10:d2da2028a233 43 // We assume we have a C027 (not an Arch Pro)
mazgch 10:d2da2028a233 44 #define D15 P0_1
mazgch 10:d2da2028a233 45 #define D14 P0_0
mazgch 10:d2da2028a233 46 #define D4 P2_12
mazgch 10:d2da2028a233 47 #define D1 P4_28
mazgch 10:d2da2028a233 48 #define D0 P4_29
mazgch 10:d2da2028a233 49 #define LED1 P3_25
mazgch 10:d2da2028a233 50 #endif
mazgch 10:d2da2028a233 51 #endif
mazgch 10:d2da2028a233 52
mazgch 10:d2da2028a233 53 #ifndef C027_USEONBOARD
mazgch 10:d2da2028a233 54 #define GPSSCL D15
mazgch 10:d2da2028a233 55 #define GPSSDA D14
mazgch 10:d2da2028a233 56 #define GPSADR (66<<1) // GPS I2C Address
mazgch 10:d2da2028a233 57 #define MDMPWRON D4
mazgch 10:d2da2028a233 58 #define MDMTXD D1
mazgch 10:d2da2028a233 59 #define MDMRXD D0
mazgch 10:d2da2028a233 60 #define MDMCTS NC
mazgch 10:d2da2028a233 61 #define MDMRTS NC
mazgch 10:d2da2028a233 62 #define MDMBAUD 115200
mazgch 10:d2da2028a233 63 #endif
mazgch 10:d2da2028a233 64
mazgch 10:d2da2028a233 65 // no tracing if serial is shared with the VCP
mazgch 10:d2da2028a233 66 #define TRACE ((USBRX==MDMRXD)||(USBTX==MDMTXD))?:printf
lawliet 0:4e3cb26f6019 67
mazgch 5:5366d39d3719 68 void printDeviceStatus(MDMParser::DevStatus* status) {
mazgch 10:d2da2028a233 69 TRACE("Device Status:\r\n");
mazgch 6:71f6214d595e 70 const char* txtDev[] = { "Unknown", "SARA-G350", "LISA-U200", "LISA-C200" };
mazgch 6:71f6214d595e 71 if (status->dev < sizeof(txtDev)/sizeof(*txtDev) && (status->dev != MDMParser::DEV_UNKNOWN))
mazgch 10:d2da2028a233 72 TRACE(" Device: %s\r\n", txtDev[status->dev]);
mazgch 7:e000317ddef6 73 const char* txtLpm[] = { "Disabled", "Enabled", "Active" };
mazgch 7:e000317ddef6 74 if (status->lpm < sizeof(txtLpm)/sizeof(*txtLpm))
mazgch 10:d2da2028a233 75 TRACE(" Power Save: %s\r\n", txtLpm[status->lpm]);
mazgch 5:5366d39d3719 76 const char* txtSim[] = { "Unknown", "Pin", "Ready" };
mazgch 5:5366d39d3719 77 if (status->sim < sizeof(txtSim)/sizeof(*txtSim) && (status->sim != MDMParser::SIM_UNKNOWN))
mazgch 10:d2da2028a233 78 TRACE(" SIM: %s\r\n", txtSim[status->sim]);
mazgch 6:71f6214d595e 79 if (*status->ccid)
mazgch 10:d2da2028a233 80 TRACE(" CCID: %s\r\n", status->ccid);
mazgch 6:71f6214d595e 81 if (*status->imei)
mazgch 10:d2da2028a233 82 TRACE(" IMEI: %s\r\n", status->imei);
mazgch 6:71f6214d595e 83 if (*status->imsi)
mazgch 10:d2da2028a233 84 TRACE(" IMSI: %s\r\n", status->imsi);
mazgch 7:e000317ddef6 85 if (*status->meid)
mazgch 10:d2da2028a233 86 TRACE(" MEID: %s\r\n", status->meid);
mazgch 6:71f6214d595e 87 if (*status->manu)
mazgch 10:d2da2028a233 88 TRACE(" Manufacturer: %s\r\n", status->manu);
mazgch 6:71f6214d595e 89 if (*status->model)
mazgch 10:d2da2028a233 90 TRACE(" Model: %s\r\n", status->model);
mazgch 6:71f6214d595e 91 if (*status->ver)
mazgch 10:d2da2028a233 92 TRACE(" Version: %s\r\n", status->ver);
mazgch 5:5366d39d3719 93 }
mazgch 5:5366d39d3719 94
mazgch 5:5366d39d3719 95 void printNetStatus(MDMParser::NetStatus *status)
mazgch 5:5366d39d3719 96 {
mazgch 10:d2da2028a233 97 TRACE("Network Status:\r\n");
mazgch 5:5366d39d3719 98 const char* txtReg[] = { "Unknown", "Denied", "None", "Home", "Roaming" };
mazgch 5:5366d39d3719 99 if (status->reg < sizeof(txtReg)/sizeof(*txtReg) && (status->reg != MDMParser::REG_UNKNOWN))
mazgch 10:d2da2028a233 100 TRACE(" Registration: %s\r\n", txtReg[status->reg]);
mazgch 5:5366d39d3719 101 const char* txtAct[] = { "Unknown", "GSM", "Edge", "3G", "CDMA" };
mazgch 5:5366d39d3719 102 if (status->act < sizeof(txtAct)/sizeof(*txtAct) && (status->act != MDMParser::ACT_UNKNOWN))
mazgch 10:d2da2028a233 103 TRACE(" Access Technology: %s\r\n", txtAct[status->act]);
mazgch 5:5366d39d3719 104 if (status->rssi)
mazgch 10:d2da2028a233 105 TRACE(" Signal Strength: %d dBm\r\n", status->rssi);
mazgch 6:71f6214d595e 106 if (*status->opr)
mazgch 10:d2da2028a233 107 TRACE(" Operator: %s\r\n", status->opr);
mazgch 6:71f6214d595e 108 if (*status->num)
mazgch 10:d2da2028a233 109 TRACE(" Phone Number: %s\r\n", status->num);
mazgch 5:5366d39d3719 110 }
lawliet 0:4e3cb26f6019 111
lawliet 0:4e3cb26f6019 112 int main(void)
lawliet 0:4e3cb26f6019 113 {
mazgch 2:b77151f111a9 114 int ret;
mazgch 2:b77151f111a9 115 char buf[512] = "";
lawliet 0:4e3cb26f6019 116
mazgch 11:b8505cbbd55c 117 // only trace if
mazgch 11:b8505cbbd55c 118 if ((USBRX!=MDMRXD)&&(USBTX!=MDMTXD)) {
mazgch 11:b8505cbbd55c 119 Serial pc(USBTX,USBRX);
mazgch 11:b8505cbbd55c 120 pc.baud(115200);
mazgch 11:b8505cbbd55c 121 }
mazgch 11:b8505cbbd55c 122
mazgch 11:b8505cbbd55c 123 wait_ms(1000);
mazgch 2:b77151f111a9 124
mazgch 10:d2da2028a233 125 TRACE("GSM/GPS Support Example\r\n");
mazgch 11:b8505cbbd55c 126
mazgch 10:d2da2028a233 127 #ifdef C027_USEONBOARD
mazgch 10:d2da2028a233 128 // turn on the supplies of the Modem and the GPS
mazgch 2:b77151f111a9 129 c027.mdmPower(true);
mazgch 4:90ab1ec64b0e 130 c027.gpsPower(true);
mazgch 10:d2da2028a233 131 #else
mazgch 10:d2da2028a233 132 // turn on the Modem
mazgch 10:d2da2028a233 133 DigitalOut mdmPwrOn(MDMPWRON, 0);
mazgch 10:d2da2028a233 134 wait_ms(150);
mazgch 10:d2da2028a233 135 mdmPwrOn = 1;
mazgch 10:d2da2028a233 136 #endif
mazgch 2:b77151f111a9 137 wait(2);
mazgch 11:b8505cbbd55c 138
mazgch 10:d2da2028a233 139 // Create the GPS object
mazgch 10:d2da2028a233 140 #if defined(GPSSCL) && defined(GPSSDA) && defined(GPSADR)
mazgch 4:90ab1ec64b0e 141 GPSI2C gps(GPSSDA,GPSSCL,GPSADR); // use GPSI2C class
mazgch 10:d2da2028a233 142 #elif defined(GPSTXD) && defined(GPSRXD) && defined(GPSBAUD)
mazgch 10:d2da2028a233 143 GPSSerial gps(GPSTXD,GPSRXD,GPSBAUD); // or GPSSerial class
mazgch 10:d2da2028a233 144 #else
mazgch 10:d2da2028a233 145 #warning "please define the pins for the GPS"
mazgch 10:d2da2028a233 146 #endif
mazgch 11:b8505cbbd55c 147
mazgch 10:d2da2028a233 148 // Create the modem object
mazgch 7:e000317ddef6 149 MDMSerial mdm(MDMTXD,MDMRXD,MDMBAUD
mazgch 10:d2da2028a233 150 #if DEVICE_SERIAL_FC
mazgch 7:e000317ddef6 151 ,MDMRTS,MDMCTS
mazgch 10:d2da2028a233 152 #endif
mazgch 2:b77151f111a9 153 );
mazgch 11:b8505cbbd55c 154
mazgch 2:b77151f111a9 155 // initialize the modem
mazgch 10:d2da2028a233 156 TRACE("Device Init\r\n");
mazgch 5:5366d39d3719 157 MDMParser::DevStatus devStatus;
mazgch 5:5366d39d3719 158 MDMParser::NetStatus netStatus;
mazgch 10:d2da2028a233 159 bool mdmOk = mdm.init(SIMPIN, &devStatus);
mazgch 10:d2da2028a233 160 if (mdmOk)
mazgch 4:90ab1ec64b0e 161 {
mazgch 5:5366d39d3719 162 printDeviceStatus(&devStatus);
mazgch 5:5366d39d3719 163
mazgch 4:90ab1ec64b0e 164 // wait until we are connected
mazgch 10:d2da2028a233 165 TRACE("Network Check\r\n");
mazgch 5:5366d39d3719 166 while (!mdm.checkNetStatus(&netStatus))
mazgch 4:90ab1ec64b0e 167 wait_ms(1000);
mazgch 2:b77151f111a9 168
mazgch 5:5366d39d3719 169 printNetStatus(&netStatus);
mazgch 10:d2da2028a233 170 TRACE("Network Join\r\n");
mazgch 4:90ab1ec64b0e 171 // join the internet connection
mazgch 5:5366d39d3719 172 MDMParser::IP ip =
mazgch 9:26f694bc31b4 173 mdm.join(APN,USERNAME,PASSWORD);
mazgch 5:5366d39d3719 174 if (ip != NOIP)
mazgch 2:b77151f111a9 175 {
mazgch 10:d2da2028a233 176 TRACE(" IP Address: " IPSTR "\r\n", IPNUM(ip));
mazgch 10:d2da2028a233 177 TRACE("Socket Create\r\n");
mazgch 4:90ab1ec64b0e 178 int socket = mdm.socketSocket(MDMParser::IPPROTO_TCP);
mazgch 4:90ab1ec64b0e 179 if (socket >= 0)
mazgch 2:b77151f111a9 180 {
mazgch 10:d2da2028a233 181 TRACE("Socket Connect\r\n");
mazgch 4:90ab1ec64b0e 182 if (mdm.socketConnect(socket, "mbed.org", 80))
mazgch 4:90ab1ec64b0e 183 {
mazgch 10:d2da2028a233 184 TRACE("Make a Http Post Request\r\n");
mazgch 4:90ab1ec64b0e 185 const char http[] = "GET /media/uploads/mbed_official/hello.txt HTTP/1.0\r\n\r\n";
mazgch 10:d2da2028a233 186 TRACE("Socket Send\r\n");
mazgch 4:90ab1ec64b0e 187 mdm.socketSend(socket, http, sizeof(http)-1);
mazgch 4:90ab1ec64b0e 188
mazgch 10:d2da2028a233 189 TRACE("Socket Recving\r\n");
mazgch 4:90ab1ec64b0e 190 while (true) {
mazgch 4:90ab1ec64b0e 191 ret = mdm.socketReadable(socket);
mazgch 4:90ab1ec64b0e 192 if (ret > 0)
mazgch 4:90ab1ec64b0e 193 ret = mdm.socketRecv(socket, buf, sizeof(buf)-1);
mazgch 4:90ab1ec64b0e 194 if (ret < 0)
mazgch 4:90ab1ec64b0e 195 break;
mazgch 4:90ab1ec64b0e 196 else if (ret > 0)
mazgch 10:d2da2028a233 197 TRACE("Socket Recv \"%*s\"\r\n", ret, buf);
mazgch 4:90ab1ec64b0e 198 }
mazgch 10:d2da2028a233 199 TRACE("Socket Close\r\n");
mazgch 4:90ab1ec64b0e 200 mdm.socketClose(socket);
mazgch 4:90ab1ec64b0e 201 }
mazgch 10:d2da2028a233 202 TRACE("Socket Free\r\n");
mazgch 4:90ab1ec64b0e 203 mdm.socketFree(socket);
mazgch 4:90ab1ec64b0e 204 }
mazgch 2:b77151f111a9 205
mazgch 4:90ab1ec64b0e 206 // disconnect
mazgch 10:d2da2028a233 207 TRACE("Network Disconnect\r\n");
mazgch 4:90ab1ec64b0e 208 mdm.disconnect();
mazgch 2:b77151f111a9 209 }
mazgch 2:b77151f111a9 210
mazgch 5:5366d39d3719 211 const char* ussd = "*#134#"; // You may get answer "UNKNOWN APPLICATION"
mazgch 10:d2da2028a233 212 TRACE("Send Ussd Command %s\r\n", ussd);
mazgch 5:5366d39d3719 213 ret = mdm.ussdCommand(ussd, buf);
mazgch 4:90ab1ec64b0e 214 if (ret > 0)
mazgch 10:d2da2028a233 215 TRACE("Got Ussd Answer: \"%*s\"\r\n", ret, buf);
mazgch 10:d2da2028a233 216 }
mazgch 10:d2da2028a233 217 TRACE("Checking SMS and GPS\r\n");
mazgch 10:d2da2028a233 218 char link[128] = "";
mazgch 10:d2da2028a233 219 unsigned int i = 0xFFFFFFFF;
mazgch 10:d2da2028a233 220 const int wait = 100;
mazgch 10:d2da2028a233 221 bool abort = false;
mazgch 11:b8505cbbd55c 222 //DigitalOut led(LED1);
mazgch 10:d2da2028a233 223 while (!abort) {
mazgch 11:b8505cbbd55c 224 // led = !led;
mazgch 10:d2da2028a233 225 while ((ret = gps.getMessage(buf, sizeof(buf))) > 0)
mazgch 10:d2da2028a233 226 {
mazgch 10:d2da2028a233 227 int len = LENGTH(ret);
mazgch 10:d2da2028a233 228 //TRACE("NMEA: %.*s\r\n", len-2, msg);
mazgch 10:d2da2028a233 229 if ((PROTOCOL(ret) == NMEA) && (len > 6) && !strncmp("$GPGLL", buf, 6))
mazgch 4:90ab1ec64b0e 230 {
mazgch 10:d2da2028a233 231 double la = 0, lo = 0;
mazgch 10:d2da2028a233 232 char ch;
mazgch 10:d2da2028a233 233 if (gps.getNmeaAngle(1,buf,len,la) &&
mazgch 10:d2da2028a233 234 gps.getNmeaAngle(3,buf,len,lo) &&
mazgch 10:d2da2028a233 235 gps.getNmeaItem(6,buf,len,ch) && ch == 'A')
mazgch 4:90ab1ec64b0e 236 {
mazgch 10:d2da2028a233 237 TRACE("GPS Location: %.5f %.5f\r\n", la, lo);
mazgch 10:d2da2028a233 238 sprintf(link, "I am here!\n"
mazgch 10:d2da2028a233 239 "https://maps.google.com/?q=%.5f,%.5f", la, lo);
mazgch 4:90ab1ec64b0e 240 }
mazgch 4:90ab1ec64b0e 241 }
mazgch 10:d2da2028a233 242 }
mazgch 10:d2da2028a233 243 if (mdmOk && (i++ == 10000/wait)) {
mazgch 10:d2da2028a233 244 i = 0;
mazgch 10:d2da2028a233 245 // check the network status
mazgch 10:d2da2028a233 246 if (mdm.checkNetStatus(&netStatus))
mazgch 10:d2da2028a233 247 printNetStatus(&netStatus);
mazgch 10:d2da2028a233 248
mazgch 10:d2da2028a233 249 // checking unread sms
mazgch 10:d2da2028a233 250 int ix[8];
mazgch 10:d2da2028a233 251 int n = mdm.smsList("REC UNREAD", ix, 8);
mazgch 10:d2da2028a233 252 if (8 < n) n = 8;
mazgch 10:d2da2028a233 253 while (0 < n--)
mazgch 10:d2da2028a233 254 {
mazgch 10:d2da2028a233 255 char num[32];
mazgch 10:d2da2028a233 256 TRACE("Unread SMS at index %d\r\n", ix[n]);
mazgch 10:d2da2028a233 257 if (mdm.smsRead(ix[n], num, buf, sizeof(buf))) {
mazgch 10:d2da2028a233 258 TRACE("Got SMS from \"%s\" with text \"%s\"\r\n", num, buf);
mazgch 10:d2da2028a233 259 TRACE("Delete SMS at index %d\r\n", ix[n]);
mazgch 10:d2da2028a233 260 mdm.smsDelete(ix[n]);
mazgch 10:d2da2028a233 261 // provide a reply
mazgch 10:d2da2028a233 262 const char* reply = "Hello my friend";
mazgch 10:d2da2028a233 263 if (strstr(buf, /*w*/"here are you"))
mazgch 10:d2da2028a233 264 reply = *link ? link : "I don't know"; // reply wil location link
mazgch 10:d2da2028a233 265 TRACE("Send SMS reply \"%s\" to \"%s\"\r\n", reply, num);
mazgch 10:d2da2028a233 266 mdm.smsSend(num, reply);
mazgch 4:90ab1ec64b0e 267 }
mazgch 4:90ab1ec64b0e 268 }
mazgch 9:26f694bc31b4 269 }
mazgch 10:d2da2028a233 270 wait_ms(wait);
lawliet 0:4e3cb26f6019 271 }
mazgch 10:d2da2028a233 272 mdm.powerOff();
mazgch 10:d2da2028a233 273 gps.powerOff();
mazgch 10:d2da2028a233 274 TRACE("Shutdown\r\n");
mazgch 10:d2da2028a233 275 #ifdef C027_USEONBOARD
mazgch 10:d2da2028a233 276 // now it is safe to switch LDOs off
mazgch 2:b77151f111a9 277 c027.mdmPower(false);
mazgch 4:90ab1ec64b0e 278 c027.gpsPower(false);
mazgch 10:d2da2028a233 279 #endif
lawliet 0:4e3cb26f6019 280 return 0;
lawliet 0:4e3cb26f6019 281 }
mazgch 2:b77151f111a9 282