Simple detection for LE910-NA1 modules

Fork of MTS-Cellular by MultiTech

Committer:
Mike Fiore
Date:
Thu Jun 25 08:27:35 2015 -0500
Revision:
76:6eeffc10739d
Parent:
73:bba8669d36f7
Child:
78:fc9d2b983744
add EU and Verizon LTE support, git rev 34875cd9c59aa9191bc3d0af0032ebf2d3ee2c0b

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Vanger 26:2b769ed8de4f 1 #include "mbed.h"
Vanger 26:2b769ed8de4f 2 #include "EasyIP.h"
Vanger 26:2b769ed8de4f 3 #include "MTSText.h"
Vanger 26:2b769ed8de4f 4 #include "MTSLog.h"
Vanger 26:2b769ed8de4f 5 #include "CellUtils.h"
Vanger 26:2b769ed8de4f 6
Vanger 26:2b769ed8de4f 7 using namespace mts;
Vanger 26:2b769ed8de4f 8
Vanger 26:2b769ed8de4f 9 EasyIP::EasyIP(Radio type)
Vanger 26:2b769ed8de4f 10 {
Vanger 26:2b769ed8de4f 11 this->type = type;
Vanger 26:2b769ed8de4f 12 io = NULL;
Vanger 26:2b769ed8de4f 13 dcd = NULL;
Vanger 26:2b769ed8de4f 14 dtr = NULL;
Vanger 26:2b769ed8de4f 15 resetLine = NULL;
Vanger 26:2b769ed8de4f 16 echoMode = true;
Vanger 26:2b769ed8de4f 17 pppConnected = false;
Vanger 26:2b769ed8de4f 18 socketMode = TCP;
Vanger 26:2b769ed8de4f 19 socketOpened = false;
Vanger 26:2b769ed8de4f 20 socketCloseable = true;
Vanger 26:2b769ed8de4f 21 local_port = 0;
Vanger 26:2b769ed8de4f 22 local_address = "";
Vanger 26:2b769ed8de4f 23 host_port = 0;
Vanger 26:2b769ed8de4f 24 }
Vanger 26:2b769ed8de4f 25
Vanger 26:2b769ed8de4f 26 EasyIP::~EasyIP()
Vanger 26:2b769ed8de4f 27 {
Vanger 26:2b769ed8de4f 28 if (dtr != NULL) {
Vanger 26:2b769ed8de4f 29 dtr->write(1);
Vanger 26:2b769ed8de4f 30 }
Vanger 26:2b769ed8de4f 31
Vanger 26:2b769ed8de4f 32 delete dcd;
Vanger 26:2b769ed8de4f 33 delete dtr;
Vanger 26:2b769ed8de4f 34 delete resetLine;
Vanger 26:2b769ed8de4f 35 }
Vanger 26:2b769ed8de4f 36
Vanger 26:2b769ed8de4f 37 //Initializes the MTS IO Buffer
Vanger 26:2b769ed8de4f 38 bool EasyIP::init(MTSBufferedIO* io)
Vanger 26:2b769ed8de4f 39 {
Mike Fiore 76:6eeffc10739d 40 char buf[128];
Mike Fiore 76:6eeffc10739d 41
Vanger 26:2b769ed8de4f 42 if (! Cellular::init(io)) {
Vanger 26:2b769ed8de4f 43 return false;
Vanger 26:2b769ed8de4f 44 }
Vanger 26:2b769ed8de4f 45
Vanger 26:2b769ed8de4f 46 logDebug("radio type: %s", Cellular::getRadioNames(type).c_str());
Vanger 49:1fc51c53cebf 47 //Turns on the HW flow control
Vanger 56:43205bd2752a 48 if(sendBasicCommand("AT+IFC=2,2", 2000) != MTS_SUCCESS) {
Vanger 52:2cb58398a4f9 49 logWarning("Failed to enable serial flow control");
Vanger 35:257eb41405e1 50 }
mfiore 71:8e8152d955d1 51 // Shorten data sending timeout from 5s to 100ms
mfiore 71:8e8152d955d1 52 // Some servers won't handle a timeout that long
Mike Fiore 76:6eeffc10739d 53 snprintf(buf, sizeof(buf), "AT#SCFG=1,%d,300,90,600,1", type == MTSMC_LVW2 ? 3 : 1);
Mike Fiore 76:6eeffc10739d 54 if (sendBasicCommand(string(buf), 2000) != MTS_SUCCESS) {
mfiore 71:8e8152d955d1 55 logWarning("Failed to reconfigure socket timeout parameters");
mfiore 71:8e8152d955d1 56 }
Vanger 26:2b769ed8de4f 57 return true;
Vanger 26:2b769ed8de4f 58 }
Vanger 26:2b769ed8de4f 59
Vanger 26:2b769ed8de4f 60 bool EasyIP::connect()
Vanger 26:2b769ed8de4f 61 {
Vanger 33:3b6f3904dde0 62 //Check if APN is not set, if it is not, connect will not work.
Mike Fiore 76:6eeffc10739d 63 if (type == MTSMC_H5_IP || type == MTSMC_H5 || type == MTSMC_G3 || type == MTSMC_LAT1 || type == MTSMC_LEU1) {
Vanger 29:edc613ed3f2e 64 if(apn.size() == 0) {
Vanger 29:edc613ed3f2e 65 logDebug("APN is not set");
Vanger 29:edc613ed3f2e 66 return false;
Vanger 29:edc613ed3f2e 67 }
Vanger 29:edc613ed3f2e 68 }
Vanger 29:edc613ed3f2e 69
Vanger 26:2b769ed8de4f 70 //Check if socket is open
Vanger 26:2b769ed8de4f 71 if(socketOpened) {
Vanger 26:2b769ed8de4f 72 return true;
Vanger 26:2b769ed8de4f 73 }
Vanger 26:2b769ed8de4f 74
Vanger 26:2b769ed8de4f 75 //Check if already connected
Vanger 26:2b769ed8de4f 76 if(isConnected()) {
Vanger 26:2b769ed8de4f 77 return true;
Vanger 26:2b769ed8de4f 78 }
Vanger 51:ffc556ba33f7 79
Vanger 26:2b769ed8de4f 80 Timer tmr;
Vanger 26:2b769ed8de4f 81 //Check Registration: AT+CREG? == 0,1
Vanger 26:2b769ed8de4f 82 tmr.start();
Vanger 26:2b769ed8de4f 83 do {
Vanger 26:2b769ed8de4f 84 Registration registration = getRegistration();
Vanger 56:43205bd2752a 85 if(registration != REGISTERED && registration != ROAMING) {
Vanger 26:2b769ed8de4f 86 logTrace("Not Registered [%d] ... waiting", (int)registration);
Vanger 26:2b769ed8de4f 87 wait(1);
Vanger 26:2b769ed8de4f 88 } else {
Vanger 26:2b769ed8de4f 89 break;
Vanger 26:2b769ed8de4f 90 }
Vanger 30:1326b623919a 91 } while(tmr.read() < 30);
Vanger 51:ffc556ba33f7 92
Vanger 26:2b769ed8de4f 93 //Check RSSI: AT+CSQ
Vanger 26:2b769ed8de4f 94 tmr.reset();
Vanger 26:2b769ed8de4f 95 do {
Vanger 26:2b769ed8de4f 96 int rssi = getSignalStrength();
Vanger 26:2b769ed8de4f 97 logDebug("Signal strength: %d", rssi);
Vanger 51:ffc556ba33f7 98 if(rssi == 99 || rssi == -1) {
Vanger 26:2b769ed8de4f 99 logTrace("No Signal ... waiting");
Vanger 26:2b769ed8de4f 100 wait(1);
Vanger 26:2b769ed8de4f 101 } else {
Vanger 26:2b769ed8de4f 102 break;
Vanger 26:2b769ed8de4f 103 }
Vanger 26:2b769ed8de4f 104 } while(tmr.read() < 30);
Vanger 26:2b769ed8de4f 105
Vanger 52:2cb58398a4f9 106 //Make PPP connection
Mike Fiore 76:6eeffc10739d 107 if (type == MTSMC_H5 || type == MTSMC_G3 || type == MTSMC_LAT1 || type == MTSMC_LEU1) {
Vanger 26:2b769ed8de4f 108 logDebug("Making PPP Connection Attempt. APN[%s]", apn.c_str());
Vanger 26:2b769ed8de4f 109 } else {
Vanger 26:2b769ed8de4f 110 logDebug("Making PPP Connection Attempt");
Vanger 26:2b769ed8de4f 111 }
Mike Fiore 76:6eeffc10739d 112 char buf[64];
Mike Fiore 76:6eeffc10739d 113 snprintf(buf, sizeof(buf), "AT#SGACT=%d,1", type == MTSMC_LVW2 ? 3 : 1);
Mike Fiore 76:6eeffc10739d 114 std::string pppResult = sendCommand(string(buf), 15000);
Vanger 30:1326b623919a 115 std::vector<std::string> parts;
Vanger 26:2b769ed8de4f 116 if(pppResult.find("OK") != std::string::npos) {
Vanger 30:1326b623919a 117 parts = Text::split(pppResult, "\r\n");
Vanger 26:2b769ed8de4f 118 if(parts.size() >= 2) {
Vanger 26:2b769ed8de4f 119 parts = Text::split(parts[1], " ");
Mike Fiore 76:6eeffc10739d 120 if (parts.size() >= 2) {
Mike Fiore 76:6eeffc10739d 121 local_address = parts[1];
Mike Fiore 76:6eeffc10739d 122 }
Vanger 26:2b769ed8de4f 123 }
Vanger 26:2b769ed8de4f 124 logInfo("PPP Connection Established: IP[%s]", local_address.c_str());
Vanger 26:2b769ed8de4f 125 pppConnected = true;
Vanger 26:2b769ed8de4f 126
Vanger 26:2b769ed8de4f 127 } else {
Mike Fiore 76:6eeffc10739d 128 snprintf(buf, sizeof(buf), "%d,1", type == MTSMC_LVW2 ? 3 : 1);
Vanger 30:1326b623919a 129 pppResult = sendCommand("AT#SGACT?", 2000);
Mike Fiore 76:6eeffc10739d 130 if(pppResult.find(string(buf)) != std::string::npos) {
Vanger 52:2cb58398a4f9 131 logDebug("Radio is already connected");
Vanger 52:2cb58398a4f9 132 pppConnected = true;
Vanger 30:1326b623919a 133 } else {
Vanger 52:2cb58398a4f9 134 logError("PPP connection attempt failed");
Vanger 52:2cb58398a4f9 135 pppConnected = false;
Vanger 30:1326b623919a 136 }
Vanger 26:2b769ed8de4f 137 }
Vanger 26:2b769ed8de4f 138
Vanger 26:2b769ed8de4f 139 return pppConnected;
Vanger 26:2b769ed8de4f 140 }
Vanger 26:2b769ed8de4f 141
Vanger 26:2b769ed8de4f 142 void EasyIP::disconnect()
Vanger 26:2b769ed8de4f 143 {
Vanger 52:2cb58398a4f9 144 //AT#SGACT=1,0: Close PPP connection
Vanger 52:2cb58398a4f9 145 logDebug("Closing PPP Connection");
Vanger 35:257eb41405e1 146 std::string result;
Vanger 35:257eb41405e1 147 Timer tmr;
Vanger 52:2cb58398a4f9 148
Vanger 52:2cb58398a4f9 149 if(socketOpened) {
Vanger 66:8c55e2bf7270 150 close(true);
Vanger 52:2cb58398a4f9 151 }
Vanger 52:2cb58398a4f9 152
Vanger 26:2b769ed8de4f 153 //Sends AT#SGACT=1,0 command
Vanger 54:a6c738bfc391 154 for (int y = 0; y < 5; y++) {
Mike Fiore 76:6eeffc10739d 155 char buf[64];
Mike Fiore 76:6eeffc10739d 156 snprintf(buf, sizeof(buf), "AT#SGACT=%d,0", type == MTSMC_LVW2 ? 3 : 1);
Mike Fiore 76:6eeffc10739d 157 Code code = sendBasicCommand(string(buf), 1000);
Vanger 54:a6c738bfc391 158 if (code == MTS_SUCCESS) {
Vanger 54:a6c738bfc391 159 logDebug("Successfully closed PPP Connection");
Vanger 54:a6c738bfc391 160 break;
Vanger 54:a6c738bfc391 161 }
Vanger 30:1326b623919a 162 }
Vanger 35:257eb41405e1 163
Vanger 52:2cb58398a4f9 164 /* Ensure PPP link is down, else ping commands will put radio in unknown state
Vanger 52:2cb58398a4f9 165 * (Link is not immediate in disconnection, even though OK is returned)
Vanger 51:ffc556ba33f7 166 */
Vanger 35:257eb41405e1 167 tmr.start();
Vanger 35:257eb41405e1 168 while(tmr.read() < 30) {
Mike Fiore 76:6eeffc10739d 169 char buf[16];
Mike Fiore 76:6eeffc10739d 170 snprintf(buf, sizeof(buf), "%d,0", type == MTSMC_LVW2 ? 3 : 1);
Vanger 35:257eb41405e1 171 result = sendCommand("AT#SGACT?", 1000);
Mike Fiore 76:6eeffc10739d 172 if(result.find(string(buf)) != std::string::npos) {
Vanger 35:257eb41405e1 173 break;
Vanger 35:257eb41405e1 174 } else if(result.find("ERROR") != std::string::npos) {
Vanger 35:257eb41405e1 175 break;
Vanger 35:257eb41405e1 176 } else {
Vanger 35:257eb41405e1 177 wait(1);
Vanger 35:257eb41405e1 178 }
Vanger 35:257eb41405e1 179 }
Vanger 35:257eb41405e1 180
Vanger 52:2cb58398a4f9 181 pppConnected = false;
Vanger 30:1326b623919a 182 return;
Vanger 26:2b769ed8de4f 183 }
Vanger 27:ec44d5a9544f 184
Vanger 26:2b769ed8de4f 185 bool EasyIP::isConnected()
Vanger 26:2b769ed8de4f 186 {
Vanger 52:2cb58398a4f9 187 enum RadioState {IDLE, CONNECTING, CONNECTED, DISCONNECTED};
Vanger 51:ffc556ba33f7 188 //state flags for various connection components
Vanger 30:1326b623919a 189 bool signal = false, regist = false, active = false;
Mike Fiore 76:6eeffc10739d 190 char buf[16];
Vanger 26:2b769ed8de4f 191
Vanger 29:edc613ed3f2e 192 //1) Check if APN was set if we're on an HSPA radio
Mike Fiore 76:6eeffc10739d 193 if (type == MTSMC_H5_IP || type == MTSMC_H5 || type == MTSMC_G3 || type == MTSMC_LAT1 || type == MTSMC_LEU1) {
Vanger 29:edc613ed3f2e 194 if(apn.size() == 0) {
Vanger 29:edc613ed3f2e 195 logDebug("APN is not set");
Vanger 29:edc613ed3f2e 196 return false;
Vanger 29:edc613ed3f2e 197 }
Vanger 29:edc613ed3f2e 198 }
Vanger 29:edc613ed3f2e 199
Vanger 29:edc613ed3f2e 200 //2) Check that we do not have a live connection up
Vanger 52:2cb58398a4f9 201 if (socketOpened) {
Vanger 29:edc613ed3f2e 202 logDebug("Socket is opened");
Vanger 29:edc613ed3f2e 203 return true;
Vanger 29:edc613ed3f2e 204 }
Vanger 29:edc613ed3f2e 205
Vanger 29:edc613ed3f2e 206 //3) Query the radio
Vanger 52:2cb58398a4f9 207 int rssi = getSignalStrength();
Vanger 52:2cb58398a4f9 208 if (rssi == 99 || rssi == -1) {
Vanger 52:2cb58398a4f9 209 //Signal strength is nonexistent
Vanger 29:edc613ed3f2e 210 signal = false;
Vanger 29:edc613ed3f2e 211 } else {
Vanger 52:2cb58398a4f9 212 signal = true;
Vanger 29:edc613ed3f2e 213 }
Vanger 27:ec44d5a9544f 214
Vanger 52:2cb58398a4f9 215 Registration creg = getRegistration();
Vanger 52:2cb58398a4f9 216 if (creg == REGISTERED) {
Vanger 52:2cb58398a4f9 217 regist = true;
Vanger 29:edc613ed3f2e 218 } else {
Vanger 52:2cb58398a4f9 219 regist = false;
Vanger 29:edc613ed3f2e 220 }
Vanger 27:ec44d5a9544f 221
Vanger 56:43205bd2752a 222 string reply = sendCommand("AT#SGACT?", 1000);
Mike Fiore 76:6eeffc10739d 223 snprintf(buf, sizeof(buf), "%d,1", type == MTSMC_LVW2 ? 3 : 1);
Mike Fiore 76:6eeffc10739d 224 if (reply.find(string(buf)) != std::string::npos) {
Vanger 52:2cb58398a4f9 225 active = true;
Vanger 29:edc613ed3f2e 226 } else {
Vanger 52:2cb58398a4f9 227 active = false;
Vanger 29:edc613ed3f2e 228 }
Vanger 52:2cb58398a4f9 229
Vanger 60:250c17af30fb 230 //Updates pppConnected to reflect current connection state
Vanger 52:2cb58398a4f9 231 RadioState state;
Vanger 52:2cb58398a4f9 232 bool ppp = pppConnected;
Vanger 52:2cb58398a4f9 233 if (signal && regist && active) {
Vanger 52:2cb58398a4f9 234 state = CONNECTED;
Vanger 52:2cb58398a4f9 235 pppConnected = true;
Vanger 52:2cb58398a4f9 236 } else if (signal && !regist && !active) {
Vanger 52:2cb58398a4f9 237 state = IDLE;
Vanger 52:2cb58398a4f9 238 pppConnected = false;
Vanger 52:2cb58398a4f9 239 } else if (active) {
Vanger 52:2cb58398a4f9 240 state = CONNECTING;
Vanger 52:2cb58398a4f9 241 } else {
Vanger 52:2cb58398a4f9 242 state = DISCONNECTED;
Vanger 30:1326b623919a 243 pppConnected = false;
Vanger 30:1326b623919a 244 }
Vanger 35:257eb41405e1 245
Vanger 60:250c17af30fb 246 //Compares current connection state with previous pppConnected variable state
Vanger 52:2cb58398a4f9 247 if (!ppp && state == CONNECTED) {
Vanger 52:2cb58398a4f9 248 logWarning("Internal PPP state tracking differs from radio (DISCONNECTED:CONNECTED)");
Vanger 52:2cb58398a4f9 249 } else if (ppp && state != CONNECTED) {
Vanger 56:43205bd2752a 250 string stateStr;
Vanger 56:43205bd2752a 251 switch (state) {
Vanger 56:43205bd2752a 252 case IDLE:
Vanger 56:43205bd2752a 253 stateStr = "IDLE";
Vanger 56:43205bd2752a 254 break;
Vanger 56:43205bd2752a 255 case CONNECTING:
Vanger 56:43205bd2752a 256 stateStr = "CONNECTING";
Vanger 56:43205bd2752a 257 break;
Vanger 56:43205bd2752a 258 case DISCONNECTED:
Vanger 56:43205bd2752a 259 stateStr = "DISCONNECTED";
Vanger 56:43205bd2752a 260 break;
Vanger 56:43205bd2752a 261 case CONNECTED:
Vanger 56:43205bd2752a 262 stateStr = "CONNECTED";
Vanger 56:43205bd2752a 263 break;
Vanger 56:43205bd2752a 264 default:
Vanger 56:43205bd2752a 265 stateStr = "UKNOWN";
Vanger 56:43205bd2752a 266 break;
Vanger 56:43205bd2752a 267 }
Vanger 56:43205bd2752a 268 logWarning("Internal PPP state tracking differs from radio (CONNECTED:%s)", stateStr.c_str());
Vanger 29:edc613ed3f2e 269 }
Vanger 52:2cb58398a4f9 270
Vanger 26:2b769ed8de4f 271 return pppConnected;
Vanger 26:2b769ed8de4f 272 }
Vanger 30:1326b623919a 273
Vanger 33:3b6f3904dde0 274 void EasyIP::reset()
Vanger 33:3b6f3904dde0 275 {
Vanger 33:3b6f3904dde0 276 disconnect();
Vanger 52:2cb58398a4f9 277
Vanger 33:3b6f3904dde0 278 if(sendBasicCommand("AT#REBOOT", 10000) != MTS_SUCCESS) {
Vanger 52:2cb58398a4f9 279 logError("Socket Modem did not accept RESET command");
Vanger 33:3b6f3904dde0 280 } else {
Vanger 52:2cb58398a4f9 281 logWarning("Socket Modem is resetting, allow 30 seconds for it to come back");
Vanger 33:3b6f3904dde0 282 return;
Vanger 33:3b6f3904dde0 283 }
Vanger 33:3b6f3904dde0 284 }
Vanger 33:3b6f3904dde0 285
Vanger 60:250c17af30fb 286 //Opens socket connection
Vanger 26:2b769ed8de4f 287 bool EasyIP::open(const std::string& address, unsigned int port, Mode mode)
Vanger 26:2b769ed8de4f 288 {
Vanger 30:1326b623919a 289 char sOpenSocketCmd[256] = {0}; //String for AT command
Vanger 30:1326b623919a 290 std::string sMode = "";
Vanger 31:529db15abda7 291 int typeSocket = 0;
Vanger 31:529db15abda7 292 int closeType = 0;
Vanger 30:1326b623919a 293
Vanger 30:1326b623919a 294 //1) Check that we do not have a live connection up
Vanger 30:1326b623919a 295 if(socketOpened) {
Vanger 30:1326b623919a 296 //Check that the address, port, and mode match
Vanger 30:1326b623919a 297 if(host_address != address || host_port != port || socketMode != mode) {
Vanger 30:1326b623919a 298 if(socketMode == TCP) {
Vanger 30:1326b623919a 299 logError("TCP socket already opened [%s:%d]", host_address.c_str(), host_port);
Vanger 30:1326b623919a 300 } else {
Vanger 30:1326b623919a 301 logError("UDP socket already opened [%s:%d]", host_address.c_str(), host_port);
Vanger 30:1326b623919a 302 }
Vanger 30:1326b623919a 303 return false;
Vanger 30:1326b623919a 304 }
Vanger 30:1326b623919a 305
Vanger 30:1326b623919a 306 logDebug("Socket already opened");
Vanger 30:1326b623919a 307 return true;
Vanger 30:1326b623919a 308 }
Vanger 30:1326b623919a 309
Vanger 30:1326b623919a 310 //2) Check Parameters
Vanger 30:1326b623919a 311 if(port > 65535) {
Vanger 30:1326b623919a 312 logError("port out of range (0-65535)");
Vanger 30:1326b623919a 313 return false;
Vanger 30:1326b623919a 314 }
Vanger 41:8b9b5098696f 315
Mike Fiore 76:6eeffc10739d 316 if(type == MTSMC_EV3 || type == MTSMC_LAT1 || type == MTSMC_LEU1 || type == MTSMC_LVW2) {
Vanger 41:8b9b5098696f 317 if(!local_port) {
Vanger 70:c0c621f88330 318 logDebug("Local port set to 1, port 0 not supported for %s", getRadioNames(type).c_str());
Vanger 69:93dace69ee98 319 local_port = 1;
Vanger 69:93dace69ee98 320 }
Vanger 41:8b9b5098696f 321 }
Vanger 30:1326b623919a 322
Vanger 30:1326b623919a 323 //3) Check PPP connection
Vanger 30:1326b623919a 324 if(!isConnected()) {
Vanger 30:1326b623919a 325 logError("PPP not established. Attempting to connect");
Vanger 30:1326b623919a 326 if(!connect()) {
Vanger 30:1326b623919a 327 logError("PPP connection failed");
Vanger 30:1326b623919a 328 return false;
Vanger 30:1326b623919a 329 } else {
Vanger 30:1326b623919a 330 logDebug("PPP connection established");
Vanger 30:1326b623919a 331 }
Vanger 30:1326b623919a 332 }
Vanger 30:1326b623919a 333
Vanger 56:43205bd2752a 334 //4) Set escape sequence to not be transmitted through socket
Vanger 30:1326b623919a 335 if(sendBasicCommand("AT#SKIPESC=1", 2000) != MTS_SUCCESS) {
Vanger 30:1326b623919a 336 logWarning("Failed to disable escape sequence transmission on data mode suspension");
Vanger 30:1326b623919a 337 }
Vanger 30:1326b623919a 338
Vanger 30:1326b623919a 339 if(mode == TCP) {
Vanger 30:1326b623919a 340 typeSocket = 0;
Vanger 30:1326b623919a 341 sMode = "TCP";
Vanger 30:1326b623919a 342 } else {
Vanger 30:1326b623919a 343 typeSocket = 1;
Vanger 30:1326b623919a 344 sMode = "UDP";
Vanger 30:1326b623919a 345 }
Vanger 31:529db15abda7 346
Vanger 31:529db15abda7 347 if(socketCloseable) {
Vanger 31:529db15abda7 348 closeType = 0;
Vanger 31:529db15abda7 349 } else {
Vanger 31:529db15abda7 350 closeType = 255;
Vanger 31:529db15abda7 351 }
Vanger 60:250c17af30fb 352
Vanger 31:529db15abda7 353 //5) Open Socket
Vanger 69:93dace69ee98 354 sprintf(sOpenSocketCmd, "AT#SD=1,%d,%d,\"%s\",%d,%d,0", typeSocket, port, address.c_str(), closeType, local_port);
Vanger 38:b2088faa8bfd 355 std::string response = sendCommand(sOpenSocketCmd, 60000);
Vanger 30:1326b623919a 356
Vanger 30:1326b623919a 357 if(response.find("CONNECT") != std::string::npos) {
Vanger 30:1326b623919a 358 host_address = address;
Vanger 30:1326b623919a 359 host_port = port;
Vanger 30:1326b623919a 360
Vanger 30:1326b623919a 361 logInfo("Opened %s Socket [%s:%d]", sMode.c_str(), address.c_str(), port);
Vanger 30:1326b623919a 362 socketOpened = true;
Vanger 30:1326b623919a 363 socketMode = mode;
Vanger 30:1326b623919a 364 } else {
Vanger 30:1326b623919a 365 logWarning("Unable to open %s Socket [%s:%d]", sMode.c_str(), address.c_str(), port);
Vanger 30:1326b623919a 366 socketOpened = false;
Vanger 30:1326b623919a 367 }
Vanger 30:1326b623919a 368
Vanger 26:2b769ed8de4f 369 return socketOpened;
Vanger 26:2b769ed8de4f 370 }
Vanger 27:ec44d5a9544f 371
Vanger 60:250c17af30fb 372 //Closes socket connection
Vanger 67:7c705fe2acec 373 bool EasyIP::close(bool shutdown)
Vanger 26:2b769ed8de4f 374 {
Vanger 26:2b769ed8de4f 375
Vanger 30:1326b623919a 376 if(io == NULL) {
Vanger 30:1326b623919a 377 logError("MTSBufferedIO not set");
Vanger 30:1326b623919a 378 return false;
Vanger 30:1326b623919a 379 }
Vanger 30:1326b623919a 380
Vanger 30:1326b623919a 381 if(!socketOpened) {
Vanger 30:1326b623919a 382 logWarning("Socket close() called, but socket was not open");
Vanger 30:1326b623919a 383 return true;
Vanger 30:1326b623919a 384 }
Vanger 30:1326b623919a 385
Vanger 30:1326b623919a 386 if(!socketCloseable) {
Vanger 30:1326b623919a 387 logError("Socket is not closeable");
Vanger 30:1326b623919a 388 return false;
Vanger 30:1326b623919a 389 }
Vanger 30:1326b623919a 390
Vanger 30:1326b623919a 391 if(!sendEscapeCommand()) {
Vanger 30:1326b623919a 392 logError("Failed to exit online mode");
Vanger 30:1326b623919a 393 return false;
Vanger 30:1326b623919a 394 } else {
Vanger 30:1326b623919a 395 socketOpened = false;
Vanger 30:1326b623919a 396 }
Vanger 30:1326b623919a 397
Vanger 54:a6c738bfc391 398 if (sendBasicCommand("AT#SH=1", 2000) != MTS_SUCCESS) {
Vanger 30:1326b623919a 399 logDebug("Failed to close socket connection");
Vanger 30:1326b623919a 400 }
Vanger 30:1326b623919a 401
Vanger 60:250c17af30fb 402 //Clear receive buffer
Vanger 67:7c705fe2acec 403 if (shutdown) {
Vanger 66:8c55e2bf7270 404 int counter = 0;
Vanger 66:8c55e2bf7270 405 char tmp[256];
Vanger 66:8c55e2bf7270 406 do {
Vanger 66:8c55e2bf7270 407 if(socketOpened == false) {
Vanger 66:8c55e2bf7270 408 break;
Vanger 66:8c55e2bf7270 409 }
Vanger 66:8c55e2bf7270 410 read(tmp, 256, 1000);
Vanger 66:8c55e2bf7270 411 } while(counter++ < 10);
Vanger 66:8c55e2bf7270 412
Vanger 66:8c55e2bf7270 413 io->rxClear();
Vanger 66:8c55e2bf7270 414 io->txClear();
Vanger 66:8c55e2bf7270 415 }
Vanger 30:1326b623919a 416
Vanger 30:1326b623919a 417 return !socketOpened;
Vanger 26:2b769ed8de4f 418 }
Vanger 26:2b769ed8de4f 419
Vanger 60:250c17af30fb 420 //Read from socket
Vanger 26:2b769ed8de4f 421 int EasyIP::read(char* data, int max, int timeout)
Vanger 26:2b769ed8de4f 422 {
Vanger 30:1326b623919a 423 if(io == NULL) {
Vanger 30:1326b623919a 424 logError("MTSBufferedIO not set");
Vanger 30:1326b623919a 425 return -1;
Vanger 30:1326b623919a 426 }
Vanger 30:1326b623919a 427
Vanger 30:1326b623919a 428 //Check that nothing is in the rx buffer
Vanger 30:1326b623919a 429 if(!socketOpened && !io->readable()) {
Vanger 30:1326b623919a 430 logError("Socket is not open");
Vanger 30:1326b623919a 431 return -1;
Vanger 30:1326b623919a 432 }
Vanger 30:1326b623919a 433
Vanger 30:1326b623919a 434 int bytesRead = 0;
Vanger 30:1326b623919a 435
Vanger 30:1326b623919a 436 if(timeout >= 0) {
Vanger 30:1326b623919a 437 bytesRead = io->read(data, max, static_cast<unsigned int>(timeout));
Vanger 30:1326b623919a 438 } else {
Vanger 30:1326b623919a 439 bytesRead = io->read(data, max);
Vanger 30:1326b623919a 440 }
Vanger 35:257eb41405e1 441
Vanger 35:257eb41405e1 442 //Scan for socket closed message
Vanger 31:529db15abda7 443 if(bytesRead > 0 && socketCloseable) {
Vanger 35:257eb41405e1 444 for(int i = 0; i < bytesRead; i++) {
Vanger 31:529db15abda7 445 if(data[i] == 'N') {
Vanger 31:529db15abda7 446 if(strstr(&data[i], "NO CARRIER")) {
Vanger 31:529db15abda7 447 logTrace("Found socket closed message. Checking validity");
Vanger 31:529db15abda7 448 //Close socket and Cut Off End of Message
Vanger 31:529db15abda7 449 socketOpened = socketCheck(); //Verifies legitimacy of socket disconnect
Vanger 31:529db15abda7 450 if(socketOpened) {
Vanger 31:529db15abda7 451 logDebug("Socket still open");
Vanger 31:529db15abda7 452 continue;
Vanger 31:529db15abda7 453 } else {
Vanger 31:529db15abda7 454 logDebug("Socket closed");
Vanger 31:529db15abda7 455 data[i] = '\0';
Vanger 31:529db15abda7 456 bytesRead = i;
Vanger 31:529db15abda7 457 break;
Vanger 31:529db15abda7 458 }
Vanger 30:1326b623919a 459 }
Vanger 30:1326b623919a 460 }
Vanger 30:1326b623919a 461 }
Vanger 30:1326b623919a 462 }
Vanger 30:1326b623919a 463 return bytesRead;
Vanger 26:2b769ed8de4f 464 }
Vanger 26:2b769ed8de4f 465
Vanger 60:250c17af30fb 466 //Write to socket
Vanger 26:2b769ed8de4f 467 int EasyIP::write(const char* data, int length, int timeout)
Vanger 26:2b769ed8de4f 468 {
Vanger 30:1326b623919a 469 if(io == NULL) {
Vanger 30:1326b623919a 470 logError("MTSBufferedIO not set");
Vanger 30:1326b623919a 471 return -1;
Vanger 30:1326b623919a 472 }
Vanger 30:1326b623919a 473
Vanger 30:1326b623919a 474 if(!socketOpened) {
Vanger 30:1326b623919a 475 logError("Socket is not open");
Vanger 30:1326b623919a 476 return -1;
Vanger 30:1326b623919a 477 }
Vanger 30:1326b623919a 478
Vanger 30:1326b623919a 479 int bytesWritten = 0;
Vanger 31:529db15abda7 480 int size = length;
Vanger 31:529db15abda7 481 int failedWrites = 0;
Vanger 30:1326b623919a 482 if(timeout >= 0) {
Vanger 30:1326b623919a 483 Timer tmr;
Vanger 30:1326b623919a 484 tmr.start();
Vanger 30:1326b623919a 485 do {
Vanger 30:1326b623919a 486 int available = io->writeable();
Vanger 30:1326b623919a 487 if (available > 0) {
Mike Fiore 72:7862171b277d 488 size = mts_min(available, length - bytesWritten);
Vanger 31:529db15abda7 489 bytesWritten += io->write(&data[bytesWritten], size);
Vanger 30:1326b623919a 490 } else {
Vanger 30:1326b623919a 491 wait(0.05);
Vanger 30:1326b623919a 492 }
Vanger 30:1326b623919a 493 } while (tmr.read_ms() <= timeout && bytesWritten < length);
Vanger 30:1326b623919a 494 } else {
Vanger 31:529db15abda7 495 //If timeout is -1:
Vanger 31:529db15abda7 496 do {
Vanger 31:529db15abda7 497 int available = io->writeable();
Vanger 31:529db15abda7 498 if(available > 0) {
Mike Fiore 72:7862171b277d 499 size = mts_min(available, length - bytesWritten);
Vanger 31:529db15abda7 500 int currentWritten = io->write(&data[bytesWritten], size);
Vanger 31:529db15abda7 501 bytesWritten += currentWritten;
Vanger 31:529db15abda7 502 if(!currentWritten) {
Vanger 31:529db15abda7 503 failedWrites++;
Vanger 31:529db15abda7 504 }
Vanger 31:529db15abda7 505 if(failedWrites > 10) {
Vanger 31:529db15abda7 506 logError("Couldn't write any characters");
Vanger 31:529db15abda7 507 return bytesWritten;
Vanger 31:529db15abda7 508 }
Vanger 31:529db15abda7 509 } else {
Vanger 31:529db15abda7 510 wait(0.05);
Vanger 30:1326b623919a 511 }
Vanger 31:529db15abda7 512 } while (bytesWritten < length);
Vanger 30:1326b623919a 513 }
Vanger 30:1326b623919a 514 return bytesWritten;
Vanger 26:2b769ed8de4f 515 }
Vanger 26:2b769ed8de4f 516
Vanger 26:2b769ed8de4f 517 Code EasyIP::setApn(const std::string& apn)
Vanger 26:2b769ed8de4f 518 {
Vanger 26:2b769ed8de4f 519 if (type == MTSMC_H5 || type == MTSMC_G3) {
Vanger 56:43205bd2752a 520 //CGDCONT has options: IP,PPP,IPv6
Vanger 56:43205bd2752a 521 Code code = sendBasicCommand("AT+CGDCONT=1,IP," + apn, 1000);
Vanger 26:2b769ed8de4f 522 if (code != MTS_SUCCESS) {
Vanger 56:43205bd2752a 523 return code;
Vanger 26:2b769ed8de4f 524 }
Vanger 26:2b769ed8de4f 525 this->apn = apn;
Vanger 56:43205bd2752a 526 return code;
Mike Fiore 76:6eeffc10739d 527 } else if (type == MTSMC_LAT1 || type == MTSMC_LEU1) {
Vanger 69:93dace69ee98 528 //CGDCONT has options: IP,PPP,IPv6
Vanger 69:93dace69ee98 529 Code code = sendBasicCommand("AT+CGDCONT=1,\"IP\",\"" + apn + "\"", 1000);
Vanger 69:93dace69ee98 530 if (code != MTS_SUCCESS) {
Vanger 69:93dace69ee98 531 return code;
Vanger 69:93dace69ee98 532 }
Vanger 69:93dace69ee98 533 this->apn = apn;
Vanger 69:93dace69ee98 534 return code;
Vanger 26:2b769ed8de4f 535 } else {
Vanger 26:2b769ed8de4f 536 logInfo("CDMA radios don't need an APN");
Vanger 26:2b769ed8de4f 537 return MTS_SUCCESS;
Vanger 26:2b769ed8de4f 538 }
Vanger 26:2b769ed8de4f 539 }
Vanger 27:ec44d5a9544f 540
Vanger 26:2b769ed8de4f 541 bool EasyIP::ping(const std::string& address)
Vanger 26:2b769ed8de4f 542 {
Vanger 26:2b769ed8de4f 543 char buffer[256] = {0};
Vanger 27:ec44d5a9544f 544 std::vector<std::string> parts;
Vanger 27:ec44d5a9544f 545 int TTL=0;
Vanger 27:ec44d5a9544f 546 int Timeout=0;
Vanger 27:ec44d5a9544f 547
Vanger 27:ec44d5a9544f 548 //Format parameters for sending to radio
Vanger 30:1326b623919a 549 sprintf(buffer, "AT#PING=%s,1,32,%d", address.c_str(), (PINGDELAY*10));
Vanger 26:2b769ed8de4f 550
Vanger 27:ec44d5a9544f 551 for(int pngs=0; pngs<PINGNUM; pngs++) {
Vanger 35:257eb41405e1 552 std::string response = sendCommand(buffer, (PINGDELAY*2000)); //Send 1 ping
Vanger 52:2cb58398a4f9 553 if(response.empty() || response.find("ERROR") != std::string::npos) {
Vanger 28:f93d7b3f7c2e 554 continue; //Skip current loop if send command fails
Vanger 28:f93d7b3f7c2e 555 }
Vanger 27:ec44d5a9544f 556 parts = Text::split(response, "\r\n");
Vanger 28:f93d7b3f7c2e 557 if(parts.size() < 2) {
Vanger 28:f93d7b3f7c2e 558 continue;
Vanger 28:f93d7b3f7c2e 559 }
Vanger 27:ec44d5a9544f 560 parts = Text::split(parts[1], ",");
Vanger 28:f93d7b3f7c2e 561 if(parts.size() < 4) {
Vanger 28:f93d7b3f7c2e 562 continue;
Vanger 28:f93d7b3f7c2e 563 }
Vanger 27:ec44d5a9544f 564 //Parse TTL and Timeout values
Vanger 27:ec44d5a9544f 565 Timeout = std::atoi(parts[2].c_str());
Vanger 27:ec44d5a9544f 566 TTL = std::atoi(parts[3].c_str());
Vanger 27:ec44d5a9544f 567
Vanger 27:ec44d5a9544f 568 if((Timeout < 600) && (TTL < 255)) {
Vanger 27:ec44d5a9544f 569 return true;
Vanger 27:ec44d5a9544f 570 }
Vanger 52:2cb58398a4f9 571 }
Vanger 26:2b769ed8de4f 572 return false;
Vanger 26:2b769ed8de4f 573 }
Vanger 26:2b769ed8de4f 574
Vanger 33:3b6f3904dde0 575 bool EasyIP::sendEscapeCommand()
Vanger 33:3b6f3904dde0 576 {
Vanger 33:3b6f3904dde0 577 //string Cellular::sendCommand(const std::string& command, unsigned int timeoutMillis, char esc)
Vanger 33:3b6f3904dde0 578 if(io == NULL) {
Vanger 33:3b6f3904dde0 579 logError("MTSBufferedIO not set");
Vanger 33:3b6f3904dde0 580 return false;
Vanger 33:3b6f3904dde0 581 }
Vanger 33:3b6f3904dde0 582 if(!socketOpened) {
Vanger 52:2cb58398a4f9 583 logError("Socket is not open.");
Vanger 52:2cb58398a4f9 584 return false;
Vanger 33:3b6f3904dde0 585 }
Vanger 33:3b6f3904dde0 586
Vanger 33:3b6f3904dde0 587 if(!socketCloseable) {
Vanger 33:3b6f3904dde0 588 logError("Socket is not closeable");
Vanger 33:3b6f3904dde0 589 return false;
Vanger 33:3b6f3904dde0 590 }
Vanger 33:3b6f3904dde0 591
Vanger 33:3b6f3904dde0 592 io->rxClear();
Vanger 33:3b6f3904dde0 593 io->txClear();
Vanger 33:3b6f3904dde0 594
Vanger 33:3b6f3904dde0 595 std::string result;
Vanger 52:2cb58398a4f9 596 unsigned int timeoutMillis = 10000;
Vanger 33:3b6f3904dde0 597 //Attempt to write command
Vanger 52:2cb58398a4f9 598 //Format for +++ command is 1 second wait, send +++, then another second wait
Vanger 52:2cb58398a4f9 599 wait(1.2);
Vanger 49:1fc51c53cebf 600 if(io->write("+++", 3, timeoutMillis) != 3) {
Vanger 33:3b6f3904dde0 601 //Failed to write command
Vanger 33:3b6f3904dde0 602 logError("failed to send command to radio within %d milliseconds", timeoutMillis);
Vanger 33:3b6f3904dde0 603 return false;
Vanger 33:3b6f3904dde0 604 }
Vanger 33:3b6f3904dde0 605
Vanger 52:2cb58398a4f9 606 Timer tmr;
Vanger 33:3b6f3904dde0 607 char tmp[256];
Vanger 33:3b6f3904dde0 608 tmp[255] = 0;
Vanger 33:3b6f3904dde0 609 bool done = false;
Vanger 33:3b6f3904dde0 610 bool exitmode = false;
Vanger 52:2cb58398a4f9 611 tmr.start();
Vanger 33:3b6f3904dde0 612 do {
Vanger 33:3b6f3904dde0 613 //Make a non-blocking read call by passing timeout of zero
Vanger 52:2cb58398a4f9 614 int size = io->read(tmp,255,0); //1 less than allocated (timeout is instant)
Vanger 52:2cb58398a4f9 615 if(size > 0) {
Vanger 52:2cb58398a4f9 616 result.append(tmp, size);
Vanger 52:2cb58398a4f9 617 }
Vanger 54:a6c738bfc391 618 if(result.find("OK\r\n") != std::string::npos) {
Vanger 33:3b6f3904dde0 619 exitmode = true;
Vanger 33:3b6f3904dde0 620 done = true;
Vanger 54:a6c738bfc391 621 } else if(result.find("NO CARRIER\r\n") != std::string::npos) {
Vanger 52:2cb58398a4f9 622 socketOpened = false;
Vanger 33:3b6f3904dde0 623 exitmode = true;
Vanger 33:3b6f3904dde0 624 done = true;
Vanger 33:3b6f3904dde0 625 } else if(result.find("ERROR") != std::string::npos) {
Vanger 33:3b6f3904dde0 626 exitmode = false;
Vanger 33:3b6f3904dde0 627 done = true;
Vanger 33:3b6f3904dde0 628 }
Vanger 52:2cb58398a4f9 629 if(tmr.read_ms() >= timeoutMillis) {
Vanger 33:3b6f3904dde0 630 logDebug("Escape sequence [+++] timed out after %d milliseconds", timeoutMillis);
Vanger 33:3b6f3904dde0 631 exitmode = true;
Vanger 33:3b6f3904dde0 632 done = true;
Vanger 33:3b6f3904dde0 633 }
Vanger 33:3b6f3904dde0 634 } while (!done);
Vanger 33:3b6f3904dde0 635
Vanger 54:a6c738bfc391 636 wait(0.1); //Without a slight wait time after receiving OK, radio would
Vanger 54:a6c738bfc391 637 //fail to correctly receive and respond to the next AT command
Vanger 33:3b6f3904dde0 638 return exitmode;
Vanger 33:3b6f3904dde0 639 }
Vanger 33:3b6f3904dde0 640
Vanger 33:3b6f3904dde0 641 bool EasyIP::socketCheck() {
Vanger 57:7eb2eb536d4a 642 enum SocketStatus {SOCKETCLOSED = 0, SOCKETACTIVEDATA = 1, SOCKETSUSPEND = 2, SOCKETSUSPENDDATA = 3, SOCKETLISTEN = 4, SOCKETINCOMING = 5, ERROR = 9};
Vanger 33:3b6f3904dde0 643 bool status = false;
Vanger 56:43205bd2752a 644 int socketInfo = ERROR;
Vanger 33:3b6f3904dde0 645 std::vector<std::string> params;
Vanger 33:3b6f3904dde0 646
Vanger 33:3b6f3904dde0 647 //Goes from data mode to command mode
Vanger 33:3b6f3904dde0 648 if(sendEscapeCommand()) {
Vanger 52:2cb58398a4f9 649 std::string reply = sendCommand("AT#SS=1", 2000);
Vanger 52:2cb58398a4f9 650 if(reply.find("OK") != std::string::npos) {
Vanger 52:2cb58398a4f9 651 //Found valid response
Vanger 52:2cb58398a4f9 652 params = Text::split(reply, "\r\n");
Vanger 52:2cb58398a4f9 653 params = Text::split(params[1], ",");
Vanger 52:2cb58398a4f9 654 socketInfo = atoi(params[1].c_str());
Vanger 52:2cb58398a4f9 655 } else {
Vanger 52:2cb58398a4f9 656 logError("Could not determine socket status[%d]",socketInfo);
Vanger 56:43205bd2752a 657 socketInfo = ERROR;
Vanger 33:3b6f3904dde0 658 }
Vanger 33:3b6f3904dde0 659 } else {
Vanger 33:3b6f3904dde0 660 status = false; //Return value of socketOpened when checking
Vanger 33:3b6f3904dde0 661 }
Vanger 33:3b6f3904dde0 662
Vanger 33:3b6f3904dde0 663 //Check socket status query
Vanger 56:43205bd2752a 664 if(socketInfo == SOCKETINCOMING || socketInfo == SOCKETACTIVEDATA || socketInfo == SOCKETSUSPEND || socketInfo == SOCKETSUSPENDDATA || socketInfo == SOCKETLISTEN) { //Socket opened responses
Vanger 52:2cb58398a4f9 665 status = true;
Vanger 52:2cb58398a4f9 666 } else if(socketInfo == SOCKETCLOSED || socketInfo == SOCKETINCOMING) {
Vanger 52:2cb58398a4f9 667 status = false;
Vanger 33:3b6f3904dde0 668 } else {
Vanger 54:a6c738bfc391 669 logError("Could not determine socket status[%d]",socketInfo);
Vanger 52:2cb58398a4f9 670 status = false;
Vanger 33:3b6f3904dde0 671 }
Vanger 33:3b6f3904dde0 672
Vanger 52:2cb58398a4f9 673 //Reconnect to active socket if able
Vanger 33:3b6f3904dde0 674 if(status) {
Vanger 33:3b6f3904dde0 675 std::string reconnect = sendCommand("AT#SO=1", 2000);
Vanger 33:3b6f3904dde0 676 if(reconnect.find("CONNECT") != std::string::npos || reconnect.find("OK") != std::string::npos) {
Vanger 33:3b6f3904dde0 677 } else {
Vanger 33:3b6f3904dde0 678 logError("Failed to resume socket connection");
Vanger 33:3b6f3904dde0 679 }
Vanger 33:3b6f3904dde0 680 }
Vanger 33:3b6f3904dde0 681 return status;
Vanger 33:3b6f3904dde0 682 }