MultiTech / MTS-Cellular

Cellular library for MTS Socket Modem Arduino Shield devices from Multi-Tech Systems

Dependents:   mtsas mtsas mtsas mtsas

Cellular/Cellular.cpp@82:5b33b670adb7, 2018-02-19 (annotated)

Committer:
Leon Lindenfelser
Date:
Mon Feb 19 14:25:58 2018 -0600
Revision:
82:5b33b670adb7
Parent:
81:2e12915f892e 
Add support for MTQ-LAT3(LE910-NA1) adn MTQ-LVW3(LE910-sv1)

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Mike Fiore 4:1f63354b8d1b 1 #include "mbed.h"
Mike Fiore 1:f155d94d6f3a 2 #include "Cellular.h"
Mike Fiore 1:f155d94d6f3a 3 #include "MTSText.h"
Mike Fiore 4:1f63354b8d1b 4 #include "MTSLog.h"
Mike Fiore 1:f155d94d6f3a 5
Mike Fiore 1:f155d94d6f3a 6 using namespace mts;
Mike Fiore 1:f155d94d6f3a 7
Mike Fiore 8:2d7259d244d1 8 bool Cellular::init(MTSBufferedIO* io)
Mike Fiore 8:2d7259d244d1 9 {
Mike Fiore 8:2d7259d244d1 10 if (io == NULL) {
Mike Fiore 8:2d7259d244d1 11 return false;
Mike Fiore 8:2d7259d244d1 12 }
Mike Fiore 8:2d7259d244d1 13 this->io = io;
Mike Fiore 8:2d7259d244d1 14
Mike Fiore 8:2d7259d244d1 15 return true;
Mike Fiore 8:2d7259d244d1 16 }
Mike Fiore 8:2d7259d244d1 17
Mike Fiore 9:1a03e3f3e7fe 18 bool Cellular::configureSignals(unsigned int DCD, unsigned int DTR, unsigned int RESET)
Mike Fiore 9:1a03e3f3e7fe 19 {
Mike Fiore 9:1a03e3f3e7fe 20 //Set DCD - The radio will raise and lower this line
Mike Fiore 9:1a03e3f3e7fe 21 if (DCD != NC) {
Mike Fiore 9:1a03e3f3e7fe 22 dcd = new DigitalIn(PinName(DCD));
Mike Fiore 9:1a03e3f3e7fe 23 }
Mike Fiore 9:1a03e3f3e7fe 24 /* Set DTR - This line should be lowered when we want to talk to the radio and raised when we're done
Mike Fiore 9:1a03e3f3e7fe 25 * for now we will lower it in the constructor and raise it in the destructor.
Mike Fiore 9:1a03e3f3e7fe 26 */
Mike Fiore 9:1a03e3f3e7fe 27 if (DTR != NC) {
Mike Fiore 9:1a03e3f3e7fe 28 dtr = new DigitalOut(PinName(DTR));
Mike Fiore 9:1a03e3f3e7fe 29 dtr->write(0);
Mike Fiore 9:1a03e3f3e7fe 30 }
Mike Fiore 9:1a03e3f3e7fe 31 //Set RESET - Set the hardware reset line to the radio
Mike Fiore 9:1a03e3f3e7fe 32 if (RESET != NC) {
Mike Fiore 9:1a03e3f3e7fe 33 resetLine = new DigitalOut(PinName(RESET));
Mike Fiore 9:1a03e3f3e7fe 34 }
Mike Fiore 9:1a03e3f3e7fe 35 return true;
Mike Fiore 9:1a03e3f3e7fe 36 }
Mike Fiore 9:1a03e3f3e7fe 37
Mike Fiore 1:f155d94d6f3a 38 std::string Cellular::getRegistrationNames(Registration registration)
Mike Fiore 1:f155d94d6f3a 39 {
Mike Fiore 1:f155d94d6f3a 40 switch(registration) {
Mike Fiore 1:f155d94d6f3a 41 case NOT_REGISTERED:
Mike Fiore 1:f155d94d6f3a 42 return "NOT_REGISTERED";
Mike Fiore 1:f155d94d6f3a 43 case REGISTERED:
Mike Fiore 1:f155d94d6f3a 44 return "REGISTERED";
Mike Fiore 1:f155d94d6f3a 45 case SEARCHING:
Mike Fiore 1:f155d94d6f3a 46 return "SEARCHING";
Mike Fiore 1:f155d94d6f3a 47 case DENIED:
Mike Fiore 1:f155d94d6f3a 48 return "DENIED";
Mike Fiore 1:f155d94d6f3a 49 case UNKNOWN:
Mike Fiore 1:f155d94d6f3a 50 return "UNKNOWN";
Mike Fiore 1:f155d94d6f3a 51 case ROAMING:
Mike Fiore 1:f155d94d6f3a 52 return "ROAMING";
Mike Fiore 1:f155d94d6f3a 53 default:
Mike Fiore 1:f155d94d6f3a 54 return "UNKNOWN ENUM";
Mike Fiore 1:f155d94d6f3a 55 }
Mike Fiore 1:f155d94d6f3a 56 }
Mike Fiore 1:f155d94d6f3a 57
Mike Fiore 11:4e428f689069 58 std::string Cellular::getRadioNames(Radio radio) {
Mike Fiore 11:4e428f689069 59 switch(radio) {
Mike Fiore 11:4e428f689069 60 case MTSMC_H5:
Mike Fiore 11:4e428f689069 61 return "MTSMC-H5";
Mike Fiore 11:4e428f689069 62 case MTSMC_EV3:
Mike Fiore 11:4e428f689069 63 return "MTSMC-EV3";
Mike Fiore 11:4e428f689069 64 case MTSMC_G3:
Mike Fiore 11:4e428f689069 65 return "MTSMC-G3";
Mike Fiore 11:4e428f689069 66 case MTSMC_C2:
Mike Fiore 11:4e428f689069 67 return "MTSMC-C2";
Mike Fiore 11:4e428f689069 68 case MTSMC_H5_IP:
Mike Fiore 11:4e428f689069 69 return "MTSMC-H5-IP";
Mike Fiore 11:4e428f689069 70 case MTSMC_EV3_IP:
Mike Fiore 11:4e428f689069 71 return "MTSMC-EV3-IP";
Mike Fiore 11:4e428f689069 72 case MTSMC_C2_IP:
Mike Fiore 11:4e428f689069 73 return "MTSMC-C2-IP";
Vanger 69:93dace69ee98 74 case MTSMC_LAT1:
Vanger 69:93dace69ee98 75 return "MTSMC_LAT1";
Vanger 69:93dace69ee98 76 case MTSMC_LEU1:
Mike Fiore 76:6eeffc10739d 77 return "MTSMC_LEU1";
Mike Fiore 76:6eeffc10739d 78 case MTSMC_LVW2:
Mike Fiore 76:6eeffc10739d 79 return "MTSMC_LVW2";
Leon Lindenfelser 82:5b33b670adb7 80 case MTQ_LAT3:
Leon Lindenfelser 82:5b33b670adb7 81 return "MTQ_LAT3";
Leon Lindenfelser 82:5b33b670adb7 82 case MTQ_LVW3:
Leon Lindenfelser 82:5b33b670adb7 83 return "MTQ_LVW3";
Leon Lindenfelser 81:2e12915f892e 84 case MTQ_MAT1:
Leon Lindenfelser 81:2e12915f892e 85 return "MTQ-MAT1";
Leon Lindenfelser 81:2e12915f892e 86 case MTQ_MVW1:
Leon Lindenfelser 81:2e12915f892e 87 return "MTQ-MVW1";
Mike Fiore 11:4e428f689069 88 default:
Mike Fiore 11:4e428f689069 89 return "UNKNOWN ENUM";
Mike Fiore 11:4e428f689069 90 }
Mike Fiore 11:4e428f689069 91 }
Mike Fiore 11:4e428f689069 92
Mike Fiore 1:f155d94d6f3a 93 Code Cellular::test()
Mike Fiore 1:f155d94d6f3a 94 {
Mike Fiore 1:f155d94d6f3a 95 int i = 0;
mfiore 18:fa0d8120f81f 96 while (sendBasicCommand("AT", 1000) != MTS_SUCCESS) {
Mike Fiore 1:f155d94d6f3a 97 i++;
Mike Fiore 1:f155d94d6f3a 98 if (i >= 30) {
Mike Fiore 4:1f63354b8d1b 99 logError("Could not talk to radio after 30 tries");
Mike Fiore 1:f155d94d6f3a 100 i = 0;
Mike Fiore 1:f155d94d6f3a 101 }
Mike Fiore 1:f155d94d6f3a 102 wait(1);
Mike Fiore 1:f155d94d6f3a 103 }
mfiore 18:fa0d8120f81f 104 return MTS_SUCCESS;
Mike Fiore 1:f155d94d6f3a 105 }
Mike Fiore 1:f155d94d6f3a 106
Mike Fiore 1:f155d94d6f3a 107 int Cellular::getSignalStrength()
Mike Fiore 1:f155d94d6f3a 108 {
Mike Fiore 1:f155d94d6f3a 109 string response = sendCommand("AT+CSQ", 1000);
Mike Fiore 1:f155d94d6f3a 110 if (response.find("OK") == string::npos) {
Mike Fiore 1:f155d94d6f3a 111 return -1;
Mike Fiore 1:f155d94d6f3a 112 }
Mike Fiore 1:f155d94d6f3a 113 int start = response.find(':');
Mike Fiore 1:f155d94d6f3a 114 int stop = response.find(',', start);
Mike Fiore 1:f155d94d6f3a 115 string signal = response.substr(start + 2, stop - start - 2);
Mike Fiore 1:f155d94d6f3a 116 int value;
Mike Fiore 1:f155d94d6f3a 117 sscanf(signal.c_str(), "%d", &value);
Mike Fiore 1:f155d94d6f3a 118 return value;
Mike Fiore 1:f155d94d6f3a 119 }
Mike Fiore 1:f155d94d6f3a 120
Mike Fiore 1:f155d94d6f3a 121 Cellular::Registration Cellular::getRegistration()
Mike Fiore 1:f155d94d6f3a 122 {
Leon Lindenfelser 82:5b33b670adb7 123 if (type == MTQ_LVW3)
Leon Lindenfelser 82:5b33b670adb7 124 string response = sendCommand("AT+CEREG?", 5000);
Leon Lindenfelser 82:5b33b670adb7 125 else
Leon Lindenfelser 82:5b33b670adb7 126 string response = sendCommand("AT+CREG?", 5000);
Mike Fiore 1:f155d94d6f3a 127 if (response.find("OK") == string::npos) {
Mike Fiore 1:f155d94d6f3a 128 return UNKNOWN;
Mike Fiore 1:f155d94d6f3a 129 }
Mike Fiore 1:f155d94d6f3a 130 int start = response.find(',');
Mike Fiore 1:f155d94d6f3a 131 int stop = response.find(' ', start);
Mike Fiore 1:f155d94d6f3a 132 string regStat = response.substr(start + 1, stop - start - 1);
Mike Fiore 1:f155d94d6f3a 133 int value;
Mike Fiore 1:f155d94d6f3a 134 sscanf(regStat.c_str(), "%d", &value);
Mike Fiore 1:f155d94d6f3a 135 switch (value) {
Mike Fiore 1:f155d94d6f3a 136 case 0:
Mike Fiore 1:f155d94d6f3a 137 return NOT_REGISTERED;
Mike Fiore 1:f155d94d6f3a 138 case 1:
Mike Fiore 1:f155d94d6f3a 139 return REGISTERED;
Mike Fiore 1:f155d94d6f3a 140 case 2:
Mike Fiore 1:f155d94d6f3a 141 return SEARCHING;
Mike Fiore 1:f155d94d6f3a 142 case 3:
Mike Fiore 1:f155d94d6f3a 143 return DENIED;
Mike Fiore 1:f155d94d6f3a 144 case 4:
Mike Fiore 1:f155d94d6f3a 145 return UNKNOWN;
Mike Fiore 1:f155d94d6f3a 146 case 5:
Mike Fiore 1:f155d94d6f3a 147 return ROAMING;
Mike Fiore 1:f155d94d6f3a 148 }
Mike Fiore 1:f155d94d6f3a 149 return UNKNOWN;
Mike Fiore 1:f155d94d6f3a 150 }
Mike Fiore 7:0ee8e69a3e9c 151
Mike Fiore 8:2d7259d244d1 152 Code Cellular::setDns(const std::string& primary, const std::string& secondary)
Mike Fiore 8:2d7259d244d1 153 {
Mike Fiore 8:2d7259d244d1 154 return sendBasicCommand("AT#DNS=1," + primary + "," + secondary, 1000);
Mike Fiore 8:2d7259d244d1 155 }
Mike Fiore 8:2d7259d244d1 156
Mike Fiore 7:0ee8e69a3e9c 157 Code Cellular::sendSMS(const Sms& sms)
Mike Fiore 7:0ee8e69a3e9c 158 {
Mike Fiore 7:0ee8e69a3e9c 159 return sendSMS(sms.phoneNumber, sms.message);
Mike Fiore 7:0ee8e69a3e9c 160 }
Mike Fiore 7:0ee8e69a3e9c 161
Mike Fiore 10:c188cc05aed5 162 Code Cellular::sendBasicCommand(const std::string& command, unsigned int timeoutMillis, char esc)
Mike Fiore 10:c188cc05aed5 163 {
Mike Fiore 10:c188cc05aed5 164 if(socketOpened) {
Mike Fiore 10:c188cc05aed5 165 logError("socket is open. Can not send AT commands");
mfiore 18:fa0d8120f81f 166 return MTS_ERROR;
Mike Fiore 10:c188cc05aed5 167 }
Mike Fiore 10:c188cc05aed5 168
Mike Fiore 10:c188cc05aed5 169 string response = sendCommand(command, timeoutMillis, esc);
Mike Fiore 10:c188cc05aed5 170 if (response.size() == 0) {
mfiore 18:fa0d8120f81f 171 return MTS_NO_RESPONSE;
Mike Fiore 10:c188cc05aed5 172 } else if (response.find("OK") != string::npos) {
mfiore 18:fa0d8120f81f 173 return MTS_SUCCESS;
Mike Fiore 10:c188cc05aed5 174 } else if (response.find("ERROR") != string::npos) {
mfiore 18:fa0d8120f81f 175 return MTS_ERROR;
Mike Fiore 10:c188cc05aed5 176 } else {
mfiore 18:fa0d8120f81f 177 return MTS_FAILURE;
Mike Fiore 10:c188cc05aed5 178 }
Mike Fiore 10:c188cc05aed5 179 }
Mike Fiore 10:c188cc05aed5 180
Mike Fiore 10:c188cc05aed5 181 string Cellular::sendCommand(const std::string& command, unsigned int timeoutMillis, char esc)
Mike Fiore 10:c188cc05aed5 182 {
Mike Fiore 10:c188cc05aed5 183 if(io == NULL) {
Mike Fiore 10:c188cc05aed5 184 logError("MTSBufferedIO not set");
Mike Fiore 10:c188cc05aed5 185 return "";
Mike Fiore 10:c188cc05aed5 186 }
Mike Fiore 10:c188cc05aed5 187 if(socketOpened) {
Mike Fiore 10:c188cc05aed5 188 logError("socket is open. Can not send AT commands");
Mike Fiore 10:c188cc05aed5 189 return "";
Mike Fiore 10:c188cc05aed5 190 }
Mike Fiore 10:c188cc05aed5 191
Mike Fiore 10:c188cc05aed5 192 io->rxClear();
Mike Fiore 10:c188cc05aed5 193 io->txClear();
Mike Fiore 10:c188cc05aed5 194 std::string result;
Mike Fiore 10:c188cc05aed5 195
Mike Fiore 10:c188cc05aed5 196 //Attempt to write command
Mike Fiore 10:c188cc05aed5 197 if(io->write(command.data(), command.size(), timeoutMillis) != command.size()) {
Mike Fiore 10:c188cc05aed5 198 //Failed to write command
Mike Fiore 10:c188cc05aed5 199 if (command != "AT" && command != "at") {
Mike Fiore 10:c188cc05aed5 200 logError("failed to send command to radio within %d milliseconds", timeoutMillis);
Mike Fiore 10:c188cc05aed5 201 }
Mike Fiore 10:c188cc05aed5 202 return "";
Mike Fiore 10:c188cc05aed5 203 }
Mike Fiore 10:c188cc05aed5 204
Mike Fiore 10:c188cc05aed5 205 //Send Escape Character
Mike Fiore 10:c188cc05aed5 206 if (esc != 0x00) {
Mike Fiore 10:c188cc05aed5 207 if(io->write(esc, timeoutMillis) != 1) {
Mike Fiore 10:c188cc05aed5 208 if (command != "AT" && command != "at") {
Mike Fiore 10:c188cc05aed5 209 logError("failed to send character '%c' (0x%02X) to radio within %d milliseconds", esc, esc, timeoutMillis);
Mike Fiore 10:c188cc05aed5 210 }
Mike Fiore 10:c188cc05aed5 211 return "";
Mike Fiore 10:c188cc05aed5 212 }
Mike Fiore 10:c188cc05aed5 213 }
Vanger 41:8b9b5098696f 214 mbed::Timer tmr;
Mike Fiore 10:c188cc05aed5 215 char tmp[256];
Mike Fiore 10:c188cc05aed5 216 tmp[255] = 0;
Mike Fiore 10:c188cc05aed5 217 bool done = false;
Vanger 41:8b9b5098696f 218 tmr.start();
Mike Fiore 10:c188cc05aed5 219 do {
Mike Fiore 10:c188cc05aed5 220 //Make a non-blocking read call by passing timeout of zero
Mike Fiore 10:c188cc05aed5 221 int size = io->read(tmp,255,0); //1 less than allocated (timeout is instant)
Mike Fiore 10:c188cc05aed5 222 if(size > 0) {
Mike Fiore 10:c188cc05aed5 223 result.append(tmp, size);
Mike Fiore 10:c188cc05aed5 224 }
Vanger 41:8b9b5098696f 225
Vanger 45:b9ead235ab7c 226 //Check for a response to signify the completion of the AT command
Vanger 41:8b9b5098696f 227 //OK, ERROR, CONNECT are the 3 most likely responses
Vanger 41:8b9b5098696f 228 if(result.size() > (command.size() + 2)) {
Vanger 52:2cb58398a4f9 229 if(result.find("OK\r\n",command.size()) != std::string::npos) {
Vanger 45:b9ead235ab7c 230 done = true;
Vanger 56:43205bd2752a 231 } else if (result.find("ERROR") != std::string::npos) {
Vanger 45:b9ead235ab7c 232 done = true;
Vanger 52:2cb58398a4f9 233 } else if (result.find("NO CARRIER\r\n") != std::string::npos) {
Vanger 52:2cb58398a4f9 234 done = true;
Vanger 48:3f9d82915e83 235 }
Vanger 48:3f9d82915e83 236
Leon Lindenfelser 81:2e12915f892e 237 if(type == MTSMC_H5 || type == MTSMC_G3 || type == MTSMC_EV3 || type == MTSMC_C2 || type == MTSMC_LAT1 || type == MTSMC_LEU1 ||
Leon Lindenfelser 82:5b33b670adb7 238 type == MTSMC_LVW2 || type == MTQ_LAT3 || type == MTQ_LVW3 || type == MTQ_MAT1 || type == MTQ_MVW1) {
Vanger 52:2cb58398a4f9 239 if (result.find("CONNECT\r\n") != std::string::npos) {
Vanger 45:b9ead235ab7c 240 done = true;
Vanger 45:b9ead235ab7c 241 }
Vanger 45:b9ead235ab7c 242 } else if (type == MTSMC_H5_IP || type == MTSMC_EV3_IP || type == MTSMC_C2_IP) {
Vanger 52:2cb58398a4f9 243 if (result.find("Ok_Info_WaitingForData\r\n") != std::string::npos) {
Vanger 51:ffc556ba33f7 244 done = true;
Vanger 52:2cb58398a4f9 245 } else if (result.find("Ok_Info_SocketClosed\r\n") != std::string::npos) {
Vanger 51:ffc556ba33f7 246 done = true;
Vanger 52:2cb58398a4f9 247 } else if (result.find("Ok_Info_PPP\r\n") != std::string::npos) {
Vanger 51:ffc556ba33f7 248 done = true;
Vanger 52:2cb58398a4f9 249 } else if (result.find("Ok_Info_GprsActivation\r\n") != std::string::npos) {
Vanger 51:ffc556ba33f7 250 done = true;
Vanger 59:5535f14e3cc4 251 }
Vanger 45:b9ead235ab7c 252 }
Mike Fiore 10:c188cc05aed5 253 }
Vanger 41:8b9b5098696f 254
Vanger 41:8b9b5098696f 255 if(tmr.read_ms() >= timeoutMillis) {
Mike Fiore 10:c188cc05aed5 256 if (command != "AT" && command != "at") {
Mike Fiore 10:c188cc05aed5 257 logWarning("sendCommand [%s] timed out after %d milliseconds", command.c_str(), timeoutMillis);
Mike Fiore 10:c188cc05aed5 258 }
Mike Fiore 10:c188cc05aed5 259 done = true;
Mike Fiore 10:c188cc05aed5 260 }
Mike Fiore 10:c188cc05aed5 261 } while (!done);
mfiore 78:fc9d2b983744 262
Mike Fiore 10:c188cc05aed5 263 return result;
Mike Fiore 10:c188cc05aed5 264 }
Mike Fiore 10:c188cc05aed5 265
Mike Fiore 7:0ee8e69a3e9c 266 Code Cellular::sendSMS(const std::string& phoneNumber, const std::string& message)
Mike Fiore 7:0ee8e69a3e9c 267 {
mfiore 16:1bc3e44d4746 268 string csmp;
mfiore 16:1bc3e44d4746 269
Leon Lindenfelser 82:5b33b670adb7 270 if (type == MTSMC_H5_IP || type == MTSMC_H5 || type == MTSMC_G3 || type == MTSMC_LAT1 || type == MTSMC_LEU1 ||
Leon Lindenfelser 82:5b33b670adb7 271 type == MTQ_LAT3 || type == MTQ_MAT1 || type == MTQ_MVW1) {
mfiore 16:1bc3e44d4746 272 csmp = "AT+CSMP=17,167,0,0";
Leon Lindenfelser 82:5b33b670adb7 273 } else if (type == MTSMC_EV3_IP || type == MTSMC_EV3 || type == MTSMC_C2_IP || type == MTSMC_C2 || type == MTSMC_LVW2 ||
Leon Lindenfelser 82:5b33b670adb7 274 type == MTQ_LVW3 ) {
mfiore 16:1bc3e44d4746 275 csmp = "AT+CSMP=,4098,0,2";
mfiore 16:1bc3e44d4746 276 } else {
mfiore 16:1bc3e44d4746 277 logError("unknown radio type [%d]", type);
mfiore 18:fa0d8120f81f 278 return MTS_FAILURE;
mfiore 16:1bc3e44d4746 279 }
mfiore 16:1bc3e44d4746 280
Vanger 56:43205bd2752a 281 Code code = sendBasicCommand("AT+CMGF=1", 2000);
mfiore 18:fa0d8120f81f 282 if (code != MTS_SUCCESS) {
mfiore 16:1bc3e44d4746 283 logError("CMGF failed");
mfiore 16:1bc3e44d4746 284 return code;
mfiore 16:1bc3e44d4746 285 }
Vanger 52:2cb58398a4f9 286
mfiore 16:1bc3e44d4746 287 code = sendBasicCommand(csmp, 1000);
mfiore 18:fa0d8120f81f 288 if (code != MTS_SUCCESS) {
mfiore 16:1bc3e44d4746 289 logError("CSMP failed [%s]", getRadioNames(type).c_str());
Mike Fiore 7:0ee8e69a3e9c 290 return code;
Mike Fiore 7:0ee8e69a3e9c 291 }
Vanger 52:2cb58398a4f9 292
Vanger 35:257eb41405e1 293 string cmd = "AT+CMGS=\"";
Vanger 38:b2088faa8bfd 294 cmd.append("+");
Mike Fiore 7:0ee8e69a3e9c 295 cmd.append(phoneNumber);
Vanger 36:948d06b3e23c 296 cmd.append("\",145");
mfiore 23:8333593dd86f 297 for (int i = 0; i < 5; i++) {
Vanger 48:3f9d82915e83 298 string response1 = sendCommand(cmd, 2000);
mfiore 23:8333593dd86f 299 if (response1.find('>') != string::npos) {
mfiore 23:8333593dd86f 300 break;
mfiore 23:8333593dd86f 301 }
mfiore 23:8333593dd86f 302 if (i >= 5) {
mfiore 23:8333593dd86f 303 logError("CMGS phone number failed");
mfiore 23:8333593dd86f 304 return MTS_NO_RESPONSE;
mfiore 23:8333593dd86f 305 }
mfiore 23:8333593dd86f 306 wait(1);
Mike Fiore 7:0ee8e69a3e9c 307 }
Mike Fiore 7:0ee8e69a3e9c 308 wait(.2);
Vanger 52:2cb58398a4f9 309
Vanger 56:43205bd2752a 310 string response2 = sendCommand(message, 15000, CTRL_Z);
Vanger 55:85c04afa939a 311 if (response2.find("+CMGS:") == string::npos) {
Vanger 55:85c04afa939a 312 logError("CMGS message failed");
Vanger 55:85c04afa939a 313 return MTS_FAILURE;
Mike Fiore 7:0ee8e69a3e9c 314 }
Vanger 55:85c04afa939a 315
mfiore 18:fa0d8120f81f 316 return MTS_SUCCESS;
Mike Fiore 7:0ee8e69a3e9c 317 }
Mike Fiore 7:0ee8e69a3e9c 318
Mike Fiore 7:0ee8e69a3e9c 319 std::vector<Cellular::Sms> Cellular::getReceivedSms()
Mike Fiore 7:0ee8e69a3e9c 320 {
Mike Fiore 7:0ee8e69a3e9c 321 int smsNumber = 0;
Mike Fiore 7:0ee8e69a3e9c 322 std::vector<Sms> vSms;
mfiore 16:1bc3e44d4746 323 std::string received;
mfiore 16:1bc3e44d4746 324 size_t pos;
mfiore 16:1bc3e44d4746 325
Vanger 56:43205bd2752a 326 Code code = sendBasicCommand("AT+CMGF=1", 2000);
mfiore 18:fa0d8120f81f 327 if (code != MTS_SUCCESS) {
mfiore 16:1bc3e44d4746 328 logError("CMGF failed");
mfiore 16:1bc3e44d4746 329 return vSms;
mfiore 16:1bc3e44d4746 330 }
mfiore 16:1bc3e44d4746 331
Vanger 35:257eb41405e1 332 received = sendCommand("AT+CMGL=\"ALL\"", 5000);
mfiore 16:1bc3e44d4746 333 pos = received.find("+CMGL: ");
Mike Fiore 7:0ee8e69a3e9c 334
Mike Fiore 7:0ee8e69a3e9c 335 while (pos != std::string::npos) {
Mike Fiore 7:0ee8e69a3e9c 336 Cellular::Sms sms;
Mike Fiore 7:0ee8e69a3e9c 337 std::string line(Text::getLine(received, pos, pos));
Mike Fiore 7:0ee8e69a3e9c 338 if(line.find("+CMGL: ") == std::string::npos) {
Mike Fiore 7:0ee8e69a3e9c 339 continue;
Mike Fiore 7:0ee8e69a3e9c 340 }
Mike Fiore 7:0ee8e69a3e9c 341 //Start of SMS message
Mike Fiore 7:0ee8e69a3e9c 342 std::vector<std::string> vSmsParts = Text::split(line, ',');
Leon Lindenfelser 82:5b33b670adb7 343 if (type == MTSMC_H5_IP || type == MTSMC_H5 || type == MTSMC_G3 || type == MTSMC_LAT1 || type == MTSMC_LEU1 || type == MTQ_LAT3 || type == MTQ_MAT1 || type == MTQ_MVW1) {
mfiore 16:1bc3e44d4746 344 /* format for H5 and H5-IP radios
mfiore 16:1bc3e44d4746 345 * <index>, <status>, <oa>, <alpha>, <scts>
mfiore 16:1bc3e44d4746 346 * scts contains a comma, so splitting on commas should give us 6 items
mfiore 16:1bc3e44d4746 347 */
mfiore 16:1bc3e44d4746 348 if(vSmsParts.size() != 6) {
mfiore 16:1bc3e44d4746 349 logWarning("Expected 5 commas. SMS[%d] DATA[%s]. Continuing ...", smsNumber, line.c_str());
mfiore 16:1bc3e44d4746 350 continue;
mfiore 16:1bc3e44d4746 351 }
mfiore 16:1bc3e44d4746 352
mfiore 16:1bc3e44d4746 353 sms.phoneNumber = vSmsParts[2];
mfiore 16:1bc3e44d4746 354 sms.timestamp = vSmsParts[4] + ", " + vSmsParts[5];
Leon Lindenfelser 82:5b33b670adb7 355 } else if (type == MTSMC_EV3_IP || type == MTSMC_EV3 || type == MTSMC_C2_IP || type == MTSMC_C2 || type == MTSMC_LVW2 || type == MTQ_LVW3) {
mfiore 16:1bc3e44d4746 356 /* format for EV3 and EV3-IP radios
mfiore 16:1bc3e44d4746 357 * <index>, <status>, <oa>, <callback>, <date>
mfiore 16:1bc3e44d4746 358 * splitting on commas should give us 5 items
mfiore 16:1bc3e44d4746 359 */
mfiore 16:1bc3e44d4746 360 if(vSmsParts.size() != 5) {
mfiore 16:1bc3e44d4746 361 logWarning("Expected 4 commas. SMS[%d] DATA[%s]. Continuing ...", smsNumber, line.c_str());
mfiore 16:1bc3e44d4746 362 continue;
mfiore 16:1bc3e44d4746 363 }
mfiore 16:1bc3e44d4746 364
mfiore 16:1bc3e44d4746 365 sms.phoneNumber = vSmsParts[2];
mfiore 16:1bc3e44d4746 366 /* timestamp is in a nasty format
mfiore 16:1bc3e44d4746 367 * YYYYMMDDHHMMSS
mfiore 16:1bc3e44d4746 368 * nobody wants to try and decipher that, so format it nicely
mfiore 16:1bc3e44d4746 369 * YY/MM/DD,HH:MM:SS
mfiore 16:1bc3e44d4746 370 */
Mike Fiore 76:6eeffc10739d 371 string s = vSmsParts[4];
Mike Fiore 76:6eeffc10739d 372 if (type == MTSMC_LVW2) {
Mike Fiore 76:6eeffc10739d 373 sms.timestamp = s.substr(3,2) + "/" + s.substr(5,2) + "/" + s.substr(7,2) + ", " + s.substr(9,2) + ":" + s.substr(11,2) + ":" + s.substr(13,2);
Mike Fiore 76:6eeffc10739d 374 } else {
Mike Fiore 76:6eeffc10739d 375 sms.timestamp = s.substr(2,2) + "/" + s.substr(4,2) + "/" + s.substr(6,2) + ", " + s.substr(8,2) + ":" + s.substr(10,2) + ":" + s.substr(12,2);
Mike Fiore 76:6eeffc10739d 376 }
Mike Fiore 7:0ee8e69a3e9c 377 }
Mike Fiore 7:0ee8e69a3e9c 378
Mike Fiore 7:0ee8e69a3e9c 379 if(pos == std::string::npos) {
Mike Fiore 7:0ee8e69a3e9c 380 logWarning("Expected SMS body. SMS[%d]. Leaving ...", smsNumber);
Mike Fiore 7:0ee8e69a3e9c 381 break;
Mike Fiore 7:0ee8e69a3e9c 382 }
Mike Fiore 7:0ee8e69a3e9c 383 //Check for the start of the next SMS message
Vanger 48:3f9d82915e83 384 size_t bodyEnd = received.find("\r\n+CMGL:", pos);
Mike Fiore 7:0ee8e69a3e9c 385 if(bodyEnd == std::string::npos) {
Mike Fiore 7:0ee8e69a3e9c 386 //This must be the last SMS message
Mike Fiore 7:0ee8e69a3e9c 387 bodyEnd = received.find("\r\n\r\nOK", pos);
Mike Fiore 7:0ee8e69a3e9c 388 }
Mike Fiore 7:0ee8e69a3e9c 389 //Safety check that we found the boundary of this current SMS message
Mike Fiore 7:0ee8e69a3e9c 390 if(bodyEnd != std::string::npos) {
Mike Fiore 7:0ee8e69a3e9c 391 sms.message = received.substr(pos, bodyEnd - pos);
Mike Fiore 7:0ee8e69a3e9c 392 } else {
Mike Fiore 7:0ee8e69a3e9c 393 sms.message = received.substr(pos);
Mike Fiore 7:0ee8e69a3e9c 394 logWarning("Expected to find end of SMS list. SMS[%d] DATA[%s].", smsNumber, sms.message.c_str());
Mike Fiore 7:0ee8e69a3e9c 395 }
Mike Fiore 7:0ee8e69a3e9c 396 vSms.push_back(sms);
Mike Fiore 7:0ee8e69a3e9c 397 pos = bodyEnd;
Mike Fiore 7:0ee8e69a3e9c 398 smsNumber++;
Mike Fiore 7:0ee8e69a3e9c 399 }
Mike Fiore 7:0ee8e69a3e9c 400 logInfo("Received %d SMS", smsNumber);
Mike Fiore 7:0ee8e69a3e9c 401 return vSms;
Mike Fiore 7:0ee8e69a3e9c 402 }
Mike Fiore 7:0ee8e69a3e9c 403
Mike Fiore 7:0ee8e69a3e9c 404 Code Cellular::deleteOnlyReceivedReadSms()
Mike Fiore 7:0ee8e69a3e9c 405 {
Mike Fiore 7:0ee8e69a3e9c 406 return sendBasicCommand("AT+CMGD=1,1", 1000);
Mike Fiore 7:0ee8e69a3e9c 407 }
Mike Fiore 7:0ee8e69a3e9c 408
Mike Fiore 7:0ee8e69a3e9c 409 Code Cellular::deleteAllReceivedSms()
Mike Fiore 7:0ee8e69a3e9c 410 {
Mike Fiore 7:0ee8e69a3e9c 411 return sendBasicCommand("AT+CMGD=1,4", 1000);
Mike Fiore 7:0ee8e69a3e9c 412 }
Vanger 56:43205bd2752a 413
Vanger 56:43205bd2752a 414 unsigned int Cellular::readable()
Vanger 56:43205bd2752a 415 {
Vanger 56:43205bd2752a 416 if(io == NULL) {
Vanger 56:43205bd2752a 417 logWarning("MTSBufferedIO not set");
Vanger 56:43205bd2752a 418 return 0;
Vanger 56:43205bd2752a 419 }
Vanger 56:43205bd2752a 420 if(!socketOpened && !io->readable()) {
Vanger 56:43205bd2752a 421 logWarning("Socket is not open");
Vanger 56:43205bd2752a 422 return 0;
Vanger 56:43205bd2752a 423 }
Vanger 56:43205bd2752a 424 return io->readable();
Vanger 56:43205bd2752a 425 }
Vanger 56:43205bd2752a 426
Vanger 63:f46ef5823ab5 427 std::string Cellular::getEquipmentIdentifier()
Vanger 63:f46ef5823ab5 428 {
Vanger 65:2cdd943bb3a3 429 string equipmentIdentifier = sendCommand("AT+CGSN", 2000);
Vanger 65:2cdd943bb3a3 430 std::vector<std::string> lines = Text::split(equipmentIdentifier, "\r\n");
Vanger 63:f46ef5823ab5 431
Vanger 64:6b6ccf11fb4c 432 if (equipmentIdentifier.find("OK") != string::npos) {
Vanger 65:2cdd943bb3a3 433 equipmentIdentifier = lines[1];
Vanger 63:f46ef5823ab5 434 } else {
Vanger 64:6b6ccf11fb4c 435 //Empty string signifies failure
Vanger 63:f46ef5823ab5 436 equipmentIdentifier.clear();
Vanger 63:f46ef5823ab5 437 }
Vanger 63:f46ef5823ab5 438
Vanger 63:f46ef5823ab5 439 return equipmentIdentifier;
Vanger 63:f46ef5823ab5 440 }
Vanger 63:f46ef5823ab5 441
mfiore 80:e66bf5723b98 442 int Cellular::getRadioType()
mfiore 80:e66bf5723b98 443 {
mfiore 80:e66bf5723b98 444 return type;
mfiore 80:e66bf5723b98 445 }
mfiore 80:e66bf5723b98 446
mfiore 80:e66bf5723b98 447 std::string Cellular::getRadioTypeString()
Mike Fiore 76:6eeffc10739d 448 {
Mike Fiore 76:6eeffc10739d 449 return getRadioNames(type);
Mike Fiore 76:6eeffc10739d 450 }
Mike Fiore 76:6eeffc10739d 451
Vanger 56:43205bd2752a 452 unsigned int Cellular::writeable()
Vanger 56:43205bd2752a 453 {
Vanger 56:43205bd2752a 454 if(io == NULL) {
Vanger 56:43205bd2752a 455 logWarning("MTSBufferedIO not set");
Vanger 56:43205bd2752a 456 return 0;
Vanger 56:43205bd2752a 457 }
Vanger 56:43205bd2752a 458 if(!socketOpened) {
Vanger 56:43205bd2752a 459 logWarning("Socket is not open");
Vanger 56:43205bd2752a 460 return 0;
Vanger 56:43205bd2752a 461 }
Vanger 56:43205bd2752a 462
Vanger 56:43205bd2752a 463 return io->writeable();
Vanger 56:43205bd2752a 464 }
Vanger 56:43205bd2752a 465
Vanger 56:43205bd2752a 466 bool Cellular::setDeviceIP(std::string address)
Vanger 56:43205bd2752a 467 {
Vanger 56:43205bd2752a 468 if (address.compare("DHCP") == 0) {
Vanger 56:43205bd2752a 469 return true;
Vanger 56:43205bd2752a 470 } else {
Vanger 56:43205bd2752a 471 logWarning("Radio does not support static IPs, using DHCP.");
Vanger 56:43205bd2752a 472 return false;
Vanger 56:43205bd2752a 473 }
Vanger 56:43205bd2752a 474 }
Vanger 56:43205bd2752a 475
Vanger 56:43205bd2752a 476 std::string Cellular::getDeviceIP()
Vanger 56:43205bd2752a 477 {
Vanger 56:43205bd2752a 478 return local_address;
Vanger 56:43205bd2752a 479 }
Vanger 56:43205bd2752a 480
Vanger 56:43205bd2752a 481 //Turns off echo when it receives a true, turns on when it receives false
Vanger 56:43205bd2752a 482 Code Cellular::echo(bool state)
Vanger 56:43205bd2752a 483 {
Vanger 56:43205bd2752a 484 Code code;
Vanger 56:43205bd2752a 485 if (state) {
Vanger 56:43205bd2752a 486 code = sendBasicCommand("ATE0", 1000);
Vanger 56:43205bd2752a 487 echoMode = (code == MTS_SUCCESS) ? false : echoMode;
Vanger 56:43205bd2752a 488 } else {
Vanger 56:43205bd2752a 489 code = sendBasicCommand("ATE1", 1000);
Vanger 56:43205bd2752a 490 echoMode = (code == MTS_SUCCESS) ? true : echoMode;
Vanger 56:43205bd2752a 491 }
Vanger 56:43205bd2752a 492 return code;
Vanger 56:43205bd2752a 493 }
Vanger 56:43205bd2752a 494
Vanger 56:43205bd2752a 495 //Pass 1 to enable socket closeable
Vanger 56:43205bd2752a 496 //Pass 0 to disable socket closeable
Vanger 56:43205bd2752a 497 Code Cellular::setSocketCloseable(bool enabled)
Vanger 56:43205bd2752a 498 {
Vanger 56:43205bd2752a 499 if(socketCloseable == enabled) {
Vanger 56:43205bd2752a 500 return MTS_SUCCESS;
Vanger 56:43205bd2752a 501 }
Vanger 56:43205bd2752a 502
Vanger 56:43205bd2752a 503 if(socketOpened) {
Vanger 56:43205bd2752a 504 logError("socket is already opened. Can not set closeable");
Vanger 56:43205bd2752a 505 return MTS_ERROR;
Vanger 56:43205bd2752a 506 }
Vanger 56:43205bd2752a 507
Vanger 56:43205bd2752a 508 socketCloseable = enabled;
Vanger 56:43205bd2752a 509
Vanger 56:43205bd2752a 510 return MTS_SUCCESS;
Vanger 56:43205bd2752a 511 }
Vanger 56:43205bd2752a 512
Vanger 56:43205bd2752a 513 bool Cellular::isOpen()
Vanger 56:43205bd2752a 514 {
Vanger 56:43205bd2752a 515 if(io->readable()) {
Vanger 56:43205bd2752a 516 logDebug("Assuming open, data available to read.");
Vanger 56:43205bd2752a 517 return true;
Vanger 56:43205bd2752a 518 }
Vanger 56:43205bd2752a 519 return socketOpened;
Vanger 56:43205bd2752a 520 }
Vanger 56:43205bd2752a 521
Vanger 56:43205bd2752a 522 //Binds the socket to a specific port if able
Vanger 56:43205bd2752a 523 bool Cellular::bind(unsigned int port)
Vanger 56:43205bd2752a 524 {
Vanger 56:43205bd2752a 525 if(socketOpened) {
Vanger 56:43205bd2752a 526 logError("socket is open. Can not set local port");
Vanger 56:43205bd2752a 527 return false;
Vanger 56:43205bd2752a 528 }
Vanger 56:43205bd2752a 529 if(port > 65535) {
Vanger 56:43205bd2752a 530 logError("port out of range (0-65535)");
Vanger 56:43205bd2752a 531 return false;
Vanger 56:43205bd2752a 532 }
Vanger 56:43205bd2752a 533 local_port = port;
Vanger 56:43205bd2752a 534 return true;
Vanger 56:43205bd2752a 535 }
Vanger 56:43205bd2752a 536
mfiore 78:fc9d2b983744 537 bool Cellular::GPSenable(){
mfiore 78:fc9d2b983744 538 return true;
mfiore 78:fc9d2b983744 539 }
mfiore 78:fc9d2b983744 540
mfiore 78:fc9d2b983744 541 bool Cellular::GPSdisable(){
mfiore 78:fc9d2b983744 542 return true;
mfiore 78:fc9d2b983744 543 }
mfiore 78:fc9d2b983744 544
mfiore 78:fc9d2b983744 545 bool Cellular::GPSenabled(){
mfiore 78:fc9d2b983744 546 return true;
mfiore 78:fc9d2b983744 547 }
mfiore 78:fc9d2b983744 548 Cellular::gpsData Cellular::GPSgetPosition(){
mfiore 78:fc9d2b983744 549 gpsData response;
mfiore 78:fc9d2b983744 550 response.success = true;
mfiore 78:fc9d2b983744 551 return response;
mfiore 78:fc9d2b983744 552 }
mfiore 78:fc9d2b983744 553
mfiore 78:fc9d2b983744 554 bool Cellular::GPSgotFix(){
mfiore 78:fc9d2b983744 555 return true;
mfiore 78:fc9d2b983744 556 }