Avnet / WncControllerLibrary

This library controls the WNC. There is a derived class for usage from the K64F board.

Fork of WncControllerLibrary by Fred Kellerman

WncController.cpp@15:2c8211ef69e1, 2016-09-10 (annotated)

Committer:
fkellermavnet
Date:
Sat Sep 10 02:32:47 2016 +0000
Revision:
15:2c8211ef69e1
Parent:
14:e846217affcd
Child:
16:f748245382ac
Added 2 socket open methods (public) to open with a url c-string or ip address c-string.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
fkellermavnet 0:affdbb35faa4 1 /*
fkellermavnet 0:affdbb35faa4 2 Copyright (c) 2016 Fred Kellerman
fkellermavnet 0:affdbb35faa4 3
fkellermavnet 0:affdbb35faa4 4 Permission is hereby granted, free of charge, to any person obtaining a copy
fkellermavnet 0:affdbb35faa4 5 of this software and associated documentation files (the "Software"), to deal
fkellermavnet 0:affdbb35faa4 6 in the Software without restriction, including without limitation the rights
fkellermavnet 0:affdbb35faa4 7 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
fkellermavnet 0:affdbb35faa4 8 copies of the Software, and to permit persons to whom the Software is
fkellermavnet 0:affdbb35faa4 9 furnished to do so, subject to the following conditions:
fkellermavnet 0:affdbb35faa4 10
fkellermavnet 0:affdbb35faa4 11 The above copyright notice and this permission notice shall be included in
fkellermavnet 0:affdbb35faa4 12 all copies or substantial portions of the Software.
fkellermavnet 0:affdbb35faa4 13
fkellermavnet 0:affdbb35faa4 14 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
fkellermavnet 0:affdbb35faa4 15 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
fkellermavnet 0:affdbb35faa4 16 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
fkellermavnet 0:affdbb35faa4 17 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
fkellermavnet 0:affdbb35faa4 18 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
fkellermavnet 0:affdbb35faa4 19 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
fkellermavnet 0:affdbb35faa4 20 THE SOFTWARE.
fkellermavnet 0:affdbb35faa4 21
fkellermavnet 0:affdbb35faa4 22 @file WncController.cpp
fkellermavnet 0:affdbb35faa4 23 @purpose Controls WNC 14A2A Cellular Modem
fkellermavnet 0:affdbb35faa4 24 @version 1.0
fkellermavnet 0:affdbb35faa4 25 @date July 2016
fkellermavnet 0:affdbb35faa4 26 @author Fred Kellerman
fkellermavnet 0:affdbb35faa4 27 */
fkellermavnet 0:affdbb35faa4 28
fkellermavnet 0:affdbb35faa4 29
fkellermavnet 0:affdbb35faa4 30 #include <cstdlib>
fkellermavnet 0:affdbb35faa4 31 #include <cctype>
fkellermavnet 0:affdbb35faa4 32 #include "WncController.h"
fkellermavnet 0:affdbb35faa4 33
fkellermavnet 0:affdbb35faa4 34 namespace WncController_fk {
fkellermavnet 0:affdbb35faa4 35
fkellermavnet 0:affdbb35faa4 36 /////////////////////////////////////////////////////
fkellermavnet 0:affdbb35faa4 37 // Static initializers
fkellermavnet 0:affdbb35faa4 38 /////////////////////////////////////////////////////
fkellermavnet 10:2ec59906a24e 39 WncController::WncSocketInfo_s WncController::m_sSock[MAX_NUM_WNC_SOCKETS];
fkellermavnet 10:2ec59906a24e 40 const WncController::WncSocketInfo_s WncController::defaultSockStruct = { 0, false, "192.168.0.1", 80, 0, 25, true, 30 };
fkellermavnet 10:2ec59906a24e 41
fkellermavnet 0:affdbb35faa4 42 WncController::WncState_e WncController::m_sState = WNC_OFF;
fkellermavnet 0:affdbb35faa4 43 uint16_t WncController::m_sCmdTimeoutMs = WNC_CMD_TIMEOUT_MS;
fkellermavnet 0:affdbb35faa4 44 string WncController::m_sApnStr = "NULL";
fkellermavnet 0:affdbb35faa4 45 string WncController::m_sWncStr;
fkellermavnet 0:affdbb35faa4 46 uint8_t WncController::m_sPowerUpTimeoutSecs = MAX_POWERUP_TIMEOUT;
fkellermavnet 0:affdbb35faa4 47 bool WncController::m_sDebugEnabled = false;
fkellermavnet 0:affdbb35faa4 48 bool WncController::m_sMoreDebugEnabled = false;
fkellermavnet 0:affdbb35faa4 49 bool WncController::m_sCheckNetStatus = false; // Turn on internet status check between every command
fkellermavnet 0:affdbb35faa4 50 const char * const WncController::INVALID_IP_STR = "";
fkellermavnet 0:affdbb35faa4 51 bool WncController::m_sReadyForSMS = false;
fkellermavnet 0:affdbb35faa4 52
fkellermavnet 0:affdbb35faa4 53
fkellermavnet 0:affdbb35faa4 54 /**
fkellermavnet 0:affdbb35faa4 55 * C++ version 0.4 char* style "itoa":
fkellermavnet 0:affdbb35faa4 56 * Written by Lukás Chmela
fkellermavnet 0:affdbb35faa4 57 * Released under GPLv3.
fkellermavnet 0:affdbb35faa4 58 */
fkellermavnet 0:affdbb35faa4 59
fkellermavnet 0:affdbb35faa4 60 static char* itoa(int64_t value, char* result, int base)
fkellermavnet 0:affdbb35faa4 61 {
fkellermavnet 0:affdbb35faa4 62 // check that the base is valid
fkellermavnet 0:affdbb35faa4 63 if ( base < 2 || base > 36 ) {
fkellermavnet 0:affdbb35faa4 64 *result = '\0';
fkellermavnet 0:affdbb35faa4 65 return result;
fkellermavnet 0:affdbb35faa4 66 }
fkellermavnet 0:affdbb35faa4 67
fkellermavnet 0:affdbb35faa4 68 char* ptr = result, *ptr1 = result, tmp_char;
fkellermavnet 0:affdbb35faa4 69 int64_t tmp_value;
fkellermavnet 0:affdbb35faa4 70
fkellermavnet 0:affdbb35faa4 71 do {
fkellermavnet 0:affdbb35faa4 72 tmp_value = value;
fkellermavnet 0:affdbb35faa4 73 value /= base;
fkellermavnet 0:affdbb35faa4 74 *ptr++ = "zyxwvutsrqponmlkjihgfedcba9876543210123456789abcdefghijklmnopqrstuvwxyz"[35 + (tmp_value - value * base)];
fkellermavnet 0:affdbb35faa4 75 } while ( value );
fkellermavnet 0:affdbb35faa4 76
fkellermavnet 0:affdbb35faa4 77 // Apply negative sign
fkellermavnet 0:affdbb35faa4 78 if ( tmp_value < 0 )
fkellermavnet 0:affdbb35faa4 79 *ptr++ = '-';
fkellermavnet 0:affdbb35faa4 80
fkellermavnet 0:affdbb35faa4 81 *ptr-- = '\0';
fkellermavnet 0:affdbb35faa4 82
fkellermavnet 0:affdbb35faa4 83 while ( ptr1 < ptr ) {
fkellermavnet 0:affdbb35faa4 84 tmp_char = *ptr;
fkellermavnet 0:affdbb35faa4 85 *ptr-- = *ptr1;
fkellermavnet 0:affdbb35faa4 86 *ptr1++ = tmp_char;
fkellermavnet 0:affdbb35faa4 87 }
fkellermavnet 0:affdbb35faa4 88
fkellermavnet 0:affdbb35faa4 89 return result;
fkellermavnet 0:affdbb35faa4 90 }
fkellermavnet 0:affdbb35faa4 91
fkellermavnet 0:affdbb35faa4 92 const char * WncController::_to_string(int64_t value)
fkellermavnet 0:affdbb35faa4 93 {
fkellermavnet 0:affdbb35faa4 94 static char str[21]; // room for signed 64-bit + null
fkellermavnet 0:affdbb35faa4 95 itoa(value, str, 10);
fkellermavnet 0:affdbb35faa4 96 return (str);
fkellermavnet 0:affdbb35faa4 97 }
fkellermavnet 0:affdbb35faa4 98
fkellermavnet 1:ac2de545b981 99 const char * WncController::_to_hex_string(uint8_t value)
fkellermavnet 1:ac2de545b981 100 {
fkellermavnet 1:ac2de545b981 101 static char str[3]; // room for 8-bit + null
fkellermavnet 1:ac2de545b981 102 itoa(value, str, 16);
fkellermavnet 1:ac2de545b981 103 return (str);
fkellermavnet 1:ac2de545b981 104 }
fkellermavnet 0:affdbb35faa4 105
fkellermavnet 0:affdbb35faa4 106 /**
fkellermavnet 0:affdbb35faa4 107 * \brief Constructor for UART controlled WNC
fkellermavnet 0:affdbb35faa4 108 *
fkellermavnet 0:affdbb35faa4 109 * \param [in] wnc_uart - Reference to a SerialBuffered object which will
fkellermavnet 0:affdbb35faa4 110 * be used as the bus to control the WNC.
fkellermavnet 0:affdbb35faa4 111 *
fkellermavnet 0:affdbb35faa4 112 * \return None.
fkellermavnet 0:affdbb35faa4 113 *
fkellermavnet 0:affdbb35faa4 114 * \details Adding another way to talk to the WNC, like I2C or USB,
fkellermavnet 0:affdbb35faa4 115 * a constructor should be added for each type just like the SerialBuffered
fkellermavnet 0:affdbb35faa4 116 * constructor below.
fkellermavnet 0:affdbb35faa4 117 */
fkellermavnet 1:ac2de545b981 118 WncController::WncController(void)
fkellermavnet 0:affdbb35faa4 119 {
fkellermavnet 10:2ec59906a24e 120 for(unsigned i; i<MAX_NUM_WNC_SOCKETS; i++)
fkellermavnet 10:2ec59906a24e 121 m_sSock[i] = defaultSockStruct;
fkellermavnet 0:affdbb35faa4 122 }
fkellermavnet 0:affdbb35faa4 123
fkellermavnet 0:affdbb35faa4 124 void WncController::enableDebug(bool on, bool moreDebugOn)
fkellermavnet 0:affdbb35faa4 125 {
fkellermavnet 0:affdbb35faa4 126 m_sDebugEnabled = on;
fkellermavnet 0:affdbb35faa4 127 m_sMoreDebugEnabled = moreDebugOn;
fkellermavnet 0:affdbb35faa4 128 }
fkellermavnet 0:affdbb35faa4 129
fkellermavnet 0:affdbb35faa4 130 /**
fkellermavnet 0:affdbb35faa4 131 * \brief Used internally but also make public for a user of the Class to interrogate state as well.
fkellermavnet 0:affdbb35faa4 132 *
fkellermavnet 0:affdbb35faa4 133 * \param [in] None.
fkellermavnet 0:affdbb35faa4 134 *
fkellermavnet 0:affdbb35faa4 135 * \return The state of the WNC Modem.
fkellermavnet 0:affdbb35faa4 136 *
fkellermavnet 0:affdbb35faa4 137 * \details None.
fkellermavnet 0:affdbb35faa4 138 */
fkellermavnet 0:affdbb35faa4 139 WncController::WncState_e WncController::getWncStatus(void)
fkellermavnet 0:affdbb35faa4 140 {
fkellermavnet 0:affdbb35faa4 141 return (m_sState);
fkellermavnet 0:affdbb35faa4 142 }
fkellermavnet 0:affdbb35faa4 143
fkellermavnet 0:affdbb35faa4 144 /**
fkellermavnet 0:affdbb35faa4 145 * \brief Return signal quality dBm level
fkellermavnet 0:affdbb35faa4 146 *
fkellermavnet 0:affdbb35faa4 147 * \param [in] None.
fkellermavnet 0:affdbb35faa4 148 *
fkellermavnet 0:affdbb35faa4 149 * \return The dBm signal level at the time of the request.
fkellermavnet 0:affdbb35faa4 150 *
fkellermavnet 0:affdbb35faa4 151 * \details This polls (at the time of the call) the cell signal.
fkellermavnet 0:affdbb35faa4 152 */
fkellermavnet 0:affdbb35faa4 153 int16_t WncController::getDbmRssi(void)
fkellermavnet 0:affdbb35faa4 154 {
fkellermavnet 0:affdbb35faa4 155 int16_t rssi, ber;
fkellermavnet 0:affdbb35faa4 156 if (at_getrssiber_wnc(&rssi, &ber) == true)
fkellermavnet 0:affdbb35faa4 157 return (rssi);
fkellermavnet 0:affdbb35faa4 158 else
fkellermavnet 0:affdbb35faa4 159 return (99);
fkellermavnet 0:affdbb35faa4 160 }
fkellermavnet 0:affdbb35faa4 161
fkellermavnet 0:affdbb35faa4 162 int16_t WncController::get3gBer(void)
fkellermavnet 0:affdbb35faa4 163 {
fkellermavnet 0:affdbb35faa4 164 int16_t rssi, ber;
fkellermavnet 0:affdbb35faa4 165 if (at_getrssiber_wnc(&rssi, &ber) == true)
fkellermavnet 0:affdbb35faa4 166 return (ber);
fkellermavnet 0:affdbb35faa4 167 else
fkellermavnet 0:affdbb35faa4 168 return (99);
fkellermavnet 0:affdbb35faa4 169 }
fkellermavnet 0:affdbb35faa4 170
fkellermavnet 0:affdbb35faa4 171
fkellermavnet 0:affdbb35faa4 172 /**
fkellermavnet 0:affdbb35faa4 173 * \brief Power up and down (down not implemented yet)
fkellermavnet 0:affdbb35faa4 174 *
fkellermavnet 0:affdbb35faa4 175 * \param [in] on - set true to power on, otherwise false
fkellermavnet 0:affdbb35faa4 176 *
fkellermavnet 0:affdbb35faa4 177 * \return None.
fkellermavnet 0:affdbb35faa4 178 *
fkellermavnet 0:affdbb35faa4 179 * \details Power-on works but not power-down. This will manipulate WNC Shield hardware
fkellermavnet 0:affdbb35faa4 180 * and bring it to life. It will also initialize the WNC enough to get it to be able to open sockets
fkellermavnet 0:affdbb35faa4 181 * (with AT commands)
fkellermavnet 0:affdbb35faa4 182 */
fkellermavnet 1:ac2de545b981 183 bool WncController::powerWncOn(const char * const apn, uint8_t powerUpTimeoutSecs)
fkellermavnet 0:affdbb35faa4 184 {
fkellermavnet 0:affdbb35faa4 185 dbgPuts("Waiting for WNC to Initialize...");
fkellermavnet 0:affdbb35faa4 186 m_sPowerUpTimeoutSecs = powerUpTimeoutSecs;
fkellermavnet 0:affdbb35faa4 187 m_sState = WNC_ON_NO_CELL_LINK; // Turn soft on to allow "AT" for init to be sent!
fkellermavnet 0:affdbb35faa4 188 if (initWncModem(powerUpTimeoutSecs) == true) {
fkellermavnet 0:affdbb35faa4 189 // Set the Apn
fkellermavnet 1:ac2de545b981 190 setApnName(apn);
fkellermavnet 0:affdbb35faa4 191 if (false == softwareInitMdm()) {
fkellermavnet 0:affdbb35faa4 192 dbgPuts("Software init failed!");
fkellermavnet 0:affdbb35faa4 193 m_sState = WNC_OFF;
fkellermavnet 0:affdbb35faa4 194 }
fkellermavnet 0:affdbb35faa4 195 }
fkellermavnet 0:affdbb35faa4 196 else {
fkellermavnet 0:affdbb35faa4 197 dbgPuts("Power up failed!");
fkellermavnet 0:affdbb35faa4 198 m_sState = WNC_OFF;
fkellermavnet 0:affdbb35faa4 199 }
fkellermavnet 0:affdbb35faa4 200
fkellermavnet 1:ac2de545b981 201 return (m_sState != WNC_ON_NO_CELL_LINK);
fkellermavnet 0:affdbb35faa4 202 }
fkellermavnet 0:affdbb35faa4 203
fkellermavnet 0:affdbb35faa4 204 size_t WncController::sendCustomCmd(const char * cmd, char * resp, size_t sizeRespBuf, int ms_timeout)
fkellermavnet 0:affdbb35faa4 205 {
fkellermavnet 0:affdbb35faa4 206 string * respStr;
fkellermavnet 0:affdbb35faa4 207
fkellermavnet 0:affdbb35faa4 208 if (sizeRespBuf > 0) {
fkellermavnet 0:affdbb35faa4 209 AtCmdErr_e r = at_send_wnc_cmd(cmd, &respStr, ms_timeout);
fkellermavnet 0:affdbb35faa4 210 if (respStr->size() < sizeRespBuf) {
fkellermavnet 0:affdbb35faa4 211 strcpy(resp, respStr->c_str());
fkellermavnet 0:affdbb35faa4 212 return (respStr->size());
fkellermavnet 0:affdbb35faa4 213 }
fkellermavnet 0:affdbb35faa4 214 }
fkellermavnet 0:affdbb35faa4 215
fkellermavnet 0:affdbb35faa4 216 dbgPuts("sendCustomCmd: would have overrun!");
fkellermavnet 0:affdbb35faa4 217
fkellermavnet 0:affdbb35faa4 218 return (0);
fkellermavnet 0:affdbb35faa4 219 }
fkellermavnet 0:affdbb35faa4 220
fkellermavnet 0:affdbb35faa4 221 bool WncController::pingUrl(const char * url)
fkellermavnet 0:affdbb35faa4 222 {
fkellermavnet 0:affdbb35faa4 223 string ipAddr;
fkellermavnet 0:affdbb35faa4 224
fkellermavnet 0:affdbb35faa4 225 if (true == at_dnsresolve_wnc(url, &ipAddr))
fkellermavnet 0:affdbb35faa4 226 return (pingIp(ipAddr.c_str()));
fkellermavnet 0:affdbb35faa4 227 else
fkellermavnet 0:affdbb35faa4 228 dbgPuts("pingUrl DNS resolve: failed!");
fkellermavnet 0:affdbb35faa4 229
fkellermavnet 0:affdbb35faa4 230 return (false);
fkellermavnet 0:affdbb35faa4 231 }
fkellermavnet 0:affdbb35faa4 232
fkellermavnet 0:affdbb35faa4 233 bool WncController::pingIp(const char * ip)
fkellermavnet 0:affdbb35faa4 234 {
fkellermavnet 0:affdbb35faa4 235 if (true == at_ping_wnc(ip))
fkellermavnet 0:affdbb35faa4 236 return (true);
fkellermavnet 0:affdbb35faa4 237 else
fkellermavnet 0:affdbb35faa4 238 dbgPuts("pingIp: failed!");
fkellermavnet 0:affdbb35faa4 239
fkellermavnet 0:affdbb35faa4 240 return (false);
fkellermavnet 0:affdbb35faa4 241 }
fkellermavnet 0:affdbb35faa4 242
fkellermavnet 0:affdbb35faa4 243 bool WncController::getWncNetworkingStats(WncIpStats * s)
fkellermavnet 0:affdbb35faa4 244 {
fkellermavnet 0:affdbb35faa4 245 return (at_get_wnc_net_stats(s));
fkellermavnet 0:affdbb35faa4 246 }
fkellermavnet 0:affdbb35faa4 247
fkellermavnet 0:affdbb35faa4 248 bool WncController::getIpAddr(uint16_t numSock, char myIpAddr[MAX_LEN_IP_STR])
fkellermavnet 0:affdbb35faa4 249 {
fkellermavnet 0:affdbb35faa4 250 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 0:affdbb35faa4 251 strncpy(myIpAddr, m_sSock[numSock].myIpAddressStr.c_str(), MAX_LEN_IP_STR);
fkellermavnet 0:affdbb35faa4 252 myIpAddr[MAX_LEN_IP_STR - 1] = '\0';
fkellermavnet 0:affdbb35faa4 253 return (true);
fkellermavnet 0:affdbb35faa4 254 }
fkellermavnet 0:affdbb35faa4 255 else {
fkellermavnet 0:affdbb35faa4 256 myIpAddr[0] = '\0';
fkellermavnet 0:affdbb35faa4 257 return (false);
fkellermavnet 0:affdbb35faa4 258 }
fkellermavnet 0:affdbb35faa4 259 }
fkellermavnet 0:affdbb35faa4 260
fkellermavnet 0:affdbb35faa4 261 bool WncController::setApnName(const char * const apnStr)
fkellermavnet 0:affdbb35faa4 262 {
fkellermavnet 0:affdbb35faa4 263 if (at_setapn_wnc(apnStr) == true)
fkellermavnet 0:affdbb35faa4 264 {
fkellermavnet 0:affdbb35faa4 265 m_sApnStr = apnStr;
fkellermavnet 0:affdbb35faa4 266 return (true);
fkellermavnet 0:affdbb35faa4 267 }
fkellermavnet 0:affdbb35faa4 268 else
fkellermavnet 0:affdbb35faa4 269 return (false);
fkellermavnet 0:affdbb35faa4 270 }
fkellermavnet 0:affdbb35faa4 271
fkellermavnet 0:affdbb35faa4 272
fkellermavnet 0:affdbb35faa4 273 /**
fkellermavnet 0:affdbb35faa4 274 * \brief Look-up a URL text string and convert into an IP Address string.
fkellermavnet 0:affdbb35faa4 275 *
fkellermavnet 0:affdbb35faa4 276 * \param [in] url - the URL to lookup. numSock - the socket number to resolve.
fkellermavnet 0:affdbb35faa4 277 *
fkellermavnet 0:affdbb35faa4 278 * \return true - if the IP address has been resolved. false - if the URL could not be resolved.
fkellermavnet 0:affdbb35faa4 279 *
fkellermavnet 0:affdbb35faa4 280 * \details None.
fkellermavnet 0:affdbb35faa4 281 */
fkellermavnet 0:affdbb35faa4 282 bool WncController::resolveUrl(uint16_t numSock, const char * url)
fkellermavnet 0:affdbb35faa4 283 {
fkellermavnet 0:affdbb35faa4 284 bool cmdRes;
fkellermavnet 0:affdbb35faa4 285
fkellermavnet 0:affdbb35faa4 286 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 0:affdbb35faa4 287 if (strlen(url) > 0) {
fkellermavnet 0:affdbb35faa4 288 cmdRes = at_dnsresolve_wnc(url, &m_sSock[numSock].myIpAddressStr);
fkellermavnet 0:affdbb35faa4 289 if (cmdRes == false)
fkellermavnet 0:affdbb35faa4 290 dbgPuts("Cannot resolve URL!");
fkellermavnet 0:affdbb35faa4 291 return (cmdRes);
fkellermavnet 0:affdbb35faa4 292 }
fkellermavnet 0:affdbb35faa4 293 else
fkellermavnet 0:affdbb35faa4 294 dbgPuts("Invalid URL");
fkellermavnet 0:affdbb35faa4 295 }
fkellermavnet 0:affdbb35faa4 296 else
fkellermavnet 0:affdbb35faa4 297 dbgPuts("Invalid Sock num!");
fkellermavnet 0:affdbb35faa4 298
fkellermavnet 0:affdbb35faa4 299 return (false);
fkellermavnet 0:affdbb35faa4 300 }
fkellermavnet 0:affdbb35faa4 301
fkellermavnet 0:affdbb35faa4 302 /**
fkellermavnet 0:affdbb35faa4 303 * \brief Set IP Address string
fkellermavnet 0:affdbb35faa4 304 *
fkellermavnet 0:affdbb35faa4 305 * \param [in] numSock - socket reference to set the string for. ipStr - text string of the IP
fkellermavnet 0:affdbb35faa4 306 * address you want to talk to. There is no sanity check - beware!!!
fkellermavnet 0:affdbb35faa4 307 *
fkellermavnet 0:affdbb35faa4 308 * \return true - if the IP address has been set. false - if the IP could not be set.
fkellermavnet 0:affdbb35faa4 309 *
fkellermavnet 0:affdbb35faa4 310 * \details None.
fkellermavnet 0:affdbb35faa4 311 */
fkellermavnet 0:affdbb35faa4 312 bool WncController::setIpAddr(uint16_t numSock, const char * ipStr)
fkellermavnet 0:affdbb35faa4 313 {
fkellermavnet 0:affdbb35faa4 314 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 0:affdbb35faa4 315 m_sSock[numSock].myIpAddressStr = ipStr;
fkellermavnet 0:affdbb35faa4 316 return (true);
fkellermavnet 0:affdbb35faa4 317 }
fkellermavnet 0:affdbb35faa4 318 else {
fkellermavnet 0:affdbb35faa4 319 dbgPuts("Bad socket num!");
fkellermavnet 0:affdbb35faa4 320 return (false);
fkellermavnet 0:affdbb35faa4 321 }
fkellermavnet 0:affdbb35faa4 322 }
fkellermavnet 0:affdbb35faa4 323
fkellermavnet 6:a656e820d7ff 324 void WncController::setWncCmdTimeout(uint16_t toMs)
fkellermavnet 6:a656e820d7ff 325 {
fkellermavnet 6:a656e820d7ff 326 m_sCmdTimeoutMs = toMs;
fkellermavnet 6:a656e820d7ff 327 }
fkellermavnet 6:a656e820d7ff 328
fkellermavnet 0:affdbb35faa4 329 /**
fkellermavnet 0:affdbb35faa4 330 * \brief Opens a WNC socket.
fkellermavnet 0:affdbb35faa4 331 *
fkellermavnet 0:affdbb35faa4 332 * \param [in] sockNum - the number of the socket to open. ipAddr - a string containing
fkellermavnet 0:affdbb35faa4 333 * the IP address. port - the IP port number to open the socket connection.
fkellermavnet 0:affdbb35faa4 334 *
fkellermavnet 0:affdbb35faa4 335 * \return true - if the socket is/was opened. false otherwise.
fkellermavnet 0:affdbb35faa4 336 *
fkellermavnet 0:affdbb35faa4 337 * \details None.
fkellermavnet 0:affdbb35faa4 338 */
fkellermavnet 15:2c8211ef69e1 339
fkellermavnet 15:2c8211ef69e1 340 bool WncController::openSocketUrl(uint16_t numSock, const char * url, uint16_t port, bool tcp, uint16_t timeOutSec)
fkellermavnet 15:2c8211ef69e1 341 {
fkellermavnet 15:2c8211ef69e1 342 if (resolveUrl(numSock, url) == true)
fkellermavnet 15:2c8211ef69e1 343 return (openSocket(numSock, port, tcp, timeOutSec));
fkellermavnet 15:2c8211ef69e1 344
fkellermavnet 15:2c8211ef69e1 345 return (false);
fkellermavnet 15:2c8211ef69e1 346 }
fkellermavnet 15:2c8211ef69e1 347
fkellermavnet 15:2c8211ef69e1 348 bool WncController::openSocketIpAddr(uint16_t numSock, const char * ipAddr, uint16_t port, bool tcp, uint16_t timeOutSec)
fkellermavnet 15:2c8211ef69e1 349 {
fkellermavnet 15:2c8211ef69e1 350 if (setIpAddr(numSock, ipAddr) == true)
fkellermavnet 15:2c8211ef69e1 351 return (openSocket(numSock, port, tcp, timeOutSec));
fkellermavnet 15:2c8211ef69e1 352
fkellermavnet 15:2c8211ef69e1 353 return (false);
fkellermavnet 15:2c8211ef69e1 354 }
fkellermavnet 15:2c8211ef69e1 355
fkellermavnet 0:affdbb35faa4 356 bool WncController::openSocket(uint16_t numSock, uint16_t port, bool tcp, uint16_t timeOutSec)
fkellermavnet 0:affdbb35faa4 357 {
fkellermavnet 0:affdbb35faa4 358 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 0:affdbb35faa4 359 // IPV4 ip addr sanity check!
fkellermavnet 0:affdbb35faa4 360 size_t lenIpStr = m_sSock[numSock].myIpAddressStr.size();
fkellermavnet 0:affdbb35faa4 361 if (lenIpStr < 7 || lenIpStr > 15) {
fkellermavnet 0:affdbb35faa4 362 dbgPuts("Invalid IP Address!");
fkellermavnet 0:affdbb35faa4 363 return (false);
fkellermavnet 0:affdbb35faa4 364 }
fkellermavnet 0:affdbb35faa4 365
fkellermavnet 0:affdbb35faa4 366 // Already open ? Must close if want to re-open with new settings.
fkellermavnet 0:affdbb35faa4 367 if (m_sSock[numSock].open == true) {
fkellermavnet 0:affdbb35faa4 368 dbgPuts("Socket already open, close then re-open!");
fkellermavnet 10:2ec59906a24e 369 at_sockclose_wnc(m_sSock[numSock].numWncSock);
fkellermavnet 0:affdbb35faa4 370 m_sSock[numSock].open = false;
fkellermavnet 0:affdbb35faa4 371 }
fkellermavnet 0:affdbb35faa4 372
fkellermavnet 0:affdbb35faa4 373 m_sSock[numSock].myPort = port;
fkellermavnet 0:affdbb35faa4 374 m_sSock[numSock].isTcp = tcp;
fkellermavnet 0:affdbb35faa4 375 m_sSock[numSock].timeOutSec = timeOutSec;
fkellermavnet 10:2ec59906a24e 376
fkellermavnet 10:2ec59906a24e 377 int numWncSock = at_sockopen_wnc(m_sSock[numSock].myIpAddressStr.c_str(), port, numSock, tcp, timeOutSec);
fkellermavnet 10:2ec59906a24e 378 m_sSock[numSock].numWncSock = numWncSock;
fkellermavnet 10:2ec59906a24e 379 if (numWncSock > 0 && numWncSock <= MAX_NUM_WNC_SOCKETS)
fkellermavnet 10:2ec59906a24e 380 m_sSock[numSock].open = true;
fkellermavnet 10:2ec59906a24e 381 else
fkellermavnet 10:2ec59906a24e 382 m_sSock[numSock].open = false;
fkellermavnet 10:2ec59906a24e 383
fkellermavnet 0:affdbb35faa4 384 if (m_sSock[numSock].open == false) {
fkellermavnet 0:affdbb35faa4 385 dbgPuts("Socket open fail!!!!");
fkellermavnet 0:affdbb35faa4 386 // Work-around. If the sock open fails it needs to be told
fkellermavnet 0:affdbb35faa4 387 // to close. If 6 sock opens happen with a fail, it further
fkellermavnet 0:affdbb35faa4 388 // crashes the WNC. Not sure why the sock won't open.
fkellermavnet 10:2ec59906a24e 389 at_sockclose_wnc(m_sSock[numSock].numWncSock);
fkellermavnet 0:affdbb35faa4 390 }
fkellermavnet 0:affdbb35faa4 391 }
fkellermavnet 0:affdbb35faa4 392 else {
fkellermavnet 0:affdbb35faa4 393 dbgPuts("Bad socket num or IP!");
fkellermavnet 0:affdbb35faa4 394 return (false);
fkellermavnet 0:affdbb35faa4 395 }
fkellermavnet 0:affdbb35faa4 396
fkellermavnet 0:affdbb35faa4 397 return (m_sSock[numSock].open);
fkellermavnet 0:affdbb35faa4 398 }
fkellermavnet 0:affdbb35faa4 399
fkellermavnet 0:affdbb35faa4 400 /**
fkellermavnet 0:affdbb35faa4 401 * \brief Write bytes of data to an open socket
fkellermavnet 0:affdbb35faa4 402 *
fkellermavnet 0:affdbb35faa4 403 * \param [in] sockNum - the number of the socket to write. s - a string containing
fkellermavnet 0:affdbb35faa4 404 * the byte data to send must be less than = 1500.
fkellermavnet 0:affdbb35faa4 405 *
fkellermavnet 0:affdbb35faa4 406 * \return true - if the write was successful. false otherwise.
fkellermavnet 0:affdbb35faa4 407 *
fkellermavnet 0:affdbb35faa4 408 * \details The results of the write do not have anything to do with the data
fkellermavnet 0:affdbb35faa4 409 * arriving at the endpoint.
fkellermavnet 0:affdbb35faa4 410 */
fkellermavnet 0:affdbb35faa4 411
fkellermavnet 13:73629a6e9122 412 bool WncController::sockWrite(const char * const s, uint16_t n, uint16_t numSock, bool isTcp)
fkellermavnet 0:affdbb35faa4 413 {
fkellermavnet 10:2ec59906a24e 414 bool result = true;
fkellermavnet 0:affdbb35faa4 415
fkellermavnet 10:2ec59906a24e 416 AtCmdErr_e cmdRes = at_sockwrite_wnc(s, n, m_sSock[numSock].numWncSock, isTcp);
fkellermavnet 0:affdbb35faa4 417 if (cmdRes != WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 418 if ((cmdRes == WNC_AT_CMD_ERREXT) || (cmdRes == WNC_AT_CMD_TIMEOUT) || (cmdRes == WNC_AT_CMD_ERRCME))
fkellermavnet 0:affdbb35faa4 419 {
fkellermavnet 1:ac2de545b981 420 // This may throw away any data that hasn't been written out of the WNC
fkellermavnet 0:affdbb35faa4 421 // but at this point with the way the WNC currently works we have
fkellermavnet 0:affdbb35faa4 422 // no choice.
fkellermavnet 0:affdbb35faa4 423 closeOpenSocket(numSock);
fkellermavnet 0:affdbb35faa4 424 }
fkellermavnet 0:affdbb35faa4 425 result = false;
fkellermavnet 0:affdbb35faa4 426 }
fkellermavnet 0:affdbb35faa4 427
fkellermavnet 0:affdbb35faa4 428 return (result);
fkellermavnet 0:affdbb35faa4 429 }
fkellermavnet 0:affdbb35faa4 430
fkellermavnet 0:affdbb35faa4 431 bool WncController::write(uint16_t numSock, const char * s, uint32_t n)
fkellermavnet 0:affdbb35faa4 432 {
fkellermavnet 0:affdbb35faa4 433 bool result;
fkellermavnet 0:affdbb35faa4 434
fkellermavnet 0:affdbb35faa4 435 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 0:affdbb35faa4 436 if (m_sSock[numSock].open == true) {
fkellermavnet 0:affdbb35faa4 437 if (n <= MAX_WNC_WRITE_BYTES) {
fkellermavnet 0:affdbb35faa4 438 result = sockWrite(s, n, numSock, m_sSock[numSock].isTcp);
fkellermavnet 0:affdbb35faa4 439 }
fkellermavnet 0:affdbb35faa4 440 else {
fkellermavnet 0:affdbb35faa4 441 uint16_t rem = n % MAX_WNC_WRITE_BYTES;
fkellermavnet 13:73629a6e9122 442 while (n >= MAX_WNC_WRITE_BYTES) {
fkellermavnet 0:affdbb35faa4 443 n -= MAX_WNC_WRITE_BYTES;
fkellermavnet 0:affdbb35faa4 444 result = sockWrite(s, MAX_WNC_WRITE_BYTES, numSock, m_sSock[numSock].isTcp);
fkellermavnet 0:affdbb35faa4 445 if (result == false) {
fkellermavnet 0:affdbb35faa4 446 n = 0;
fkellermavnet 0:affdbb35faa4 447 rem = 0;
fkellermavnet 0:affdbb35faa4 448 dbgPuts("Sock write fail!");
fkellermavnet 0:affdbb35faa4 449 }
fkellermavnet 0:affdbb35faa4 450 else
fkellermavnet 0:affdbb35faa4 451 s += MAX_WNC_WRITE_BYTES;
fkellermavnet 0:affdbb35faa4 452 }
fkellermavnet 0:affdbb35faa4 453 if (rem > 0)
fkellermavnet 0:affdbb35faa4 454 result = sockWrite(s, rem, numSock, m_sSock[numSock].isTcp);
fkellermavnet 0:affdbb35faa4 455 }
fkellermavnet 0:affdbb35faa4 456 }
fkellermavnet 0:affdbb35faa4 457 else {
fkellermavnet 0:affdbb35faa4 458 dbgPuts("Socket is closed for write!");
fkellermavnet 0:affdbb35faa4 459 result = false;
fkellermavnet 0:affdbb35faa4 460 }
fkellermavnet 0:affdbb35faa4 461 }
fkellermavnet 0:affdbb35faa4 462 else {
fkellermavnet 0:affdbb35faa4 463 dbgPuts("Bad socket num!");
fkellermavnet 0:affdbb35faa4 464 result = false;
fkellermavnet 0:affdbb35faa4 465 }
fkellermavnet 0:affdbb35faa4 466
fkellermavnet 0:affdbb35faa4 467 return (result);
fkellermavnet 0:affdbb35faa4 468 }
fkellermavnet 0:affdbb35faa4 469
fkellermavnet 0:affdbb35faa4 470 /**
fkellermavnet 0:affdbb35faa4 471 * \brief Poll and read back data from the WNC (if it has any)
fkellermavnet 0:affdbb35faa4 472 * If auto poll is enabled this read might fail (return with no data).
fkellermavnet 0:affdbb35faa4 473 *
fkellermavnet 0:affdbb35faa4 474 * \param [in] sockNum - the number of the socket to read. result - a string pointer containing
fkellermavnet 0:affdbb35faa4 475 * the byte data readback from the WNC.
fkellermavnet 0:affdbb35faa4 476 *
fkellermavnet 0:affdbb35faa4 477 * \return The number of bytes/chars that are read from the socket.
fkellermavnet 0:affdbb35faa4 478 *
fkellermavnet 0:affdbb35faa4 479 * \details DO NOT use the same string as is passed to the auto poll setup method!
fkellermavnet 0:affdbb35faa4 480 */
fkellermavnet 4:c5720f4d13ff 481
fkellermavnet 4:c5720f4d13ff 482 size_t WncController::read(uint16_t numSock, const uint8_t ** readBuf)
fkellermavnet 4:c5720f4d13ff 483 {
fkellermavnet 4:c5720f4d13ff 484 static string theBuf;
fkellermavnet 4:c5720f4d13ff 485 string readStr;
fkellermavnet 4:c5720f4d13ff 486
fkellermavnet 4:c5720f4d13ff 487 theBuf.erase(); // Clean-up from last time
fkellermavnet 4:c5720f4d13ff 488
fkellermavnet 4:c5720f4d13ff 489 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 4:c5720f4d13ff 490 if (m_sSock[numSock].open == true) {
fkellermavnet 4:c5720f4d13ff 491 uint8_t i = m_sSock[numSock].readRetries;
fkellermavnet 4:c5720f4d13ff 492 uint16_t to = m_sSock[numSock].readRetryWaitMs;
fkellermavnet 4:c5720f4d13ff 493 bool foundData = false;
fkellermavnet 4:c5720f4d13ff 494 do {
fkellermavnet 4:c5720f4d13ff 495 AtCmdErr_e cmdRes;
fkellermavnet 10:2ec59906a24e 496 cmdRes = at_sockread_wnc(&readStr, m_sSock[numSock].numWncSock, m_sSock[numSock].isTcp);
fkellermavnet 4:c5720f4d13ff 497 if (WNC_AT_CMD_OK == cmdRes) {
fkellermavnet 4:c5720f4d13ff 498 // This will let this loop read until the socket data is
fkellermavnet 4:c5720f4d13ff 499 // empty. If no data, then wait the retry amount of time.
fkellermavnet 4:c5720f4d13ff 500 if (readStr.size() > 0) {
fkellermavnet 4:c5720f4d13ff 501 theBuf += readStr;
fkellermavnet 4:c5720f4d13ff 502 foundData = true;
fkellermavnet 4:c5720f4d13ff 503 i = 1;
fkellermavnet 4:c5720f4d13ff 504 }
fkellermavnet 4:c5720f4d13ff 505 else {
fkellermavnet 4:c5720f4d13ff 506 // Once data is found start returning it asap
fkellermavnet 4:c5720f4d13ff 507 if (foundData == false)
fkellermavnet 4:c5720f4d13ff 508 waitMs(to);
fkellermavnet 4:c5720f4d13ff 509 }
fkellermavnet 4:c5720f4d13ff 510 }
fkellermavnet 4:c5720f4d13ff 511 else {
fkellermavnet 4:c5720f4d13ff 512 theBuf += readStr; // Append what if any we got before it errored.
fkellermavnet 4:c5720f4d13ff 513 dbgPuts("Sockread failed!");
fkellermavnet 4:c5720f4d13ff 514 if (cmdRes == WNC_AT_CMD_ERREXT || cmdRes == WNC_AT_CMD_TIMEOUT)
fkellermavnet 4:c5720f4d13ff 515 {
fkellermavnet 4:c5720f4d13ff 516 // This may throw away any data that hasn't been read out of the WNC
fkellermavnet 4:c5720f4d13ff 517 // but at this point with the way the WNC currently works we have
fkellermavnet 4:c5720f4d13ff 518 // no choice.
fkellermavnet 4:c5720f4d13ff 519 closeOpenSocket(numSock);
fkellermavnet 4:c5720f4d13ff 520 i = 0;
fkellermavnet 4:c5720f4d13ff 521 }
fkellermavnet 4:c5720f4d13ff 522 else
fkellermavnet 4:c5720f4d13ff 523 waitMs(to);
fkellermavnet 4:c5720f4d13ff 524 }
fkellermavnet 4:c5720f4d13ff 525 } while (i-- > 0);
fkellermavnet 4:c5720f4d13ff 526 }
fkellermavnet 4:c5720f4d13ff 527 else {
fkellermavnet 4:c5720f4d13ff 528 dbgPuts("Socket is closed for read");
fkellermavnet 4:c5720f4d13ff 529 }
fkellermavnet 4:c5720f4d13ff 530 }
fkellermavnet 4:c5720f4d13ff 531 else {
fkellermavnet 4:c5720f4d13ff 532 dbgPuts("Bad socket num!");
fkellermavnet 4:c5720f4d13ff 533 }
fkellermavnet 4:c5720f4d13ff 534
fkellermavnet 4:c5720f4d13ff 535 *readBuf = (const uint8_t *)theBuf.c_str();
fkellermavnet 4:c5720f4d13ff 536
fkellermavnet 4:c5720f4d13ff 537 return (theBuf.size());
fkellermavnet 4:c5720f4d13ff 538 }
fkellermavnet 4:c5720f4d13ff 539
fkellermavnet 0:affdbb35faa4 540 size_t WncController::read(uint16_t numSock, uint8_t * readBuf, uint32_t maxReadBufLen)
fkellermavnet 0:affdbb35faa4 541 {
fkellermavnet 0:affdbb35faa4 542 uint32_t numCopied = 0;
fkellermavnet 0:affdbb35faa4 543
fkellermavnet 0:affdbb35faa4 544 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 0:affdbb35faa4 545 if (m_sSock[numSock].open == true) {
fkellermavnet 9:76c6dd1434e1 546 uint8_t i = m_sSock[numSock].readRetries;
fkellermavnet 0:affdbb35faa4 547 uint16_t to = m_sSock[numSock].readRetryWaitMs;
fkellermavnet 0:affdbb35faa4 548 bool foundData = false;
fkellermavnet 12:33290e9e6e5f 549 uint16_t numRead;
fkellermavnet 0:affdbb35faa4 550 do {
fkellermavnet 0:affdbb35faa4 551 AtCmdErr_e cmdRes;
fkellermavnet 10:2ec59906a24e 552 if (maxReadBufLen < MAX_WNC_READ_BYTES)
fkellermavnet 10:2ec59906a24e 553 cmdRes = at_sockread_wnc(readBuf, &numRead, maxReadBufLen, m_sSock[numSock].numWncSock, m_sSock[numSock].isTcp);
fkellermavnet 0:affdbb35faa4 554 else
fkellermavnet 10:2ec59906a24e 555 cmdRes = at_sockread_wnc(readBuf, &numRead, MAX_WNC_READ_BYTES, m_sSock[numSock].numWncSock, m_sSock[numSock].isTcp);
fkellermavnet 0:affdbb35faa4 556
fkellermavnet 0:affdbb35faa4 557 if (WNC_AT_CMD_OK == cmdRes) {
fkellermavnet 0:affdbb35faa4 558 // This will let this loop read until the socket data is
fkellermavnet 0:affdbb35faa4 559 // empty. If no data, then wait the retry amount of time.
fkellermavnet 0:affdbb35faa4 560 if (numRead > 0) {
fkellermavnet 0:affdbb35faa4 561 foundData = true;
fkellermavnet 0:affdbb35faa4 562 i = 1;
fkellermavnet 10:2ec59906a24e 563 if (numRead <= maxReadBufLen) {
fkellermavnet 0:affdbb35faa4 564 maxReadBufLen -= numRead;
fkellermavnet 0:affdbb35faa4 565 numCopied += numRead;
fkellermavnet 0:affdbb35faa4 566 readBuf += numRead;
fkellermavnet 0:affdbb35faa4 567 }
fkellermavnet 0:affdbb35faa4 568 else {
fkellermavnet 0:affdbb35faa4 569 i = 0; // No more room for data!
fkellermavnet 0:affdbb35faa4 570 dbgPutsNoTime("No more room for read data!");
fkellermavnet 0:affdbb35faa4 571 }
fkellermavnet 0:affdbb35faa4 572 }
fkellermavnet 0:affdbb35faa4 573 else {
fkellermavnet 0:affdbb35faa4 574 // Once data is found start returning it asap
fkellermavnet 0:affdbb35faa4 575 if (foundData == false)
fkellermavnet 0:affdbb35faa4 576 waitMs(to);
fkellermavnet 0:affdbb35faa4 577 }
fkellermavnet 0:affdbb35faa4 578 }
fkellermavnet 0:affdbb35faa4 579 else {
fkellermavnet 0:affdbb35faa4 580 dbgPuts("Sockread failed!");
fkellermavnet 0:affdbb35faa4 581 if (cmdRes == WNC_AT_CMD_ERREXT || cmdRes == WNC_AT_CMD_TIMEOUT)
fkellermavnet 0:affdbb35faa4 582 {
fkellermavnet 0:affdbb35faa4 583 // This may throw away any data that hasn't been read out of the WNC
fkellermavnet 0:affdbb35faa4 584 // but at this point with the way the WNC currently works we have
fkellermavnet 0:affdbb35faa4 585 // no choice.
fkellermavnet 0:affdbb35faa4 586 closeOpenSocket(numSock);
fkellermavnet 0:affdbb35faa4 587 i = 0;
fkellermavnet 0:affdbb35faa4 588 }
fkellermavnet 0:affdbb35faa4 589 else
fkellermavnet 0:affdbb35faa4 590 waitMs(to);
fkellermavnet 0:affdbb35faa4 591 }
fkellermavnet 10:2ec59906a24e 592 } while ((i-- > 0) && (maxReadBufLen > 0));
fkellermavnet 0:affdbb35faa4 593 }
fkellermavnet 0:affdbb35faa4 594 else {
fkellermavnet 0:affdbb35faa4 595 dbgPuts("Socket is closed for read");
fkellermavnet 0:affdbb35faa4 596 }
fkellermavnet 0:affdbb35faa4 597 }
fkellermavnet 0:affdbb35faa4 598 else {
fkellermavnet 0:affdbb35faa4 599 dbgPuts("Bad socket num!");
fkellermavnet 0:affdbb35faa4 600 }
fkellermavnet 0:affdbb35faa4 601
fkellermavnet 0:affdbb35faa4 602 return (numCopied);
fkellermavnet 0:affdbb35faa4 603 }
fkellermavnet 0:affdbb35faa4 604
fkellermavnet 0:affdbb35faa4 605 /**
fkellermavnet 0:affdbb35faa4 606 * \brief Set how many times the above read method will retry if data is not returned.
fkellermavnet 0:affdbb35faa4 607 *
fkellermavnet 0:affdbb35faa4 608 * \param [in] sockNum - the number of the socket to set. retries - how many times to
fkellermavnet 0:affdbb35faa4 609 * poll until data is found.
fkellermavnet 0:affdbb35faa4 610 *
fkellermavnet 0:affdbb35faa4 611 * \return None.
fkellermavnet 0:affdbb35faa4 612 *
fkellermavnet 0:affdbb35faa4 613 * \details None.
fkellermavnet 0:affdbb35faa4 614 */
fkellermavnet 0:affdbb35faa4 615 void WncController::setReadRetries(uint16_t numSock, uint16_t retries)
fkellermavnet 0:affdbb35faa4 616 {
fkellermavnet 0:affdbb35faa4 617 if (numSock < MAX_NUM_WNC_SOCKETS)
fkellermavnet 0:affdbb35faa4 618 m_sSock[numSock].readRetries = retries;
fkellermavnet 0:affdbb35faa4 619 else
fkellermavnet 0:affdbb35faa4 620 dbgPuts("Bad socket num!");
fkellermavnet 0:affdbb35faa4 621 }
fkellermavnet 0:affdbb35faa4 622
fkellermavnet 0:affdbb35faa4 623 /**
fkellermavnet 0:affdbb35faa4 624 * \brief Set how long between retries to wait.
fkellermavnet 0:affdbb35faa4 625 *
fkellermavnet 0:affdbb35faa4 626 * \param [in] sockNum - the number of the socket to set. readRetryWaitMs - how long to wait
fkellermavnet 0:affdbb35faa4 627 * before doing the read poll (calling read(...)).
fkellermavnet 0:affdbb35faa4 628 *
fkellermavnet 0:affdbb35faa4 629 * \return None.
fkellermavnet 0:affdbb35faa4 630 *
fkellermavnet 0:affdbb35faa4 631 * \details None.
fkellermavnet 0:affdbb35faa4 632 */
fkellermavnet 0:affdbb35faa4 633 void WncController::setReadRetryWait(uint16_t numSock, uint16_t readRetryWaitMs)
fkellermavnet 0:affdbb35faa4 634 {
fkellermavnet 0:affdbb35faa4 635 if (numSock < MAX_NUM_WNC_SOCKETS)
fkellermavnet 0:affdbb35faa4 636 m_sSock[numSock].readRetryWaitMs = readRetryWaitMs;
fkellermavnet 0:affdbb35faa4 637 else
fkellermavnet 0:affdbb35faa4 638 dbgPuts("Bad socket num!");
fkellermavnet 0:affdbb35faa4 639 }
fkellermavnet 0:affdbb35faa4 640
fkellermavnet 0:affdbb35faa4 641 /**
fkellermavnet 0:affdbb35faa4 642 * \brief Close the socket.
fkellermavnet 0:affdbb35faa4 643 *
fkellermavnet 0:affdbb35faa4 644 * \param [in] sockNum - the number of the socket to close.
fkellermavnet 0:affdbb35faa4 645 *
fkellermavnet 0:affdbb35faa4 646 * \return None.
fkellermavnet 0:affdbb35faa4 647 *
fkellermavnet 0:affdbb35faa4 648 * \details None.
fkellermavnet 0:affdbb35faa4 649 */
fkellermavnet 0:affdbb35faa4 650 bool WncController::closeSocket(uint16_t numSock)
fkellermavnet 0:affdbb35faa4 651 {
fkellermavnet 0:affdbb35faa4 652 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 0:affdbb35faa4 653
fkellermavnet 10:2ec59906a24e 654 if (false == at_sockclose_wnc(m_sSock[numSock].numWncSock))
fkellermavnet 0:affdbb35faa4 655 dbgPuts("Sock close may not have closed!");
fkellermavnet 0:affdbb35faa4 656
fkellermavnet 0:affdbb35faa4 657 // Even with an error the socket could have closed,
fkellermavnet 0:affdbb35faa4 658 // can't tell for sure so just soft close it for now.
fkellermavnet 0:affdbb35faa4 659 m_sSock[numSock].open = false;
fkellermavnet 0:affdbb35faa4 660 }
fkellermavnet 0:affdbb35faa4 661 else {
fkellermavnet 0:affdbb35faa4 662 dbgPuts("Bad socket num!");
fkellermavnet 0:affdbb35faa4 663 }
fkellermavnet 0:affdbb35faa4 664
fkellermavnet 0:affdbb35faa4 665 return (m_sSock[numSock].open == false);
fkellermavnet 0:affdbb35faa4 666 }
fkellermavnet 0:affdbb35faa4 667
fkellermavnet 0:affdbb35faa4 668 // Note: If you want to make it more portable, create a
fkellermavnet 0:affdbb35faa4 669 // arecharsavailable() and readchar()
fkellermavnet 1:ac2de545b981 670 size_t WncController::mdmGetline(string * buff, int timeout_ms)
fkellermavnet 0:affdbb35faa4 671 {
fkellermavnet 0:affdbb35faa4 672 char chin = '\0';
fkellermavnet 0:affdbb35faa4 673 char chin_last;
fkellermavnet 0:affdbb35faa4 674 size_t len = 0;
fkellermavnet 0:affdbb35faa4 675
fkellermavnet 0:affdbb35faa4 676 startTimerB();
fkellermavnet 1:ac2de545b981 677 while ((len < (MAX_LEN_WNC_CMD_RESPONSE - 1)) && (getTimerTicksB_mS() < timeout_ms)) {
fkellermavnet 1:ac2de545b981 678 if (charReady()) {
fkellermavnet 0:affdbb35faa4 679 chin_last = chin;
fkellermavnet 1:ac2de545b981 680 chin = getc();
fkellermavnet 0:affdbb35faa4 681 if (isprint(chin)) {
fkellermavnet 1:ac2de545b981 682 *buff += chin;
fkellermavnet 0:affdbb35faa4 683 len++; // Bound the copy length to something reaonable just in case
fkellermavnet 0:affdbb35faa4 684 continue;
fkellermavnet 0:affdbb35faa4 685 }
fkellermavnet 0:affdbb35faa4 686 else if ((('\r' == chin_last) && ('\n' == chin)) || (('\n' == chin_last) && ('\r' == chin))) {
fkellermavnet 0:affdbb35faa4 687 break;
fkellermavnet 0:affdbb35faa4 688 }
fkellermavnet 0:affdbb35faa4 689 }
fkellermavnet 0:affdbb35faa4 690 }
fkellermavnet 0:affdbb35faa4 691 stopTimerB();
fkellermavnet 0:affdbb35faa4 692
fkellermavnet 0:affdbb35faa4 693 if (len >= (MAX_LEN_WNC_CMD_RESPONSE - 1))
fkellermavnet 0:affdbb35faa4 694 dbgPuts("Max cmd length reply exceeded!");
fkellermavnet 0:affdbb35faa4 695
fkellermavnet 0:affdbb35faa4 696 return (len);
fkellermavnet 0:affdbb35faa4 697 }
fkellermavnet 0:affdbb35faa4 698
fkellermavnet 0:affdbb35faa4 699 // Eventually this should try to reinstate the sockets open
fkellermavnet 0:affdbb35faa4 700 bool WncController::softwareInitMdm(void)
fkellermavnet 0:affdbb35faa4 701 {
fkellermavnet 0:affdbb35faa4 702 static bool reportStatus = true;
fkellermavnet 0:affdbb35faa4 703 unsigned i;
fkellermavnet 0:affdbb35faa4 704
fkellermavnet 0:affdbb35faa4 705 if (checkCellLink() == true) {
fkellermavnet 0:affdbb35faa4 706 if (reportStatus == false) {
fkellermavnet 0:affdbb35faa4 707 dbgPuts("Re-connected to cellular network!");
fkellermavnet 0:affdbb35faa4 708 reportStatus = true;
fkellermavnet 0:affdbb35faa4 709 }
fkellermavnet 0:affdbb35faa4 710
fkellermavnet 0:affdbb35faa4 711 // WNC has SIM and registered on network so
fkellermavnet 0:affdbb35faa4 712 // soft initialize the WNC.
fkellermavnet 0:affdbb35faa4 713 for (i = 0; i < WNC_SOFT_INIT_RETRY_COUNT; i++)
fkellermavnet 0:affdbb35faa4 714 if (at_init_wnc() == true)
fkellermavnet 0:affdbb35faa4 715 break;
fkellermavnet 0:affdbb35faa4 716
fkellermavnet 0:affdbb35faa4 717 // If it did not respond try a hardware init
fkellermavnet 0:affdbb35faa4 718 if (i == WNC_SOFT_INIT_RETRY_COUNT)
fkellermavnet 0:affdbb35faa4 719 {
fkellermavnet 0:affdbb35faa4 720 at_reinitialize_mdm();
fkellermavnet 0:affdbb35faa4 721 return (at_init_wnc(true)); // Hard reset occurred so make it go through the software init();
fkellermavnet 0:affdbb35faa4 722 }
fkellermavnet 0:affdbb35faa4 723 else
fkellermavnet 0:affdbb35faa4 724 return (true);
fkellermavnet 0:affdbb35faa4 725 }
fkellermavnet 0:affdbb35faa4 726 else
fkellermavnet 0:affdbb35faa4 727 {
fkellermavnet 0:affdbb35faa4 728 if (reportStatus == true) {
fkellermavnet 0:affdbb35faa4 729 dbgPuts("Not connected to cellular network!");
fkellermavnet 0:affdbb35faa4 730 reportStatus = false;
fkellermavnet 0:affdbb35faa4 731 }
fkellermavnet 0:affdbb35faa4 732 return (false);
fkellermavnet 0:affdbb35faa4 733 }
fkellermavnet 0:affdbb35faa4 734 }
fkellermavnet 0:affdbb35faa4 735
fkellermavnet 0:affdbb35faa4 736
fkellermavnet 0:affdbb35faa4 737 // Sets a global with failure or success, assumes 1 thread all the time
fkellermavnet 0:affdbb35faa4 738 WncController::AtCmdErr_e WncController::sendWncCmd(const char * const s, string ** r, int ms_timeout)
fkellermavnet 0:affdbb35faa4 739 {
fkellermavnet 0:affdbb35faa4 740 if (checkCellLink() == false) {
fkellermavnet 0:affdbb35faa4 741 static string noRespStr;
fkellermavnet 0:affdbb35faa4 742
fkellermavnet 0:affdbb35faa4 743 // Save some run-time!
fkellermavnet 0:affdbb35faa4 744 if (m_sDebugEnabled)
fkellermavnet 0:affdbb35faa4 745 {
fkellermavnet 0:affdbb35faa4 746 dbgPuts("FAIL send cmd: ", false);
fkellermavnet 0:affdbb35faa4 747 if (m_sMoreDebugEnabled && m_sDebugEnabled) {
fkellermavnet 0:affdbb35faa4 748 dbgPutsNoTime(s);
fkellermavnet 0:affdbb35faa4 749 }
fkellermavnet 0:affdbb35faa4 750 else {
fkellermavnet 0:affdbb35faa4 751 size_t n = strlen(s);
fkellermavnet 0:affdbb35faa4 752 if (n <= WNC_TRUNC_DEBUG_LENGTH) {
fkellermavnet 0:affdbb35faa4 753 dbgPutsNoTime(s);
fkellermavnet 0:affdbb35faa4 754 }
fkellermavnet 0:affdbb35faa4 755 else {
fkellermavnet 0:affdbb35faa4 756 string truncStr(s,WNC_TRUNC_DEBUG_LENGTH/2);
fkellermavnet 0:affdbb35faa4 757 truncStr += "..";
fkellermavnet 0:affdbb35faa4 758 truncStr += &s[n-(WNC_TRUNC_DEBUG_LENGTH/2)];
fkellermavnet 0:affdbb35faa4 759 dbgPutsNoTime(truncStr.c_str());
fkellermavnet 0:affdbb35faa4 760 }
fkellermavnet 0:affdbb35faa4 761 }
fkellermavnet 0:affdbb35faa4 762 }
fkellermavnet 0:affdbb35faa4 763
fkellermavnet 0:affdbb35faa4 764 noRespStr.erase();
fkellermavnet 0:affdbb35faa4 765 *r = &noRespStr;
fkellermavnet 0:affdbb35faa4 766
fkellermavnet 0:affdbb35faa4 767 return (WNC_AT_CMD_NO_CELL_LINK);
fkellermavnet 0:affdbb35faa4 768 }
fkellermavnet 0:affdbb35faa4 769
fkellermavnet 0:affdbb35faa4 770 if (m_sCheckNetStatus)
fkellermavnet 0:affdbb35faa4 771 {
fkellermavnet 0:affdbb35faa4 772 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 773 dbgPuts("[---------- Network Status -------------");
fkellermavnet 0:affdbb35faa4 774 string * pRespStr;
fkellermavnet 0:affdbb35faa4 775 at_send_wnc_cmd("AT@SOCKDIAL?", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 776 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 777 dbgPuts("---------------------------------------]");
fkellermavnet 0:affdbb35faa4 778 }
fkellermavnet 0:affdbb35faa4 779
fkellermavnet 0:affdbb35faa4 780 // If WNC ready, send user command
fkellermavnet 0:affdbb35faa4 781 return (at_send_wnc_cmd(s, r, ms_timeout));
fkellermavnet 0:affdbb35faa4 782 }
fkellermavnet 0:affdbb35faa4 783
fkellermavnet 0:affdbb35faa4 784 WncController::AtCmdErr_e WncController::at_send_wnc_cmd(const char * s, string ** r, int ms_timeout)
fkellermavnet 0:affdbb35faa4 785 {
fkellermavnet 0:affdbb35faa4 786 // Save some run-time!
fkellermavnet 0:affdbb35faa4 787 if (m_sDebugEnabled)
fkellermavnet 0:affdbb35faa4 788 {
fkellermavnet 0:affdbb35faa4 789 if (m_sMoreDebugEnabled) {
fkellermavnet 0:affdbb35faa4 790 dbgPuts("TX: ", false); dbgPutsNoTime(s);
fkellermavnet 0:affdbb35faa4 791 }
fkellermavnet 0:affdbb35faa4 792 else {
fkellermavnet 0:affdbb35faa4 793 if (m_sDebugEnabled) { // Save some run-time!
fkellermavnet 0:affdbb35faa4 794 size_t n = strlen(s);
fkellermavnet 0:affdbb35faa4 795 if (n <= WNC_TRUNC_DEBUG_LENGTH) {
fkellermavnet 0:affdbb35faa4 796 dbgPuts("TX: ", false); dbgPutsNoTime(s);
fkellermavnet 0:affdbb35faa4 797 }
fkellermavnet 0:affdbb35faa4 798 else {
fkellermavnet 0:affdbb35faa4 799 string truncStr(s,WNC_TRUNC_DEBUG_LENGTH/2);
fkellermavnet 0:affdbb35faa4 800 truncStr += "..";
fkellermavnet 0:affdbb35faa4 801 truncStr += &s[n - (WNC_TRUNC_DEBUG_LENGTH/2)];
fkellermavnet 0:affdbb35faa4 802 dbgPuts("TX: ", false); dbgPutsNoTime(truncStr.c_str());
fkellermavnet 0:affdbb35faa4 803 }
fkellermavnet 0:affdbb35faa4 804 }
fkellermavnet 0:affdbb35faa4 805 }
fkellermavnet 0:affdbb35faa4 806 }
fkellermavnet 0:affdbb35faa4 807
fkellermavnet 0:affdbb35faa4 808 AtCmdErr_e atResult = mdmSendAtCmdRsp(s, ms_timeout, &m_sWncStr);
fkellermavnet 0:affdbb35faa4 809 *r = &m_sWncStr; // Return a pointer to the static string
fkellermavnet 0:affdbb35faa4 810
fkellermavnet 0:affdbb35faa4 811 if (atResult != WNC_AT_CMD_TIMEOUT) {
fkellermavnet 0:affdbb35faa4 812 // Save some run-time!
fkellermavnet 0:affdbb35faa4 813 if (m_sDebugEnabled)
fkellermavnet 0:affdbb35faa4 814 {
fkellermavnet 0:affdbb35faa4 815 dbgPuts("RX: ", false);
fkellermavnet 0:affdbb35faa4 816 if (m_sMoreDebugEnabled) {
fkellermavnet 0:affdbb35faa4 817 dbgPutsNoTime(m_sWncStr.c_str());
fkellermavnet 0:affdbb35faa4 818 }
fkellermavnet 0:affdbb35faa4 819 else {
fkellermavnet 0:affdbb35faa4 820 if (m_sWncStr.size() <= WNC_TRUNC_DEBUG_LENGTH) {
fkellermavnet 0:affdbb35faa4 821 dbgPutsNoTime(m_sWncStr.c_str());
fkellermavnet 0:affdbb35faa4 822 }
fkellermavnet 0:affdbb35faa4 823 else {
fkellermavnet 0:affdbb35faa4 824 string truncStr = m_sWncStr.substr(0,WNC_TRUNC_DEBUG_LENGTH/2) + "..";
fkellermavnet 0:affdbb35faa4 825 truncStr += m_sWncStr.substr(m_sWncStr.size() - (WNC_TRUNC_DEBUG_LENGTH/2), WNC_TRUNC_DEBUG_LENGTH/2);
fkellermavnet 0:affdbb35faa4 826 dbgPutsNoTime(truncStr.c_str());
fkellermavnet 0:affdbb35faa4 827 }
fkellermavnet 0:affdbb35faa4 828 }
fkellermavnet 0:affdbb35faa4 829 }
fkellermavnet 0:affdbb35faa4 830 }
fkellermavnet 0:affdbb35faa4 831 else {
fkellermavnet 0:affdbb35faa4 832 dbgPuts("AT Cmd TIMEOUT!");
fkellermavnet 0:affdbb35faa4 833 dbgPuts("RX: ", false); dbgPutsNoTime(m_sWncStr.c_str());
fkellermavnet 0:affdbb35faa4 834 }
fkellermavnet 0:affdbb35faa4 835
fkellermavnet 0:affdbb35faa4 836 return (atResult);
fkellermavnet 0:affdbb35faa4 837 }
fkellermavnet 0:affdbb35faa4 838
fkellermavnet 0:affdbb35faa4 839 void WncController::closeOpenSocket(uint16_t numSock)
fkellermavnet 0:affdbb35faa4 840 {
fkellermavnet 0:affdbb35faa4 841 // Try to open and close the socket
fkellermavnet 0:affdbb35faa4 842 do {
fkellermavnet 0:affdbb35faa4 843 dbgPuts("Try to close and re-open socket");
fkellermavnet 10:2ec59906a24e 844 at_sockclose_wnc(m_sSock[numSock].numWncSock);
fkellermavnet 10:2ec59906a24e 845
fkellermavnet 10:2ec59906a24e 846 int numWncSock = at_sockopen_wnc(m_sSock[numSock].myIpAddressStr.c_str(), m_sSock[numSock].myPort, numSock, m_sSock[numSock].isTcp, m_sSock[numSock].timeOutSec);
fkellermavnet 10:2ec59906a24e 847 m_sSock[numSock].numWncSock = numWncSock;
fkellermavnet 10:2ec59906a24e 848 if (numWncSock > 0 && numWncSock <= MAX_NUM_WNC_SOCKETS)
fkellermavnet 10:2ec59906a24e 849 m_sSock[numSock].open = true;
fkellermavnet 10:2ec59906a24e 850 else
fkellermavnet 10:2ec59906a24e 851 m_sSock[numSock].open = false;
fkellermavnet 10:2ec59906a24e 852
fkellermavnet 0:affdbb35faa4 853 if (m_sSock[numSock].open == false)
fkellermavnet 0:affdbb35faa4 854 dbgPuts("Failed to re-open socket!");
fkellermavnet 0:affdbb35faa4 855 } while (m_sSock[numSock].open == false);
fkellermavnet 0:affdbb35faa4 856 }
fkellermavnet 0:affdbb35faa4 857
fkellermavnet 0:affdbb35faa4 858 bool WncController::sendSMSText(const char * const phoneNum, const char * const text)
fkellermavnet 0:affdbb35faa4 859 {
fkellermavnet 0:affdbb35faa4 860 if (at_sendSMStext_wnc(phoneNum, text) == true)
fkellermavnet 0:affdbb35faa4 861 return (true);
fkellermavnet 0:affdbb35faa4 862 else {
fkellermavnet 0:affdbb35faa4 863 dbgPuts("sendSMSText: Failed!");
fkellermavnet 0:affdbb35faa4 864 return (false);
fkellermavnet 0:affdbb35faa4 865 }
fkellermavnet 0:affdbb35faa4 866 }
fkellermavnet 0:affdbb35faa4 867
fkellermavnet 0:affdbb35faa4 868 size_t WncController::readSMSLog(const char ** log)
fkellermavnet 0:affdbb35faa4 869 {
fkellermavnet 0:affdbb35faa4 870 size_t n;
fkellermavnet 0:affdbb35faa4 871
fkellermavnet 0:affdbb35faa4 872 n = at_readSMSlog_wnc(log);
fkellermavnet 0:affdbb35faa4 873 if (n == 0)
fkellermavnet 0:affdbb35faa4 874 dbgPuts("readSMSLog: Failed!");
fkellermavnet 0:affdbb35faa4 875
fkellermavnet 0:affdbb35faa4 876 return (n);
fkellermavnet 0:affdbb35faa4 877 }
fkellermavnet 0:affdbb35faa4 878
fkellermavnet 0:affdbb35faa4 879 size_t WncController::getSignalQuality(const char ** log)
fkellermavnet 0:affdbb35faa4 880 {
fkellermavnet 0:affdbb35faa4 881 size_t n;
fkellermavnet 0:affdbb35faa4 882
fkellermavnet 0:affdbb35faa4 883 n = at_getSignalQuality_wnc(log);
fkellermavnet 0:affdbb35faa4 884 if (n == 0)
fkellermavnet 0:affdbb35faa4 885 dbgPuts("readSMSText: Failed!");
fkellermavnet 0:affdbb35faa4 886
fkellermavnet 0:affdbb35faa4 887 return (n);
fkellermavnet 0:affdbb35faa4 888 }
fkellermavnet 0:affdbb35faa4 889
fkellermavnet 0:affdbb35faa4 890 size_t WncController::at_getSignalQuality_wnc(const char ** log)
fkellermavnet 0:affdbb35faa4 891 {
fkellermavnet 0:affdbb35faa4 892 string * pRespStr;
fkellermavnet 0:affdbb35faa4 893 static string logStr;
fkellermavnet 0:affdbb35faa4 894
fkellermavnet 0:affdbb35faa4 895 logStr.erase();
fkellermavnet 0:affdbb35faa4 896
fkellermavnet 0:affdbb35faa4 897 if (at_send_wnc_cmd("AT%MEAS=\"0\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 898 logStr = *pRespStr;
fkellermavnet 0:affdbb35faa4 899 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 900 }
fkellermavnet 0:affdbb35faa4 901 else
fkellermavnet 0:affdbb35faa4 902 dbgPuts("AT%MEAS=0: failed!");
fkellermavnet 0:affdbb35faa4 903
fkellermavnet 0:affdbb35faa4 904 if (at_send_wnc_cmd("AT%MEAS=\"1\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 905 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 906 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 907 }
fkellermavnet 0:affdbb35faa4 908 else
fkellermavnet 0:affdbb35faa4 909 dbgPuts("AT%MEAS=1: failed!");
fkellermavnet 0:affdbb35faa4 910
fkellermavnet 0:affdbb35faa4 911 if (at_send_wnc_cmd("AT%MEAS=\"2\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 912 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 913 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 914 }
fkellermavnet 0:affdbb35faa4 915 else
fkellermavnet 0:affdbb35faa4 916 dbgPuts("AT%MEAS=2: failed!");
fkellermavnet 0:affdbb35faa4 917
fkellermavnet 0:affdbb35faa4 918 if (at_send_wnc_cmd("AT%MEAS=\"3\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 919 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 920 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 921 }
fkellermavnet 0:affdbb35faa4 922 else
fkellermavnet 0:affdbb35faa4 923 dbgPuts("AT%MEAS=3: failed!");
fkellermavnet 0:affdbb35faa4 924
fkellermavnet 0:affdbb35faa4 925 if (at_send_wnc_cmd("AT%MEAS=\"4\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 926 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 927 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 928 }
fkellermavnet 0:affdbb35faa4 929 else
fkellermavnet 0:affdbb35faa4 930 dbgPuts("AT%MEAS=4: failed!");
fkellermavnet 0:affdbb35faa4 931
fkellermavnet 0:affdbb35faa4 932 if (at_send_wnc_cmd("AT%MEAS=\"5\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 933 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 934 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 935 }
fkellermavnet 0:affdbb35faa4 936 else
fkellermavnet 0:affdbb35faa4 937 dbgPuts("AT%MEAS=5: failed!");
fkellermavnet 0:affdbb35faa4 938
fkellermavnet 0:affdbb35faa4 939 if (at_send_wnc_cmd("AT%MEAS=\"8\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 940 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 941 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 942 }
fkellermavnet 0:affdbb35faa4 943 else
fkellermavnet 0:affdbb35faa4 944 dbgPuts("AT%MEAS=8: failed!");
fkellermavnet 0:affdbb35faa4 945
fkellermavnet 0:affdbb35faa4 946 if (at_send_wnc_cmd("AT%MEAS=\"98\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 947 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 948 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 949 }
fkellermavnet 0:affdbb35faa4 950 else
fkellermavnet 0:affdbb35faa4 951 dbgPuts("AT%MEAS=98: failed!");
fkellermavnet 0:affdbb35faa4 952
fkellermavnet 0:affdbb35faa4 953 *log = logStr.c_str();
fkellermavnet 0:affdbb35faa4 954
fkellermavnet 0:affdbb35faa4 955 return (logStr.size());
fkellermavnet 0:affdbb35faa4 956 }
fkellermavnet 0:affdbb35faa4 957
fkellermavnet 0:affdbb35faa4 958 bool WncController::getTimeDate(struct WncDateTime * tod)
fkellermavnet 0:affdbb35faa4 959 {
fkellermavnet 0:affdbb35faa4 960 if (at_gettimedate_wnc(tod) == true)
fkellermavnet 0:affdbb35faa4 961 return (true);
fkellermavnet 0:affdbb35faa4 962 else {
fkellermavnet 0:affdbb35faa4 963 dbgPuts("Get time date failed!");
fkellermavnet 0:affdbb35faa4 964 return (false);
fkellermavnet 0:affdbb35faa4 965 }
fkellermavnet 0:affdbb35faa4 966 }
fkellermavnet 0:affdbb35faa4 967
fkellermavnet 0:affdbb35faa4 968 bool WncController::at_ping_wnc(const char * ip)
fkellermavnet 0:affdbb35faa4 969 {
fkellermavnet 0:affdbb35faa4 970 string * pRespStr;
fkellermavnet 0:affdbb35faa4 971 string cmdStr = "AT@PINGREQ=\"";
fkellermavnet 0:affdbb35faa4 972 cmdStr += ip;
fkellermavnet 0:affdbb35faa4 973 cmdStr += "\"";
fkellermavnet 0:affdbb35faa4 974 return (at_send_wnc_cmd(cmdStr.c_str(), &pRespStr, WNC_PING_CMD_TIMEOUT_MS) == WNC_AT_CMD_OK);
fkellermavnet 0:affdbb35faa4 975 }
fkellermavnet 0:affdbb35faa4 976
fkellermavnet 0:affdbb35faa4 977 bool WncController::at_gettimedate_wnc(struct WncDateTime * tod)
fkellermavnet 0:affdbb35faa4 978 {
fkellermavnet 0:affdbb35faa4 979 string * pRespStr;
fkellermavnet 0:affdbb35faa4 980 char * pEnd;
fkellermavnet 0:affdbb35faa4 981
fkellermavnet 0:affdbb35faa4 982 if (at_send_wnc_cmd("AT+CCLK?", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 983 if (pRespStr->size() > 0) {
fkellermavnet 0:affdbb35faa4 984 size_t pos1 = pRespStr->find("+CCLK:");
fkellermavnet 0:affdbb35faa4 985 if (pos1 != string::npos) {
fkellermavnet 0:affdbb35faa4 986 pEnd = (char *)pRespStr->c_str() + pos1 + 8;
fkellermavnet 0:affdbb35faa4 987 tod->year = strtol(pEnd, &pEnd, 10);
fkellermavnet 0:affdbb35faa4 988 tod->month = strtol(pEnd+1, &pEnd, 10);
fkellermavnet 0:affdbb35faa4 989 tod->day = strtol(pEnd+1, &pEnd, 10);
fkellermavnet 0:affdbb35faa4 990 tod->hour = strtol(pEnd+1, &pEnd, 10);
fkellermavnet 0:affdbb35faa4 991 tod->min = strtol(pEnd+1, &pEnd, 10);
fkellermavnet 0:affdbb35faa4 992 tod->sec = strtol(pEnd+1, &pEnd, 10);
fkellermavnet 0:affdbb35faa4 993 return (true);
fkellermavnet 0:affdbb35faa4 994 }
fkellermavnet 0:affdbb35faa4 995 }
fkellermavnet 0:affdbb35faa4 996 }
fkellermavnet 0:affdbb35faa4 997
fkellermavnet 0:affdbb35faa4 998 return (false);
fkellermavnet 0:affdbb35faa4 999 }
fkellermavnet 0:affdbb35faa4 1000
fkellermavnet 6:a656e820d7ff 1001 size_t WncController::readSMSText(const char n, const char ** msg)
fkellermavnet 0:affdbb35faa4 1002 {
fkellermavnet 6:a656e820d7ff 1003 size_t i;
fkellermavnet 0:affdbb35faa4 1004
fkellermavnet 6:a656e820d7ff 1005 i = at_readSMStext_wnc(n,msg);
fkellermavnet 6:a656e820d7ff 1006 if (i == 0)
fkellermavnet 0:affdbb35faa4 1007 dbgPuts("readSMSText: Failed!");
fkellermavnet 0:affdbb35faa4 1008
fkellermavnet 0:affdbb35faa4 1009 return (n);
fkellermavnet 0:affdbb35faa4 1010 }
fkellermavnet 0:affdbb35faa4 1011
fkellermavnet 0:affdbb35faa4 1012 bool WncController::at_get_wnc_net_stats(WncIpStats * s)
fkellermavnet 0:affdbb35faa4 1013 {
fkellermavnet 0:affdbb35faa4 1014 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1015 AtCmdErr_e cmdRes = at_send_wnc_cmd("AT+CGCONTRDP=1", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1016
fkellermavnet 0:affdbb35faa4 1017 if (WNC_AT_CMD_OK == cmdRes) {
fkellermavnet 0:affdbb35faa4 1018 if (pRespStr->size() > 0) {
fkellermavnet 0:affdbb35faa4 1019 memset((void*)s, '\0', sizeof(*s)); // Clean-up
fkellermavnet 0:affdbb35faa4 1020 string ss;
fkellermavnet 0:affdbb35faa4 1021 size_t pe;
fkellermavnet 0:affdbb35faa4 1022 size_t ps = pRespStr->rfind("\"");
fkellermavnet 0:affdbb35faa4 1023 if (ps != string::npos) {
fkellermavnet 0:affdbb35faa4 1024 ps += 2; // Skip the , after the "
fkellermavnet 0:affdbb35faa4 1025 pe = ps;
fkellermavnet 14:e846217affcd 1026
fkellermavnet 14:e846217affcd 1027 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1028 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1029 return (false);
fkellermavnet 14:e846217affcd 1030 else
fkellermavnet 14:e846217affcd 1031 pe += 1;
fkellermavnet 14:e846217affcd 1032 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1033 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1034 return (false);
fkellermavnet 14:e846217affcd 1035 else
fkellermavnet 14:e846217affcd 1036 pe += 1;
fkellermavnet 14:e846217affcd 1037 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1038 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1039 return (false);
fkellermavnet 14:e846217affcd 1040 else
fkellermavnet 14:e846217affcd 1041 pe += 1;
fkellermavnet 14:e846217affcd 1042 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1043 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1044 return (false);
fkellermavnet 14:e846217affcd 1045 else
fkellermavnet 14:e846217affcd 1046 pe += 1;
fkellermavnet 14:e846217affcd 1047
fkellermavnet 0:affdbb35faa4 1048 ss = pRespStr->substr(ps, pe - 1 - ps);
fkellermavnet 0:affdbb35faa4 1049 strncpy(s->ip, ss.c_str(), MAX_LEN_IP_STR);
fkellermavnet 0:affdbb35faa4 1050 s->ip[MAX_LEN_IP_STR - 1] = '\0';
fkellermavnet 0:affdbb35faa4 1051 ps = pe;
fkellermavnet 14:e846217affcd 1052
fkellermavnet 14:e846217affcd 1053 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1054 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1055 return (false);
fkellermavnet 14:e846217affcd 1056 else
fkellermavnet 14:e846217affcd 1057 pe += 1;
fkellermavnet 14:e846217affcd 1058 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1059 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1060 return (false);
fkellermavnet 14:e846217affcd 1061 else
fkellermavnet 14:e846217affcd 1062 pe += 1;
fkellermavnet 14:e846217affcd 1063 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1064 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1065 return (false);
fkellermavnet 14:e846217affcd 1066 else
fkellermavnet 14:e846217affcd 1067 pe += 1;
fkellermavnet 0:affdbb35faa4 1068 pe = pRespStr->find(",", pe);
fkellermavnet 14:e846217affcd 1069
fkellermavnet 0:affdbb35faa4 1070 ss = pRespStr->substr(ps, pe - ps);
fkellermavnet 0:affdbb35faa4 1071 strncpy(s->mask, ss.c_str(), MAX_LEN_IP_STR);
fkellermavnet 0:affdbb35faa4 1072 s->mask[MAX_LEN_IP_STR - 1] = '\0';
fkellermavnet 0:affdbb35faa4 1073 ps = pe + 1;
fkellermavnet 14:e846217affcd 1074
fkellermavnet 14:e846217affcd 1075 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1076 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1077 return (false);
fkellermavnet 14:e846217affcd 1078 else
fkellermavnet 14:e846217affcd 1079 pe += 1;
fkellermavnet 14:e846217affcd 1080 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1081 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1082 return (false);
fkellermavnet 14:e846217affcd 1083 else
fkellermavnet 14:e846217affcd 1084 pe += 1;
fkellermavnet 14:e846217affcd 1085 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1086 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1087 return (false);
fkellermavnet 14:e846217affcd 1088 else
fkellermavnet 14:e846217affcd 1089 pe += 1;
fkellermavnet 0:affdbb35faa4 1090 pe = pRespStr->find(",", pe);
fkellermavnet 14:e846217affcd 1091
fkellermavnet 0:affdbb35faa4 1092 ss = pRespStr->substr(ps, pe - ps);
fkellermavnet 0:affdbb35faa4 1093 strncpy(s->gateway, ss.c_str(), MAX_LEN_IP_STR);
fkellermavnet 0:affdbb35faa4 1094 s->gateway[MAX_LEN_IP_STR - 1] = '\0';
fkellermavnet 0:affdbb35faa4 1095 ps = pe + 1;
fkellermavnet 14:e846217affcd 1096
fkellermavnet 14:e846217affcd 1097 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1098 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1099 return (false);
fkellermavnet 14:e846217affcd 1100 else
fkellermavnet 14:e846217affcd 1101 pe += 1;
fkellermavnet 14:e846217affcd 1102 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1103 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1104 return (false);
fkellermavnet 14:e846217affcd 1105 else
fkellermavnet 14:e846217affcd 1106 pe += 1;
fkellermavnet 14:e846217affcd 1107 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1108 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1109 return (false);
fkellermavnet 14:e846217affcd 1110 else
fkellermavnet 14:e846217affcd 1111 pe += 1;
fkellermavnet 0:affdbb35faa4 1112 pe = pRespStr->find(",", pe);
fkellermavnet 14:e846217affcd 1113
fkellermavnet 14:e846217affcd 1114
fkellermavnet 0:affdbb35faa4 1115 ss = pRespStr->substr(ps, pe - ps);
fkellermavnet 0:affdbb35faa4 1116 strncpy(s->dnsPrimary, ss.c_str(), MAX_LEN_IP_STR);
fkellermavnet 0:affdbb35faa4 1117 s->dnsPrimary[MAX_LEN_IP_STR - 1] = '\0';
fkellermavnet 0:affdbb35faa4 1118 ps = pe + 1;
fkellermavnet 14:e846217affcd 1119
fkellermavnet 14:e846217affcd 1120 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1121 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1122 return (false);
fkellermavnet 14:e846217affcd 1123 else
fkellermavnet 14:e846217affcd 1124 pe += 1;
fkellermavnet 14:e846217affcd 1125 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1126 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1127 return (false);
fkellermavnet 14:e846217affcd 1128 else
fkellermavnet 14:e846217affcd 1129 pe += 1;
fkellermavnet 14:e846217affcd 1130 pe = pRespStr->find(".", pe);
fkellermavnet 14:e846217affcd 1131 if (pe == string::npos)
fkellermavnet 14:e846217affcd 1132 return (false);
fkellermavnet 14:e846217affcd 1133 else
fkellermavnet 14:e846217affcd 1134 pe += 1;
fkellermavnet 0:affdbb35faa4 1135 pe = pRespStr->find(",", pe);
fkellermavnet 14:e846217affcd 1136
fkellermavnet 14:e846217affcd 1137
fkellermavnet 0:affdbb35faa4 1138 ss = pRespStr->substr(ps, pe - ps);
fkellermavnet 0:affdbb35faa4 1139 strncpy(s->dnsSecondary, ss.c_str(), MAX_LEN_IP_STR);
fkellermavnet 0:affdbb35faa4 1140 s->dnsSecondary[MAX_LEN_IP_STR - 1] = '\0';
fkellermavnet 0:affdbb35faa4 1141
fkellermavnet 0:affdbb35faa4 1142 dbgPuts("~~~~~~~~~~ WNC IP Stats ~~~~~~~~~~~~");
fkellermavnet 0:affdbb35faa4 1143 dbgPuts("ip: ", false); dbgPutsNoTime(s->ip);
fkellermavnet 0:affdbb35faa4 1144 dbgPuts("mask: ", false); dbgPutsNoTime(s->mask);
fkellermavnet 0:affdbb35faa4 1145 dbgPuts("gateway: ", false); dbgPutsNoTime(s->gateway);
fkellermavnet 0:affdbb35faa4 1146 dbgPuts("dns pri: ", false); dbgPutsNoTime(s->dnsPrimary);
fkellermavnet 0:affdbb35faa4 1147 dbgPuts("dns sec: ", false); dbgPutsNoTime(s->dnsSecondary);
fkellermavnet 0:affdbb35faa4 1148 dbgPuts("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~");
fkellermavnet 0:affdbb35faa4 1149
fkellermavnet 0:affdbb35faa4 1150 return (true);
fkellermavnet 0:affdbb35faa4 1151 }
fkellermavnet 0:affdbb35faa4 1152 }
fkellermavnet 0:affdbb35faa4 1153 }
fkellermavnet 0:affdbb35faa4 1154
fkellermavnet 0:affdbb35faa4 1155 return (false);
fkellermavnet 0:affdbb35faa4 1156 }
fkellermavnet 0:affdbb35faa4 1157
fkellermavnet 0:affdbb35faa4 1158 bool WncController::deleteSMSTextFromMem(char msgIdx)
fkellermavnet 0:affdbb35faa4 1159 {
fkellermavnet 0:affdbb35faa4 1160 const char * err = "deleteSMSTextFromMem: Failed!";
fkellermavnet 0:affdbb35faa4 1161
fkellermavnet 0:affdbb35faa4 1162 switch (msgIdx)
fkellermavnet 0:affdbb35faa4 1163 {
fkellermavnet 0:affdbb35faa4 1164 case '*':
fkellermavnet 0:affdbb35faa4 1165 at_deleteSMSTextFromMem_wnc('1');
fkellermavnet 0:affdbb35faa4 1166 at_deleteSMSTextFromMem_wnc('2');
fkellermavnet 0:affdbb35faa4 1167 at_deleteSMSTextFromMem_wnc('3');
fkellermavnet 0:affdbb35faa4 1168 return (true); // WNC may error if slot empty, just ignore!
fkellermavnet 0:affdbb35faa4 1169
fkellermavnet 0:affdbb35faa4 1170 case '1':
fkellermavnet 0:affdbb35faa4 1171 case '2':
fkellermavnet 0:affdbb35faa4 1172 case '3':
fkellermavnet 0:affdbb35faa4 1173 if (true == at_deleteSMSTextFromMem_wnc(msgIdx))
fkellermavnet 0:affdbb35faa4 1174 return (true);
fkellermavnet 0:affdbb35faa4 1175 else {
fkellermavnet 0:affdbb35faa4 1176 dbgPuts(err);
fkellermavnet 0:affdbb35faa4 1177 return (false);
fkellermavnet 0:affdbb35faa4 1178 }
fkellermavnet 0:affdbb35faa4 1179
fkellermavnet 0:affdbb35faa4 1180 default:
fkellermavnet 0:affdbb35faa4 1181 dbgPuts(err);
fkellermavnet 0:affdbb35faa4 1182 return (false);
fkellermavnet 0:affdbb35faa4 1183 }
fkellermavnet 0:affdbb35faa4 1184 }
fkellermavnet 0:affdbb35faa4 1185
fkellermavnet 0:affdbb35faa4 1186 bool WncController::sendSMSTextFromMem(char msgIdx)
fkellermavnet 0:affdbb35faa4 1187 {
fkellermavnet 0:affdbb35faa4 1188 const char * err = "deleteSMSTextFromMem: Failed!";
fkellermavnet 0:affdbb35faa4 1189
fkellermavnet 0:affdbb35faa4 1190 switch (msgIdx)
fkellermavnet 0:affdbb35faa4 1191 {
fkellermavnet 0:affdbb35faa4 1192 case '*':
fkellermavnet 0:affdbb35faa4 1193 at_sendSMStextMem_wnc('1');
fkellermavnet 0:affdbb35faa4 1194 at_sendSMStextMem_wnc('2');
fkellermavnet 0:affdbb35faa4 1195 at_sendSMStextMem_wnc('3');
fkellermavnet 0:affdbb35faa4 1196 return (true); // WNC may error if slot is empty, just ignore!
fkellermavnet 0:affdbb35faa4 1197
fkellermavnet 0:affdbb35faa4 1198 case '1':
fkellermavnet 0:affdbb35faa4 1199 case '2':
fkellermavnet 0:affdbb35faa4 1200 case '3':
fkellermavnet 0:affdbb35faa4 1201 if (at_sendSMStextMem_wnc(msgIdx) == true)
fkellermavnet 0:affdbb35faa4 1202 return (true);
fkellermavnet 0:affdbb35faa4 1203 else {
fkellermavnet 0:affdbb35faa4 1204 dbgPuts(err);
fkellermavnet 0:affdbb35faa4 1205 return (false);
fkellermavnet 0:affdbb35faa4 1206 }
fkellermavnet 0:affdbb35faa4 1207
fkellermavnet 0:affdbb35faa4 1208 default:
fkellermavnet 0:affdbb35faa4 1209 dbgPuts(err);
fkellermavnet 0:affdbb35faa4 1210 return (false);
fkellermavnet 0:affdbb35faa4 1211 }
fkellermavnet 0:affdbb35faa4 1212 }
fkellermavnet 0:affdbb35faa4 1213
fkellermavnet 0:affdbb35faa4 1214 bool WncController::at_deleteSMSTextFromMem_wnc(char n)
fkellermavnet 0:affdbb35faa4 1215 {
fkellermavnet 0:affdbb35faa4 1216 string cmdStr, respStr;
fkellermavnet 0:affdbb35faa4 1217 // Message is stored in WNC, now send it!
fkellermavnet 0:affdbb35faa4 1218 cmdStr = "AT+CMGD=";
fkellermavnet 0:affdbb35faa4 1219 cmdStr += n;
fkellermavnet 0:affdbb35faa4 1220 cmdStr += "\r\n";
fkellermavnet 0:affdbb35faa4 1221 dbgPuts("TX: ", false); dbgPutsNoTime(cmdStr.c_str(), false);
fkellermavnet 0:affdbb35faa4 1222 AtCmdErr_e r = mdmSendAtCmdRsp(cmdStr.c_str(), m_sCmdTimeoutMs, &respStr);
fkellermavnet 0:affdbb35faa4 1223 dbgPuts("RX: ", false); dbgPutsNoTime(respStr.c_str());
fkellermavnet 0:affdbb35faa4 1224 return (r == WNC_AT_CMD_OK);
fkellermavnet 0:affdbb35faa4 1225 }
fkellermavnet 0:affdbb35faa4 1226
fkellermavnet 0:affdbb35faa4 1227 bool WncController::at_sendSMStextMem_wnc(char n)
fkellermavnet 0:affdbb35faa4 1228 {
fkellermavnet 0:affdbb35faa4 1229 string cmdStr, respStr;
fkellermavnet 0:affdbb35faa4 1230 // Message is stored in WNC, now send it!
fkellermavnet 0:affdbb35faa4 1231 cmdStr = "AT+CMSS=";
fkellermavnet 0:affdbb35faa4 1232 cmdStr += n;
fkellermavnet 0:affdbb35faa4 1233 cmdStr += "\r\n";
fkellermavnet 0:affdbb35faa4 1234 dbgPuts("TX: ", false); dbgPutsNoTime(cmdStr.c_str(), false);
fkellermavnet 0:affdbb35faa4 1235 AtCmdErr_e r = mdmSendAtCmdRsp(cmdStr.c_str(), m_sCmdTimeoutMs, &respStr);
fkellermavnet 0:affdbb35faa4 1236 dbgPuts("RX: ", false); dbgPutsNoTime(respStr.c_str());
fkellermavnet 0:affdbb35faa4 1237 return (r == WNC_AT_CMD_OK);
fkellermavnet 0:affdbb35faa4 1238 }
fkellermavnet 0:affdbb35faa4 1239
fkellermavnet 0:affdbb35faa4 1240 bool WncController::at_sendSMStext_wnc(const char * const phoneNum, const char * const text)
fkellermavnet 0:affdbb35faa4 1241 {
fkellermavnet 0:affdbb35faa4 1242 string respStr;
fkellermavnet 0:affdbb35faa4 1243 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1244 size_t l = strlen(text);
fkellermavnet 0:affdbb35faa4 1245
fkellermavnet 0:affdbb35faa4 1246 if (l <= MAX_WNC_SMS_LENGTH)
fkellermavnet 0:affdbb35faa4 1247 {
fkellermavnet 0:affdbb35faa4 1248 // Check to see if the SMS service is available
fkellermavnet 0:affdbb35faa4 1249 checkCellLink();
fkellermavnet 0:affdbb35faa4 1250 if (m_sReadyForSMS == true) {
fkellermavnet 0:affdbb35faa4 1251 at_send_wnc_cmd("AT+CMGF=1", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1252 string cmdStr("AT+CMGS=\"");
fkellermavnet 0:affdbb35faa4 1253 cmdStr += phoneNum;
fkellermavnet 0:affdbb35faa4 1254 cmdStr += "\"";
fkellermavnet 0:affdbb35faa4 1255 dbgPuts("TX: ", false); dbgPutsNoTime(cmdStr.c_str());
fkellermavnet 0:affdbb35faa4 1256 cmdStr += "\x0d"; // x0d = <ENTER>
fkellermavnet 0:affdbb35faa4 1257 // Send raw command with short timeout (the timeout will fail cause the WNC is not supposed to reply yet!
fkellermavnet 0:affdbb35faa4 1258 // And we want a delay before sending the actual text part of the string!
fkellermavnet 0:affdbb35faa4 1259 mdmSendAtCmdRsp(cmdStr.c_str(), 300, &respStr, false); // False turns off auto-addition of CR+LF (the WNC wants nothing here)
fkellermavnet 0:affdbb35faa4 1260 dbgPuts("RX: ", false); dbgPutsNoTime(respStr.c_str());
fkellermavnet 0:affdbb35faa4 1261 if ((respStr.size() > 0) && (respStr.find("ERROR") == string::npos)) {
fkellermavnet 0:affdbb35faa4 1262 // Part 2 of the text, this is the actual text part:
fkellermavnet 0:affdbb35faa4 1263 cmdStr = text;
fkellermavnet 11:3ff6c1cb5b03 1264 dbgPuts("TX: ", false); dbgPutsNoTime(cmdStr.c_str());
fkellermavnet 0:affdbb35faa4 1265 cmdStr += "\x1A"; // <CTRL>-Z is what tells the WNC the message is complete to send!
fkellermavnet 0:affdbb35faa4 1266 AtCmdErr_e r = mdmSendAtCmdRsp(cmdStr.c_str(), 10000, &respStr);
fkellermavnet 11:3ff6c1cb5b03 1267 dbgPuts("RX: ", false); dbgPutsNoTime(respStr.c_str());
fkellermavnet 0:affdbb35faa4 1268 if (respStr.size() == 0)
fkellermavnet 0:affdbb35faa4 1269 return (false);
fkellermavnet 0:affdbb35faa4 1270 else
fkellermavnet 0:affdbb35faa4 1271 return (r == WNC_AT_CMD_OK);
fkellermavnet 0:affdbb35faa4 1272 }
fkellermavnet 0:affdbb35faa4 1273 }
fkellermavnet 0:affdbb35faa4 1274 }
fkellermavnet 0:affdbb35faa4 1275
fkellermavnet 0:affdbb35faa4 1276 return (false);
fkellermavnet 0:affdbb35faa4 1277 }
fkellermavnet 0:affdbb35faa4 1278
fkellermavnet 0:affdbb35faa4 1279 bool WncController::saveSMSText(const char * const phoneNum, const char * const text, char * msgIdx)
fkellermavnet 0:affdbb35faa4 1280 {
fkellermavnet 0:affdbb35faa4 1281 if (at_saveSMStext_wnc(phoneNum, text, msgIdx) == true)
fkellermavnet 0:affdbb35faa4 1282 return (true);
fkellermavnet 0:affdbb35faa4 1283 else {
fkellermavnet 0:affdbb35faa4 1284 dbgPuts("saveSMSTextToMem: failed!\r\n");
fkellermavnet 0:affdbb35faa4 1285 return (false);
fkellermavnet 0:affdbb35faa4 1286 }
fkellermavnet 0:affdbb35faa4 1287 }
fkellermavnet 0:affdbb35faa4 1288
fkellermavnet 0:affdbb35faa4 1289 bool WncController::at_saveSMStext_wnc(const char * const phoneNum, const char * const text, char * msgIdx)
fkellermavnet 0:affdbb35faa4 1290 {
fkellermavnet 0:affdbb35faa4 1291 string respStr;
fkellermavnet 0:affdbb35faa4 1292 size_t l = strlen(text);
fkellermavnet 0:affdbb35faa4 1293
fkellermavnet 0:affdbb35faa4 1294 if (l <= MAX_WNC_SMS_LENGTH)
fkellermavnet 0:affdbb35faa4 1295 {
fkellermavnet 0:affdbb35faa4 1296 // Check to see if the SMS service is available
fkellermavnet 0:affdbb35faa4 1297 checkCellLink();
fkellermavnet 0:affdbb35faa4 1298 if (m_sReadyForSMS == true) {
fkellermavnet 0:affdbb35faa4 1299 string cmdStr("AT+CMGW=\"");
fkellermavnet 0:affdbb35faa4 1300 cmdStr += phoneNum;
fkellermavnet 0:affdbb35faa4 1301 cmdStr += "\"";
fkellermavnet 0:affdbb35faa4 1302 dbgPuts("TX: ", false); dbgPutsNoTime(cmdStr.c_str());
fkellermavnet 0:affdbb35faa4 1303 cmdStr += "\x0d"; // x0d = <ENTER>
fkellermavnet 0:affdbb35faa4 1304 // Send raw command with short timeout (the timeout will fail cause the WNC is not supposed to reply yet!
fkellermavnet 0:affdbb35faa4 1305 // And we want a delay before sending the actual text part of the string!
fkellermavnet 0:affdbb35faa4 1306 mdmSendAtCmdRsp(cmdStr.c_str(), 300, &respStr, false); // False turns off auto-addition of CR+LF (the WNC wants nothing here)
fkellermavnet 0:affdbb35faa4 1307 dbgPuts("RX: ", false); dbgPutsNoTime(respStr.c_str());
fkellermavnet 0:affdbb35faa4 1308 if ((respStr.size() > 0) && (respStr.find("ERROR") == string::npos)) {
fkellermavnet 0:affdbb35faa4 1309 // Part 2 of the text, this is the actual text part:
fkellermavnet 0:affdbb35faa4 1310 cmdStr = text;
fkellermavnet 0:affdbb35faa4 1311 dbgPuts("TX: ", false); dbgPutsNoTime(cmdStr.c_str());
fkellermavnet 0:affdbb35faa4 1312 cmdStr += "\x1A"; // <CTRL>-Z is what tells the WNC the message is complete to save!
fkellermavnet 0:affdbb35faa4 1313 AtCmdErr_e r = mdmSendAtCmdRsp(cmdStr.c_str(), 10000, &respStr);
fkellermavnet 0:affdbb35faa4 1314 dbgPuts("RX: ", false); dbgPutsNoTime(respStr.c_str());
fkellermavnet 0:affdbb35faa4 1315 if (respStr.size() > 0) {
fkellermavnet 0:affdbb35faa4 1316 // respStr will have the SMS index
fkellermavnet 0:affdbb35faa4 1317 size_t pos1 = respStr.find("+CMGW: ");
fkellermavnet 0:affdbb35faa4 1318 size_t pos2 = respStr.rfind("OK");
fkellermavnet 0:affdbb35faa4 1319 if (pos1 != string::npos && pos2 != string::npos) {
fkellermavnet 0:affdbb35faa4 1320 *msgIdx = *string(respStr.substr(pos1+7, 1)).c_str();
fkellermavnet 0:affdbb35faa4 1321 return (true);
fkellermavnet 0:affdbb35faa4 1322 }
fkellermavnet 0:affdbb35faa4 1323 else {
fkellermavnet 0:affdbb35faa4 1324 *msgIdx = '!';
fkellermavnet 0:affdbb35faa4 1325 }
fkellermavnet 0:affdbb35faa4 1326 }
fkellermavnet 0:affdbb35faa4 1327 }
fkellermavnet 0:affdbb35faa4 1328 }
fkellermavnet 0:affdbb35faa4 1329 }
fkellermavnet 0:affdbb35faa4 1330
fkellermavnet 0:affdbb35faa4 1331 return (false);
fkellermavnet 0:affdbb35faa4 1332 }
fkellermavnet 0:affdbb35faa4 1333
fkellermavnet 0:affdbb35faa4 1334
fkellermavnet 0:affdbb35faa4 1335 size_t WncController::at_readSMSlog_wnc(const char ** log)
fkellermavnet 0:affdbb35faa4 1336 {
fkellermavnet 0:affdbb35faa4 1337 string * pRespStr;
fkellermavnet 6:a656e820d7ff 1338 static string smsLogStr;
fkellermavnet 6:a656e820d7ff 1339
fkellermavnet 6:a656e820d7ff 1340 smsLogStr.erase();
fkellermavnet 0:affdbb35faa4 1341
fkellermavnet 0:affdbb35faa4 1342 if (at_send_wnc_cmd("AT+CMGL", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK)
fkellermavnet 6:a656e820d7ff 1343 smsLogStr = *pRespStr;
fkellermavnet 0:affdbb35faa4 1344
fkellermavnet 6:a656e820d7ff 1345 *log = smsLogStr.c_str();
fkellermavnet 6:a656e820d7ff 1346
fkellermavnet 0:affdbb35faa4 1347 return (pRespStr->size());
fkellermavnet 0:affdbb35faa4 1348 }
fkellermavnet 0:affdbb35faa4 1349
fkellermavnet 6:a656e820d7ff 1350 size_t WncController::at_readSMStext_wnc(const char n, const char ** log)
fkellermavnet 0:affdbb35faa4 1351 {
fkellermavnet 6:a656e820d7ff 1352 static string smsReadTxtStr;
fkellermavnet 0:affdbb35faa4 1353 string * pRespStr;
fkellermavnet 6:a656e820d7ff 1354 string cmdStr;
fkellermavnet 6:a656e820d7ff 1355
fkellermavnet 6:a656e820d7ff 1356 smsReadTxtStr.erase();
fkellermavnet 6:a656e820d7ff 1357 cmdStr = "AT+CMGR";
fkellermavnet 6:a656e820d7ff 1358 cmdStr += '1';
fkellermavnet 0:affdbb35faa4 1359 if (at_send_wnc_cmd("AT+CMGR", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK)
fkellermavnet 0:affdbb35faa4 1360 *log = pRespStr->c_str();
fkellermavnet 0:affdbb35faa4 1361 else
fkellermavnet 0:affdbb35faa4 1362 *log = "\0";
fkellermavnet 0:affdbb35faa4 1363
fkellermavnet 0:affdbb35faa4 1364 return (pRespStr->size());
fkellermavnet 0:affdbb35faa4 1365 }
fkellermavnet 0:affdbb35faa4 1366
fkellermavnet 0:affdbb35faa4 1367 bool WncController::at_at_wnc(void)
fkellermavnet 0:affdbb35faa4 1368 {
fkellermavnet 0:affdbb35faa4 1369 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1370 return (WNC_AT_CMD_OK == at_send_wnc_cmd("AT", &pRespStr, WNC_QUICK_CMD_TIMEOUT_MS)); // Heartbeat?
fkellermavnet 0:affdbb35faa4 1371 }
fkellermavnet 0:affdbb35faa4 1372
fkellermavnet 0:affdbb35faa4 1373 bool WncController::at_init_wnc(bool hardReset)
fkellermavnet 0:affdbb35faa4 1374 {
fkellermavnet 0:affdbb35faa4 1375 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1376 AtCmdErr_e cmdRes;
fkellermavnet 0:affdbb35faa4 1377
fkellermavnet 0:affdbb35faa4 1378 if (hardReset == true)
fkellermavnet 0:affdbb35faa4 1379 dbgPuts("Hard Soft Reset!");
fkellermavnet 0:affdbb35faa4 1380
fkellermavnet 0:affdbb35faa4 1381 dbgPuts("Start AT init of WNC:");
fkellermavnet 0:affdbb35faa4 1382
fkellermavnet 0:affdbb35faa4 1383 // Kick it twice to perhaps remove cued responses from an incomplete
fkellermavnet 0:affdbb35faa4 1384 // power cycle.
fkellermavnet 0:affdbb35faa4 1385 at_send_wnc_cmd("AT", &pRespStr, WNC_QUICK_CMD_TIMEOUT_MS);
fkellermavnet 0:affdbb35faa4 1386 at_send_wnc_cmd("AT", &pRespStr, WNC_QUICK_CMD_TIMEOUT_MS);
fkellermavnet 0:affdbb35faa4 1387
fkellermavnet 0:affdbb35faa4 1388 // Quick commands below do not need to check cellular connectivity
fkellermavnet 0:affdbb35faa4 1389 at_send_wnc_cmd("ATE0", &pRespStr, WNC_QUICK_CMD_TIMEOUT_MS); // Echo Off
fkellermavnet 0:affdbb35faa4 1390 at_send_wnc_cmd("AT+CMEE=2", &pRespStr, m_sCmdTimeoutMs); // 2 - verbose error, 1 - numeric error, 0 - just ERROR
fkellermavnet 6:a656e820d7ff 1391
fkellermavnet 6:a656e820d7ff 1392 // Setup 3 memory slots in the WNC SIM for SMS usage.
fkellermavnet 6:a656e820d7ff 1393 at_send_wnc_cmd("AT+CMGF=1", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 6:a656e820d7ff 1394 at_send_wnc_cmd("AT+CPMS=\"SM\",\"SM\",\"SM\"", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 6:a656e820d7ff 1395
fkellermavnet 0:affdbb35faa4 1396 cmdRes = at_send_wnc_cmd("AT", &pRespStr, WNC_QUICK_CMD_TIMEOUT_MS); // Heartbeat?
fkellermavnet 0:affdbb35faa4 1397
fkellermavnet 0:affdbb35faa4 1398 // If the simple commands are not working, no chance of more complex.
fkellermavnet 0:affdbb35faa4 1399 // I have seen re-trying commands make it worse.
fkellermavnet 0:affdbb35faa4 1400 if (cmdRes != WNC_AT_CMD_OK)
fkellermavnet 0:affdbb35faa4 1401 return (false);
fkellermavnet 0:affdbb35faa4 1402
fkellermavnet 0:affdbb35faa4 1403 cmdRes = at_send_wnc_cmd("AT@INTERNET=1", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1404 if (cmdRes != WNC_AT_CMD_OK)
fkellermavnet 0:affdbb35faa4 1405 return (false);
fkellermavnet 0:affdbb35faa4 1406
fkellermavnet 0:affdbb35faa4 1407 cmdRes = at_send_wnc_cmd("AT@SOCKDIAL=1", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1408 if (cmdRes != WNC_AT_CMD_OK)
fkellermavnet 0:affdbb35faa4 1409 return (false);
fkellermavnet 0:affdbb35faa4 1410
fkellermavnet 0:affdbb35faa4 1411 dbgPuts("SUCCESS: AT init of WNC!");
fkellermavnet 0:affdbb35faa4 1412
fkellermavnet 0:affdbb35faa4 1413 return (true);
fkellermavnet 0:affdbb35faa4 1414 }
fkellermavnet 0:affdbb35faa4 1415
fkellermavnet 0:affdbb35faa4 1416
fkellermavnet 10:2ec59906a24e 1417 int16_t WncController::at_sockopen_wnc(const char * const ip, uint16_t port, uint16_t numSock, bool tcp, uint16_t timeOutSec)
fkellermavnet 0:affdbb35faa4 1418 {
fkellermavnet 0:affdbb35faa4 1419 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1420 string cmd_str("AT@SOCKCREAT=");
fkellermavnet 0:affdbb35faa4 1421 AtCmdErr_e res;
fkellermavnet 0:affdbb35faa4 1422
fkellermavnet 0:affdbb35faa4 1423 if (tcp) cmd_str += "1"; // TCP
fkellermavnet 0:affdbb35faa4 1424 else cmd_str += "2"; // else UDP
fkellermavnet 0:affdbb35faa4 1425
fkellermavnet 0:affdbb35faa4 1426 cmd_str += ",0";
fkellermavnet 0:affdbb35faa4 1427 res = sendWncCmd(cmd_str.c_str(), &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 14:e846217affcd 1428 if (res == WNC_AT_CMD_OK && pRespStr->size() > 0)
fkellermavnet 0:affdbb35faa4 1429 {
fkellermavnet 10:2ec59906a24e 1430 size_t pos1 = pRespStr->find("T:");
fkellermavnet 10:2ec59906a24e 1431 size_t pos2 = pRespStr->rfind("OK");
fkellermavnet 10:2ec59906a24e 1432 if ((pos1 != string::npos) && (pos2 != string::npos)) {
fkellermavnet 10:2ec59906a24e 1433 size_t numLen = pos2 - (pos1 + 2);
fkellermavnet 10:2ec59906a24e 1434 string sockStr = pRespStr->substr(pos1 + 2, numLen);
fkellermavnet 10:2ec59906a24e 1435 cmd_str = "AT@SOCKCONN=";
fkellermavnet 10:2ec59906a24e 1436 cmd_str += sockStr;
fkellermavnet 10:2ec59906a24e 1437 cmd_str += ",\"";
fkellermavnet 10:2ec59906a24e 1438 cmd_str += ip;
fkellermavnet 10:2ec59906a24e 1439 cmd_str += "\",";
fkellermavnet 10:2ec59906a24e 1440 cmd_str += _to_string(port);
fkellermavnet 10:2ec59906a24e 1441 cmd_str += ",";
fkellermavnet 10:2ec59906a24e 1442 if (timeOutSec < 30)
fkellermavnet 10:2ec59906a24e 1443 timeOutSec = 30;
fkellermavnet 10:2ec59906a24e 1444 else if (timeOutSec > 360)
fkellermavnet 10:2ec59906a24e 1445 timeOutSec = 360;
fkellermavnet 10:2ec59906a24e 1446 cmd_str += _to_string(timeOutSec);
fkellermavnet 10:2ec59906a24e 1447 res = sendWncCmd(cmd_str.c_str(), &pRespStr, 1000 * timeOutSec + 1000);
fkellermavnet 10:2ec59906a24e 1448 if (m_sMoreDebugEnabled) {
fkellermavnet 10:2ec59906a24e 1449 at_send_wnc_cmd("AT@SOCKCREAT?", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 10:2ec59906a24e 1450 at_send_wnc_cmd("AT@SOCKCONN?", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 10:2ec59906a24e 1451 }
fkellermavnet 10:2ec59906a24e 1452 return (strtol(sockStr.c_str(), NULL, 10));
fkellermavnet 0:affdbb35faa4 1453 }
fkellermavnet 10:2ec59906a24e 1454 else {
fkellermavnet 10:2ec59906a24e 1455 dbgPuts("Invalid sockcreat response!");
fkellermavnet 10:2ec59906a24e 1456 return (0);
fkellermavnet 10:2ec59906a24e 1457 }
fkellermavnet 0:affdbb35faa4 1458 }
fkellermavnet 0:affdbb35faa4 1459 else
fkellermavnet 10:2ec59906a24e 1460 return (0);
fkellermavnet 0:affdbb35faa4 1461 }
fkellermavnet 0:affdbb35faa4 1462
fkellermavnet 0:affdbb35faa4 1463 bool WncController::at_sockclose_wnc(uint16_t numSock)
fkellermavnet 0:affdbb35faa4 1464 {
fkellermavnet 0:affdbb35faa4 1465 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1466 string cmd_str("AT@SOCKCLOSE=");
fkellermavnet 0:affdbb35faa4 1467
fkellermavnet 10:2ec59906a24e 1468 cmd_str += _to_string(numSock);
fkellermavnet 0:affdbb35faa4 1469 // Don't check the cell status to close the socket
fkellermavnet 0:affdbb35faa4 1470 return (WNC_AT_CMD_OK == at_send_wnc_cmd(cmd_str.c_str(), &pRespStr, m_sCmdTimeoutMs));
fkellermavnet 0:affdbb35faa4 1471 }
fkellermavnet 0:affdbb35faa4 1472
fkellermavnet 0:affdbb35faa4 1473 bool WncController::at_dnsresolve_wnc(const char * s, string * ipStr)
fkellermavnet 0:affdbb35faa4 1474 {
fkellermavnet 0:affdbb35faa4 1475 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1476 string str(s);
fkellermavnet 14:e846217affcd 1477 AtCmdErr_e r;
fkellermavnet 0:affdbb35faa4 1478
fkellermavnet 0:affdbb35faa4 1479 ipStr->erase(); // Clear out string until resolved!
fkellermavnet 0:affdbb35faa4 1480 str = "AT@DNSRESVDON=\"" + str;
fkellermavnet 0:affdbb35faa4 1481 str += "\"";
fkellermavnet 14:e846217affcd 1482 r = sendWncCmd(str.c_str(), &pRespStr, WNC_DNS_RESOLVE_WAIT_MS);
fkellermavnet 14:e846217affcd 1483 if (r == WNC_AT_CMD_OK && pRespStr->size() > 0) {
fkellermavnet 0:affdbb35faa4 1484 size_t pos_start = pRespStr->find(":\"") + 2;
fkellermavnet 0:affdbb35faa4 1485 if (pos_start != string::npos) {
fkellermavnet 0:affdbb35faa4 1486 size_t pos_end = pRespStr->find("\"", pos_start) - 1;
fkellermavnet 0:affdbb35faa4 1487 if (pos_end != string::npos) {
fkellermavnet 0:affdbb35faa4 1488 if (pos_end > pos_start) {
fkellermavnet 0:affdbb35faa4 1489 // Make a copy for use later (the source string is re-used)
fkellermavnet 0:affdbb35faa4 1490 *ipStr = pRespStr->substr(pos_start, pos_end - pos_start + 1);
fkellermavnet 0:affdbb35faa4 1491 return (true);
fkellermavnet 0:affdbb35faa4 1492 }
fkellermavnet 0:affdbb35faa4 1493 }
fkellermavnet 0:affdbb35faa4 1494 }
fkellermavnet 0:affdbb35faa4 1495 }
fkellermavnet 0:affdbb35faa4 1496
fkellermavnet 0:affdbb35faa4 1497 *ipStr = INVALID_IP_STR;
fkellermavnet 0:affdbb35faa4 1498
fkellermavnet 0:affdbb35faa4 1499 return (false);
fkellermavnet 0:affdbb35faa4 1500 }
fkellermavnet 0:affdbb35faa4 1501
fkellermavnet 0:affdbb35faa4 1502 bool WncController::waitForPowerOnModemToRespond(uint8_t timeoutSecs)
fkellermavnet 0:affdbb35faa4 1503 {
fkellermavnet 0:affdbb35faa4 1504 // Now, give the modem x seconds to start responding by
fkellermavnet 0:affdbb35faa4 1505 // sending simple 'AT' commands to modem once per second.
fkellermavnet 0:affdbb35faa4 1506 if (timeoutSecs > 0) {
fkellermavnet 0:affdbb35faa4 1507 do {
fkellermavnet 0:affdbb35faa4 1508 timeoutSecs--;
fkellermavnet 1:ac2de545b981 1509 dbgPutsNoTime("\rWaiting ", false); dbgPutsNoTime(_to_string(timeoutSecs), false);
fkellermavnet 1:ac2de545b981 1510 dbgPutsNoTime(" ", false);
fkellermavnet 0:affdbb35faa4 1511 AtCmdErr_e rc = mdmSendAtCmdRsp("AT", 500, &m_sWncStr);
fkellermavnet 0:affdbb35faa4 1512 if (rc == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 1513 dbgPutsNoTime(""); // CR LF
fkellermavnet 0:affdbb35faa4 1514 return true; //timer.read();
fkellermavnet 0:affdbb35faa4 1515 }
fkellermavnet 0:affdbb35faa4 1516 waitMs(500);
fkellermavnet 0:affdbb35faa4 1517 }
fkellermavnet 0:affdbb35faa4 1518 while (timeoutSecs > 0);
fkellermavnet 1:ac2de545b981 1519 dbgPutsNoTime(""); // CR LF
fkellermavnet 0:affdbb35faa4 1520 }
fkellermavnet 0:affdbb35faa4 1521
fkellermavnet 0:affdbb35faa4 1522 return (false);
fkellermavnet 0:affdbb35faa4 1523 }
fkellermavnet 0:affdbb35faa4 1524
fkellermavnet 13:73629a6e9122 1525 WncController::AtCmdErr_e WncController::at_sockwrite_wnc(const char * s, uint16_t n, uint16_t numSock, bool isTcp)
fkellermavnet 0:affdbb35faa4 1526 {
fkellermavnet 0:affdbb35faa4 1527 AtCmdErr_e result;
fkellermavnet 0:affdbb35faa4 1528
fkellermavnet 0:affdbb35faa4 1529 if ((n > 0) && (n <= MAX_WNC_WRITE_BYTES)) {
fkellermavnet 0:affdbb35faa4 1530 string * pRespStr;
fkellermavnet 1:ac2de545b981 1531 const char * num2str;
fkellermavnet 0:affdbb35faa4 1532 string cmd_str;
fkellermavnet 0:affdbb35faa4 1533
fkellermavnet 0:affdbb35faa4 1534 if (isTcp == true)
fkellermavnet 0:affdbb35faa4 1535 cmd_str="AT@SOCKWRITE=";
fkellermavnet 0:affdbb35faa4 1536 else
fkellermavnet 0:affdbb35faa4 1537 cmd_str="AT@SOCKWRITE="; // "AT@SOCKSEND=";
fkellermavnet 0:affdbb35faa4 1538
fkellermavnet 10:2ec59906a24e 1539 cmd_str += _to_string(numSock);
fkellermavnet 0:affdbb35faa4 1540 cmd_str += ",";
fkellermavnet 1:ac2de545b981 1541 cmd_str += _to_string(n);
fkellermavnet 0:affdbb35faa4 1542 cmd_str += ",\"";
fkellermavnet 6:a656e820d7ff 1543 while(n > 0) {
fkellermavnet 6:a656e820d7ff 1544 n--;
fkellermavnet 1:ac2de545b981 1545 num2str = _to_hex_string((uint8_t)*s++);
fkellermavnet 0:affdbb35faa4 1546 // Always 2-digit ascii hex:
fkellermavnet 13:73629a6e9122 1547 if (num2str[1] == '\0')
fkellermavnet 1:ac2de545b981 1548 cmd_str += '0';
fkellermavnet 0:affdbb35faa4 1549 cmd_str += num2str;
fkellermavnet 0:affdbb35faa4 1550 }
fkellermavnet 0:affdbb35faa4 1551 cmd_str += "\"";
fkellermavnet 0:affdbb35faa4 1552 result = sendWncCmd(cmd_str.c_str(), &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1553 }
fkellermavnet 0:affdbb35faa4 1554 else {
fkellermavnet 0:affdbb35faa4 1555 dbgPuts("sockwrite Err, string len bad!");
fkellermavnet 0:affdbb35faa4 1556 result = WNC_AT_CMD_ERR;
fkellermavnet 0:affdbb35faa4 1557 }
fkellermavnet 0:affdbb35faa4 1558
fkellermavnet 0:affdbb35faa4 1559 return (result);
fkellermavnet 0:affdbb35faa4 1560 }
fkellermavnet 0:affdbb35faa4 1561
fkellermavnet 4:c5720f4d13ff 1562 WncController::AtCmdErr_e WncController::at_sockread_wnc(string * pS, uint16_t numSock, bool isTcp)
fkellermavnet 4:c5720f4d13ff 1563 {
fkellermavnet 4:c5720f4d13ff 1564 AtCmdErr_e result = WNC_AT_CMD_OK;
fkellermavnet 4:c5720f4d13ff 1565
fkellermavnet 4:c5720f4d13ff 1566 string * pRespStr;
fkellermavnet 4:c5720f4d13ff 1567 string cmd_str;
fkellermavnet 4:c5720f4d13ff 1568 size_t pos_start, pos_end;
fkellermavnet 4:c5720f4d13ff 1569 int i;
fkellermavnet 5:20207cc5502e 1570
fkellermavnet 5:20207cc5502e 1571 pS->erase(); // Start with a fresh string
fkellermavnet 4:c5720f4d13ff 1572
fkellermavnet 4:c5720f4d13ff 1573 if (isTcp == true)
fkellermavnet 4:c5720f4d13ff 1574 cmd_str="AT@SOCKREAD=";
fkellermavnet 4:c5720f4d13ff 1575 else
fkellermavnet 4:c5720f4d13ff 1576 cmd_str="AT@SOCKREAD="; // "AT@SOCKRECV=";
fkellermavnet 4:c5720f4d13ff 1577
fkellermavnet 10:2ec59906a24e 1578 cmd_str += _to_string(numSock);
fkellermavnet 4:c5720f4d13ff 1579 cmd_str += ",";
fkellermavnet 4:c5720f4d13ff 1580 cmd_str += _to_string(MAX_WNC_READ_BYTES);
fkellermavnet 4:c5720f4d13ff 1581
fkellermavnet 4:c5720f4d13ff 1582 // Experimental: read should not need to check cell net status
fkellermavnet 4:c5720f4d13ff 1583 result = at_send_wnc_cmd(cmd_str.c_str(), &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 4:c5720f4d13ff 1584 if (result == WNC_AT_CMD_OK) {
fkellermavnet 14:e846217affcd 1585 if (pRespStr->size() > 0) {
fkellermavnet 14:e846217affcd 1586 pos_start = pRespStr->find("\"");
fkellermavnet 14:e846217affcd 1587 pos_end = pRespStr->rfind("\"");
fkellermavnet 14:e846217affcd 1588 // Make sure search finds what it's looking for!
fkellermavnet 14:e846217affcd 1589 if (pos_start != string::npos && pos_end != string::npos) {
fkellermavnet 14:e846217affcd 1590 pos_start++;
fkellermavnet 14:e846217affcd 1591 i = pos_end - pos_start; // Num hex chars, 2 per byte
fkellermavnet 14:e846217affcd 1592 }
fkellermavnet 14:e846217affcd 1593 else
fkellermavnet 14:e846217affcd 1594 i = 0;
fkellermavnet 12:33290e9e6e5f 1595 }
fkellermavnet 4:c5720f4d13ff 1596 else
fkellermavnet 4:c5720f4d13ff 1597 i = 0;
fkellermavnet 4:c5720f4d13ff 1598
fkellermavnet 12:33290e9e6e5f 1599 if ((i < 0) || ((i % 2) == 1))
fkellermavnet 4:c5720f4d13ff 1600 dbgPuts("Invalid READ string!");
fkellermavnet 12:33290e9e6e5f 1601
fkellermavnet 12:33290e9e6e5f 1602 if (i > 2*MAX_WNC_READ_BYTES) {
fkellermavnet 4:c5720f4d13ff 1603 i = 2*MAX_WNC_READ_BYTES;
fkellermavnet 12:33290e9e6e5f 1604 dbgPuts("DANGER WNC read data does not match length!");
fkellermavnet 4:c5720f4d13ff 1605 }
fkellermavnet 4:c5720f4d13ff 1606
fkellermavnet 4:c5720f4d13ff 1607 // If data, convert the hex string into byte values
fkellermavnet 12:33290e9e6e5f 1608 while (i > 0) {
fkellermavnet 12:33290e9e6e5f 1609 i -= 2;
fkellermavnet 12:33290e9e6e5f 1610 *pS += (uint8_t)strtol(pRespStr->substr(pos_start, 2).c_str(), NULL, 16);
fkellermavnet 12:33290e9e6e5f 1611 pos_start += 2;
fkellermavnet 4:c5720f4d13ff 1612 }
fkellermavnet 4:c5720f4d13ff 1613 }
fkellermavnet 4:c5720f4d13ff 1614
fkellermavnet 4:c5720f4d13ff 1615 return (result);
fkellermavnet 4:c5720f4d13ff 1616 }
fkellermavnet 4:c5720f4d13ff 1617
fkellermavnet 12:33290e9e6e5f 1618 WncController::AtCmdErr_e WncController::at_sockread_wnc(uint8_t * pS, uint16_t * numRead, uint16_t n, uint16_t numSock, bool isTcp)
fkellermavnet 0:affdbb35faa4 1619 {
fkellermavnet 0:affdbb35faa4 1620 AtCmdErr_e result = WNC_AT_CMD_OK;
fkellermavnet 0:affdbb35faa4 1621 *numRead = 0;
fkellermavnet 0:affdbb35faa4 1622
fkellermavnet 0:affdbb35faa4 1623 if ((n > 0) && (n <= MAX_WNC_READ_BYTES)) {
fkellermavnet 0:affdbb35faa4 1624 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1625 string cmd_str;
fkellermavnet 0:affdbb35faa4 1626 size_t pos_start, pos_end;
fkellermavnet 0:affdbb35faa4 1627 int i;
fkellermavnet 0:affdbb35faa4 1628
fkellermavnet 0:affdbb35faa4 1629 if (isTcp == true)
fkellermavnet 0:affdbb35faa4 1630 cmd_str="AT@SOCKREAD=";
fkellermavnet 0:affdbb35faa4 1631 else
fkellermavnet 0:affdbb35faa4 1632 cmd_str="AT@SOCKREAD="; // "AT@SOCKRECV=";
fkellermavnet 0:affdbb35faa4 1633
fkellermavnet 10:2ec59906a24e 1634 cmd_str += _to_string(numSock);
fkellermavnet 0:affdbb35faa4 1635 cmd_str += ",";
fkellermavnet 0:affdbb35faa4 1636 cmd_str += _to_string(n);
fkellermavnet 0:affdbb35faa4 1637
fkellermavnet 0:affdbb35faa4 1638 // Experimental: read should not need to check cell net status
fkellermavnet 0:affdbb35faa4 1639 result = at_send_wnc_cmd(cmd_str.c_str(), &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1640 if (result == WNC_AT_CMD_OK) {
fkellermavnet 14:e846217affcd 1641 if (pRespStr->size() > 0) {
fkellermavnet 14:e846217affcd 1642 pos_start = pRespStr->find("\"");
fkellermavnet 14:e846217affcd 1643 pos_end = pRespStr->rfind("\"");
fkellermavnet 14:e846217affcd 1644 // Make sure search finds what it's looking for!
fkellermavnet 14:e846217affcd 1645 if (pos_start != string::npos && pos_end != string::npos) {
fkellermavnet 14:e846217affcd 1646 pos_start++;
fkellermavnet 14:e846217affcd 1647 i = pos_end - pos_start; // Num hex chars, 2 per byte
fkellermavnet 14:e846217affcd 1648 }
fkellermavnet 14:e846217affcd 1649 else
fkellermavnet 14:e846217affcd 1650 i = 0;
fkellermavnet 12:33290e9e6e5f 1651 }
fkellermavnet 0:affdbb35faa4 1652 else
fkellermavnet 0:affdbb35faa4 1653 i = 0;
fkellermavnet 10:2ec59906a24e 1654
fkellermavnet 12:33290e9e6e5f 1655 if ((i < 0) || ((i % 2) == 1))
fkellermavnet 4:c5720f4d13ff 1656 dbgPuts("Invalid READ string!");
fkellermavnet 12:33290e9e6e5f 1657
fkellermavnet 12:33290e9e6e5f 1658 if (i > 2*n) {
fkellermavnet 4:c5720f4d13ff 1659 // Bound the ill formated WNC read string!
fkellermavnet 7:e6f22159ef23 1660 i = 2*n;
fkellermavnet 4:c5720f4d13ff 1661 dbgPuts("TRUNCATING read data!");
fkellermavnet 4:c5720f4d13ff 1662 }
fkellermavnet 4:c5720f4d13ff 1663
fkellermavnet 1:ac2de545b981 1664 // If data, convert the hex string into byte values
fkellermavnet 12:33290e9e6e5f 1665 *numRead = i / 2;
fkellermavnet 12:33290e9e6e5f 1666 while (i > 0) {
fkellermavnet 12:33290e9e6e5f 1667 i -= 2;
fkellermavnet 12:33290e9e6e5f 1668 *pS++ = (uint8_t)strtol(pRespStr->substr(pos_start, 2).c_str(), NULL, 16);
fkellermavnet 12:33290e9e6e5f 1669 pos_start += 2;
fkellermavnet 0:affdbb35faa4 1670 }
fkellermavnet 0:affdbb35faa4 1671 }
fkellermavnet 0:affdbb35faa4 1672 }
fkellermavnet 0:affdbb35faa4 1673 else {
fkellermavnet 0:affdbb35faa4 1674 dbgPuts("sockread Err, to many to read!");
fkellermavnet 0:affdbb35faa4 1675 result = WNC_AT_CMD_ERR;
fkellermavnet 0:affdbb35faa4 1676 }
fkellermavnet 0:affdbb35faa4 1677
fkellermavnet 0:affdbb35faa4 1678 return (result);
fkellermavnet 0:affdbb35faa4 1679 }
fkellermavnet 0:affdbb35faa4 1680
fkellermavnet 0:affdbb35faa4 1681 bool WncController::at_reinitialize_mdm(void)
fkellermavnet 0:affdbb35faa4 1682 {
fkellermavnet 0:affdbb35faa4 1683 // Atempt to re-register
fkellermavnet 0:affdbb35faa4 1684 // string * pRespStr;
fkellermavnet 0:affdbb35faa4 1685 // dbgPuts("Force re-register!");
fkellermavnet 0:affdbb35faa4 1686 // at_send_wnc_cmd("AT+CFUN=0,0", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1687 // waitMs(31000);
fkellermavnet 0:affdbb35faa4 1688 // at_send_wnc_cmd("AT+CFUN=1,0", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1689 // waitMs(31000);
fkellermavnet 0:affdbb35faa4 1690
fkellermavnet 0:affdbb35faa4 1691 // Initialize the modem
fkellermavnet 0:affdbb35faa4 1692 dbgPuts("Modem RE-initializing with SOFT Reset...");
fkellermavnet 0:affdbb35faa4 1693
fkellermavnet 0:affdbb35faa4 1694 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1695 at_send_wnc_cmd("AT@DMREBOOT", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1696 waitMs(5000);
fkellermavnet 0:affdbb35faa4 1697
fkellermavnet 0:affdbb35faa4 1698 // Now, give the modem time to start responding by
fkellermavnet 0:affdbb35faa4 1699 // sending simple 'AT' commands to the modem once per second.
fkellermavnet 0:affdbb35faa4 1700 int timeoutSecs = WNC_REINIT_MAX_TIME_MS;
fkellermavnet 0:affdbb35faa4 1701 do {
fkellermavnet 0:affdbb35faa4 1702 dbgPuts("\rWaiting ", false); dbgPutsNoTime(_to_string(timeoutSecs), false);
fkellermavnet 0:affdbb35faa4 1703 AtCmdErr_e rc = mdmSendAtCmdRsp("AT", 500, &m_sWncStr);
fkellermavnet 0:affdbb35faa4 1704 if (rc == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 1705 dbgPutsNoTime(""); // CR LF
fkellermavnet 0:affdbb35faa4 1706 break;
fkellermavnet 0:affdbb35faa4 1707 }
fkellermavnet 0:affdbb35faa4 1708 waitMs(500);
fkellermavnet 0:affdbb35faa4 1709 timeoutSecs--;
fkellermavnet 0:affdbb35faa4 1710 }
fkellermavnet 0:affdbb35faa4 1711 while (timeoutSecs > 0);
fkellermavnet 0:affdbb35faa4 1712
fkellermavnet 0:affdbb35faa4 1713 if (timeoutSecs <= 0)
fkellermavnet 0:affdbb35faa4 1714 dbgPuts("\r\nModem RE-init FAILED!");
fkellermavnet 0:affdbb35faa4 1715 else
fkellermavnet 0:affdbb35faa4 1716 dbgPuts("\r\nModem RE-init complete!");
fkellermavnet 0:affdbb35faa4 1717
fkellermavnet 0:affdbb35faa4 1718 return (timeoutSecs > 0);
fkellermavnet 0:affdbb35faa4 1719 }
fkellermavnet 0:affdbb35faa4 1720
fkellermavnet 0:affdbb35faa4 1721 WncController::AtCmdErr_e WncController::mdmSendAtCmdRsp(const char *cmd, int timeout_ms, string * rsp, bool crLf)
fkellermavnet 0:affdbb35faa4 1722 {
fkellermavnet 0:affdbb35faa4 1723 rsp->erase(); // Clean up from possible prior cmd response
fkellermavnet 0:affdbb35faa4 1724
fkellermavnet 0:affdbb35faa4 1725 // Don't bother the WNC if user hasn't turned it on.
fkellermavnet 0:affdbb35faa4 1726 if (m_sState == WNC_OFF)
fkellermavnet 0:affdbb35faa4 1727 return (WNC_AT_CMD_WNC_NOT_ON);
fkellermavnet 0:affdbb35faa4 1728
fkellermavnet 0:affdbb35faa4 1729 size_t n = strlen(cmd);
fkellermavnet 0:affdbb35faa4 1730
fkellermavnet 0:affdbb35faa4 1731 // Wait per WNC advise
fkellermavnet 0:affdbb35faa4 1732 waitMs(WNC_WAIT_FOR_AT_CMD_MS);
fkellermavnet 0:affdbb35faa4 1733
fkellermavnet 0:affdbb35faa4 1734 if (cmd && n > 0) {
fkellermavnet 0:affdbb35faa4 1735 sendCmd(cmd, crLf);
fkellermavnet 0:affdbb35faa4 1736 // sendCmdSlow(cmd, n, 500); // 3rd arg is micro seconds between chars sent
fkellermavnet 0:affdbb35faa4 1737 }
fkellermavnet 0:affdbb35faa4 1738
fkellermavnet 0:affdbb35faa4 1739 startTimerA();
fkellermavnet 1:ac2de545b981 1740 while (getTimerTicksA_mS() < timeout_ms) {
fkellermavnet 1:ac2de545b981 1741 n = mdmGetline(rsp, timeout_ms - getTimerTicksA_mS());
fkellermavnet 0:affdbb35faa4 1742
fkellermavnet 0:affdbb35faa4 1743 if (n == 0)
fkellermavnet 0:affdbb35faa4 1744 continue;
fkellermavnet 14:e846217affcd 1745
fkellermavnet 0:affdbb35faa4 1746 if (rsp->rfind("OK") != string::npos) {
fkellermavnet 0:affdbb35faa4 1747 stopTimerA();
fkellermavnet 0:affdbb35faa4 1748 return (WNC_AT_CMD_OK);
fkellermavnet 0:affdbb35faa4 1749 }
fkellermavnet 0:affdbb35faa4 1750
fkellermavnet 0:affdbb35faa4 1751 if (rsp->rfind("+CME ERROR") != string::npos) {
fkellermavnet 0:affdbb35faa4 1752 stopTimerA();
fkellermavnet 0:affdbb35faa4 1753 return (WNC_AT_CMD_ERRCME);
fkellermavnet 0:affdbb35faa4 1754 }
fkellermavnet 0:affdbb35faa4 1755
fkellermavnet 0:affdbb35faa4 1756 if (rsp->rfind("@EXTERR") != string::npos) {
fkellermavnet 0:affdbb35faa4 1757 stopTimerA();
fkellermavnet 0:affdbb35faa4 1758 return (WNC_AT_CMD_ERREXT);
fkellermavnet 0:affdbb35faa4 1759 }
fkellermavnet 0:affdbb35faa4 1760
fkellermavnet 0:affdbb35faa4 1761 if (rsp->rfind("ERROR") != string::npos) {
fkellermavnet 0:affdbb35faa4 1762 stopTimerA();
fkellermavnet 0:affdbb35faa4 1763 return (WNC_AT_CMD_ERR);
fkellermavnet 0:affdbb35faa4 1764 }
fkellermavnet 0:affdbb35faa4 1765 }
fkellermavnet 0:affdbb35faa4 1766 stopTimerA();
fkellermavnet 0:affdbb35faa4 1767
fkellermavnet 0:affdbb35faa4 1768 return (WNC_AT_CMD_TIMEOUT);
fkellermavnet 0:affdbb35faa4 1769 }
fkellermavnet 0:affdbb35faa4 1770
fkellermavnet 0:affdbb35faa4 1771 bool WncController::at_setapn_wnc(const char * const apnStr)
fkellermavnet 0:affdbb35faa4 1772 {
fkellermavnet 0:affdbb35faa4 1773 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1774
fkellermavnet 0:affdbb35faa4 1775 string cmd_str("AT%PDNSET=1,");
fkellermavnet 0:affdbb35faa4 1776 cmd_str += apnStr;
fkellermavnet 0:affdbb35faa4 1777 cmd_str += ",IP";
fkellermavnet 0:affdbb35faa4 1778 if (WNC_AT_CMD_OK == at_send_wnc_cmd(cmd_str.c_str(), &pRespStr, WNC_APNSET_TIMEOUT_MS)) // Set APN, cmd seems to take a little longer sometimes
fkellermavnet 0:affdbb35faa4 1779 return (true);
fkellermavnet 0:affdbb35faa4 1780 else
fkellermavnet 0:affdbb35faa4 1781 return (false);
fkellermavnet 0:affdbb35faa4 1782 }
fkellermavnet 0:affdbb35faa4 1783
fkellermavnet 0:affdbb35faa4 1784 bool WncController::at_getrssiber_wnc(int16_t * dBm, int16_t * ber)
fkellermavnet 0:affdbb35faa4 1785 {
fkellermavnet 0:affdbb35faa4 1786 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1787 AtCmdErr_e cmdRes;
fkellermavnet 0:affdbb35faa4 1788 cmdRes = at_send_wnc_cmd("AT+CSQ", &pRespStr, m_sCmdTimeoutMs); // Check RSSI,BER
fkellermavnet 0:affdbb35faa4 1789 if (cmdRes != WNC_AT_CMD_OK)
fkellermavnet 0:affdbb35faa4 1790 return (false);
fkellermavnet 0:affdbb35faa4 1791
fkellermavnet 0:affdbb35faa4 1792 if (pRespStr->size() == 0) {
fkellermavnet 0:affdbb35faa4 1793 dbgPuts("Strange RSSI result!");
fkellermavnet 0:affdbb35faa4 1794 return (false);
fkellermavnet 0:affdbb35faa4 1795 }
fkellermavnet 0:affdbb35faa4 1796 else {
fkellermavnet 0:affdbb35faa4 1797 size_t pos1 = pRespStr->find("SQ:");
fkellermavnet 0:affdbb35faa4 1798 size_t pos2 = pRespStr->rfind(",");
fkellermavnet 0:affdbb35faa4 1799 // Sanity check
fkellermavnet 0:affdbb35faa4 1800 if ((pos1 != string::npos) && (pos2 != string::npos) && (pos2 > pos1)) {
fkellermavnet 0:affdbb35faa4 1801 string subStr = pRespStr->substr(pos1 + 4, pos2 - pos1 );
fkellermavnet 0:affdbb35faa4 1802 int rawRssi = atoi(subStr.c_str());
fkellermavnet 0:affdbb35faa4 1803
fkellermavnet 0:affdbb35faa4 1804 // Convert WNC RSSI into dBm range:
fkellermavnet 0:affdbb35faa4 1805 // 0 - -113 dBm
fkellermavnet 0:affdbb35faa4 1806 // 1 - -111 dBm
fkellermavnet 0:affdbb35faa4 1807 // 2..30 - -109 to -53 dBm
fkellermavnet 0:affdbb35faa4 1808 // 31 - -51dBm or >
fkellermavnet 0:affdbb35faa4 1809 // 99 - not known or not detectable
fkellermavnet 0:affdbb35faa4 1810 if (rawRssi == 99)
fkellermavnet 0:affdbb35faa4 1811 *dBm = -199;
fkellermavnet 0:affdbb35faa4 1812 else if (rawRssi == 0)
fkellermavnet 0:affdbb35faa4 1813 *dBm = -113;
fkellermavnet 0:affdbb35faa4 1814 else if (rawRssi == 1)
fkellermavnet 0:affdbb35faa4 1815 *dBm = -111;
fkellermavnet 0:affdbb35faa4 1816 else if (rawRssi == 31)
fkellermavnet 0:affdbb35faa4 1817 *dBm = -51;
fkellermavnet 0:affdbb35faa4 1818 else if (rawRssi >= 2 && rawRssi <= 30)
fkellermavnet 0:affdbb35faa4 1819 *dBm = -113 + 2 * rawRssi;
fkellermavnet 0:affdbb35faa4 1820 else {
fkellermavnet 0:affdbb35faa4 1821 dbgPuts("Invalid RSSI!");
fkellermavnet 0:affdbb35faa4 1822 return (false);
fkellermavnet 0:affdbb35faa4 1823 }
fkellermavnet 0:affdbb35faa4 1824 // Parse out BER: 0..7 as RXQUAL values in the table 3GPP TS 45.008 subclause 8.2.4
fkellermavnet 0:affdbb35faa4 1825 // 99 - unknown or undetectable
fkellermavnet 0:affdbb35faa4 1826 subStr = pRespStr->substr(pos2 + 1, pRespStr->length() - (pos2 + 1));
fkellermavnet 0:affdbb35faa4 1827 *ber = atoi(subStr.c_str());
fkellermavnet 0:affdbb35faa4 1828 }
fkellermavnet 0:affdbb35faa4 1829 else {
fkellermavnet 0:affdbb35faa4 1830 dbgPuts("Strange RSSI result2!");
fkellermavnet 0:affdbb35faa4 1831 return (false);
fkellermavnet 0:affdbb35faa4 1832 }
fkellermavnet 0:affdbb35faa4 1833 }
fkellermavnet 0:affdbb35faa4 1834
fkellermavnet 0:affdbb35faa4 1835 return (true);
fkellermavnet 0:affdbb35faa4 1836 }
fkellermavnet 0:affdbb35faa4 1837
fkellermavnet 0:affdbb35faa4 1838 bool WncController::checkCellLink(void)
fkellermavnet 0:affdbb35faa4 1839 {
fkellermavnet 0:affdbb35faa4 1840 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1841 size_t pos;
fkellermavnet 0:affdbb35faa4 1842 int regSts;
fkellermavnet 0:affdbb35faa4 1843 int cmdRes1, cmdRes2;
fkellermavnet 0:affdbb35faa4 1844
fkellermavnet 0:affdbb35faa4 1845 if (m_sState == WNC_OFF)
fkellermavnet 0:affdbb35faa4 1846 return (false);
fkellermavnet 0:affdbb35faa4 1847
fkellermavnet 0:affdbb35faa4 1848 m_sState = WNC_ON_NO_CELL_LINK;
fkellermavnet 0:affdbb35faa4 1849
fkellermavnet 0:affdbb35faa4 1850 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 1851 dbgPuts("<-------- Begin Cell Status ------------");
fkellermavnet 0:affdbb35faa4 1852
fkellermavnet 0:affdbb35faa4 1853 cmdRes1 = at_send_wnc_cmd("AT+CSQ", &pRespStr, m_sCmdTimeoutMs); // Check RSSI,BER
fkellermavnet 0:affdbb35faa4 1854 cmdRes2 = at_send_wnc_cmd("AT+CPIN?", &pRespStr, m_sCmdTimeoutMs); // Check if SIM locked
fkellermavnet 0:affdbb35faa4 1855
fkellermavnet 14:e846217affcd 1856 if ((cmdRes1 != WNC_AT_CMD_OK) || (cmdRes2 != WNC_AT_CMD_OK) || (pRespStr->size() == 0))
fkellermavnet 0:affdbb35faa4 1857 {
fkellermavnet 0:affdbb35faa4 1858 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 1859 {
fkellermavnet 0:affdbb35faa4 1860 if ((cmdRes1 == WNC_AT_CMD_TIMEOUT) || (cmdRes2 == WNC_AT_CMD_TIMEOUT))
fkellermavnet 0:affdbb35faa4 1861 dbgPuts("------------ WNC No Response! --------->");
fkellermavnet 0:affdbb35faa4 1862 else
fkellermavnet 0:affdbb35faa4 1863 dbgPuts("------------ WNC Cmd Error! ----------->");
fkellermavnet 0:affdbb35faa4 1864 }
fkellermavnet 0:affdbb35faa4 1865 return (false);
fkellermavnet 0:affdbb35faa4 1866 }
fkellermavnet 0:affdbb35faa4 1867
fkellermavnet 0:affdbb35faa4 1868 // If SIM Card not ready don't bother with commands!
fkellermavnet 0:affdbb35faa4 1869 if (pRespStr->find("CPIN: READY") == string::npos)
fkellermavnet 0:affdbb35faa4 1870 {
fkellermavnet 0:affdbb35faa4 1871 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 1872 dbgPuts("------------ WNC SIM Problem! --------->");
fkellermavnet 0:affdbb35faa4 1873
fkellermavnet 0:affdbb35faa4 1874 return (false);
fkellermavnet 0:affdbb35faa4 1875 }
fkellermavnet 0:affdbb35faa4 1876
fkellermavnet 0:affdbb35faa4 1877 // SIM card OK, now check for signal and cellular network registration
fkellermavnet 0:affdbb35faa4 1878 cmdRes1 = at_send_wnc_cmd("AT+CREG?", &pRespStr, m_sCmdTimeoutMs); // Check if registered on network
fkellermavnet 14:e846217affcd 1879 if (cmdRes1 != WNC_AT_CMD_OK || pRespStr->size() == 0)
fkellermavnet 0:affdbb35faa4 1880 {
fkellermavnet 0:affdbb35faa4 1881 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 1882 dbgPuts("------------ WNC +CREG? Fail! --------->");
fkellermavnet 0:affdbb35faa4 1883
fkellermavnet 0:affdbb35faa4 1884 return (false);
fkellermavnet 0:affdbb35faa4 1885 }
fkellermavnet 0:affdbb35faa4 1886 else
fkellermavnet 0:affdbb35faa4 1887 {
fkellermavnet 0:affdbb35faa4 1888 pos = pRespStr->find("CREG: ");
fkellermavnet 0:affdbb35faa4 1889 if (pos != string::npos)
fkellermavnet 0:affdbb35faa4 1890 {
fkellermavnet 0:affdbb35faa4 1891 // The registration is the 2nd arg in the comma separated list
fkellermavnet 0:affdbb35faa4 1892 *pRespStr = pRespStr->substr(pos+8, 1);
fkellermavnet 0:affdbb35faa4 1893 regSts = atoi(pRespStr->c_str());
fkellermavnet 0:affdbb35faa4 1894 switch (regSts) {
fkellermavnet 0:affdbb35faa4 1895 case 1:
fkellermavnet 0:affdbb35faa4 1896 case 5:
fkellermavnet 0:affdbb35faa4 1897 case 6:
fkellermavnet 0:affdbb35faa4 1898 case 7:
fkellermavnet 0:affdbb35faa4 1899 m_sReadyForSMS = true;
fkellermavnet 0:affdbb35faa4 1900 break;
fkellermavnet 0:affdbb35faa4 1901 default:
fkellermavnet 0:affdbb35faa4 1902 m_sReadyForSMS = false;
fkellermavnet 0:affdbb35faa4 1903 dbgPuts("SMS Service Down!");
fkellermavnet 0:affdbb35faa4 1904 }
fkellermavnet 0:affdbb35faa4 1905
fkellermavnet 0:affdbb35faa4 1906 // 1 - registered home, 5 - registered roaming
fkellermavnet 0:affdbb35faa4 1907 if ((regSts != 1) && (regSts != 5))
fkellermavnet 0:affdbb35faa4 1908 {
fkellermavnet 0:affdbb35faa4 1909 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 1910 dbgPuts("------ WNC Cell Link Down for Data! --->");
fkellermavnet 0:affdbb35faa4 1911
fkellermavnet 0:affdbb35faa4 1912 return (false);
fkellermavnet 0:affdbb35faa4 1913 }
fkellermavnet 0:affdbb35faa4 1914 }
fkellermavnet 0:affdbb35faa4 1915
fkellermavnet 0:affdbb35faa4 1916 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 1917 dbgPuts("------------ WNC Ready ---------------->");
fkellermavnet 0:affdbb35faa4 1918 }
fkellermavnet 0:affdbb35faa4 1919
fkellermavnet 0:affdbb35faa4 1920 m_sState = WNC_ON;
fkellermavnet 0:affdbb35faa4 1921
fkellermavnet 0:affdbb35faa4 1922 return (true);
fkellermavnet 0:affdbb35faa4 1923 }
fkellermavnet 0:affdbb35faa4 1924
fkellermavnet 0:affdbb35faa4 1925 int WncController::dbgPutsNoTime(const char * s, bool crlf)
fkellermavnet 0:affdbb35faa4 1926 {
fkellermavnet 0:affdbb35faa4 1927 if (m_sDebugEnabled == true) {
fkellermavnet 1:ac2de545b981 1928 int r = dbgWriteChars(s);
fkellermavnet 0:affdbb35faa4 1929 if (crlf == true)
fkellermavnet 1:ac2de545b981 1930 return (dbgWriteChars("\r\n"));
fkellermavnet 0:affdbb35faa4 1931 else
fkellermavnet 0:affdbb35faa4 1932 return (r);
fkellermavnet 0:affdbb35faa4 1933 }
fkellermavnet 0:affdbb35faa4 1934 else
fkellermavnet 0:affdbb35faa4 1935 return 0;
fkellermavnet 0:affdbb35faa4 1936 };
fkellermavnet 0:affdbb35faa4 1937
fkellermavnet 0:affdbb35faa4 1938 int WncController::dbgPuts(const char * s, bool crlf)
fkellermavnet 0:affdbb35faa4 1939 {
fkellermavnet 0:affdbb35faa4 1940 dbgPutsNoTime("[*] ", false);
fkellermavnet 0:affdbb35faa4 1941 dbgPutsNoTime(_to_string(getLogTimerTicks()), false);
fkellermavnet 1:ac2de545b981 1942 dbgPutsNoTime(" ", false);
fkellermavnet 0:affdbb35faa4 1943
fkellermavnet 0:affdbb35faa4 1944 int r = dbgPutsNoTime(s, false);
fkellermavnet 1:ac2de545b981 1945
fkellermavnet 0:affdbb35faa4 1946 if (crlf == true)
fkellermavnet 1:ac2de545b981 1947 return (dbgPutsNoTime("", true));
fkellermavnet 0:affdbb35faa4 1948 else
fkellermavnet 0:affdbb35faa4 1949 return (r);
fkellermavnet 0:affdbb35faa4 1950 };
fkellermavnet 0:affdbb35faa4 1951
fkellermavnet 0:affdbb35faa4 1952 void WncController::sendCmd(const char * cmd, bool crLf)
fkellermavnet 0:affdbb35faa4 1953 {
fkellermavnet 0:affdbb35faa4 1954 puts(cmd);
fkellermavnet 0:affdbb35faa4 1955 if (crLf == true)
fkellermavnet 0:affdbb35faa4 1956 puts("\r\n");
fkellermavnet 0:affdbb35faa4 1957 }
fkellermavnet 0:affdbb35faa4 1958
fkellermavnet 0:affdbb35faa4 1959 // WNC used to have troubles handling full speed, seems to not need this now.
fkellermavnet 0:affdbb35faa4 1960 void WncController::sendCmd(const char * cmd, unsigned n, unsigned wait_uS, bool crLf)
fkellermavnet 0:affdbb35faa4 1961 {
fkellermavnet 0:affdbb35faa4 1962 while (n--) {
fkellermavnet 0:affdbb35faa4 1963 putc(*cmd++);
fkellermavnet 0:affdbb35faa4 1964 waitUs(wait_uS);
fkellermavnet 0:affdbb35faa4 1965 };
fkellermavnet 0:affdbb35faa4 1966 if (crLf == true) {
fkellermavnet 0:affdbb35faa4 1967 putc('\r');
fkellermavnet 0:affdbb35faa4 1968 waitUs(wait_uS);
fkellermavnet 0:affdbb35faa4 1969 putc('\n');
fkellermavnet 0:affdbb35faa4 1970 waitUs(wait_uS);
fkellermavnet 0:affdbb35faa4 1971 }
fkellermavnet 0:affdbb35faa4 1972 }
fkellermavnet 0:affdbb35faa4 1973
fkellermavnet 0:affdbb35faa4 1974
fkellermavnet 0:affdbb35faa4 1975 }; // End namespace WncController_fk