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@11:3ff6c1cb5b03, 2016-09-09 (annotated)

Committer:
fkellermavnet
Date:
Fri Sep 09 23:58:12 2016 +0000
Revision:
11:3ff6c1cb5b03
Parent:
10:2ec59906a24e
Child:
12:33290e9e6e5f
Fixed some SMS debug output.

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 0:affdbb35faa4 339 bool WncController::openSocket(uint16_t numSock, uint16_t port, bool tcp, uint16_t timeOutSec)
fkellermavnet 0:affdbb35faa4 340 {
fkellermavnet 0:affdbb35faa4 341 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 0:affdbb35faa4 342 // IPV4 ip addr sanity check!
fkellermavnet 0:affdbb35faa4 343 size_t lenIpStr = m_sSock[numSock].myIpAddressStr.size();
fkellermavnet 0:affdbb35faa4 344 if (lenIpStr < 7 || lenIpStr > 15) {
fkellermavnet 0:affdbb35faa4 345 dbgPuts("Invalid IP Address!");
fkellermavnet 0:affdbb35faa4 346 return (false);
fkellermavnet 0:affdbb35faa4 347 }
fkellermavnet 0:affdbb35faa4 348
fkellermavnet 0:affdbb35faa4 349 // Already open ? Must close if want to re-open with new settings.
fkellermavnet 0:affdbb35faa4 350 if (m_sSock[numSock].open == true) {
fkellermavnet 0:affdbb35faa4 351 dbgPuts("Socket already open, close then re-open!");
fkellermavnet 10:2ec59906a24e 352 at_sockclose_wnc(m_sSock[numSock].numWncSock);
fkellermavnet 0:affdbb35faa4 353 m_sSock[numSock].open = false;
fkellermavnet 0:affdbb35faa4 354 }
fkellermavnet 0:affdbb35faa4 355
fkellermavnet 0:affdbb35faa4 356 m_sSock[numSock].myPort = port;
fkellermavnet 0:affdbb35faa4 357 m_sSock[numSock].isTcp = tcp;
fkellermavnet 0:affdbb35faa4 358 m_sSock[numSock].timeOutSec = timeOutSec;
fkellermavnet 10:2ec59906a24e 359
fkellermavnet 10:2ec59906a24e 360 int numWncSock = at_sockopen_wnc(m_sSock[numSock].myIpAddressStr.c_str(), port, numSock, tcp, timeOutSec);
fkellermavnet 10:2ec59906a24e 361 m_sSock[numSock].numWncSock = numWncSock;
fkellermavnet 10:2ec59906a24e 362 if (numWncSock > 0 && numWncSock <= MAX_NUM_WNC_SOCKETS)
fkellermavnet 10:2ec59906a24e 363 m_sSock[numSock].open = true;
fkellermavnet 10:2ec59906a24e 364 else
fkellermavnet 10:2ec59906a24e 365 m_sSock[numSock].open = false;
fkellermavnet 10:2ec59906a24e 366
fkellermavnet 0:affdbb35faa4 367 if (m_sSock[numSock].open == false) {
fkellermavnet 0:affdbb35faa4 368 dbgPuts("Socket open fail!!!!");
fkellermavnet 0:affdbb35faa4 369 // Work-around. If the sock open fails it needs to be told
fkellermavnet 0:affdbb35faa4 370 // to close. If 6 sock opens happen with a fail, it further
fkellermavnet 0:affdbb35faa4 371 // crashes the WNC. Not sure why the sock won't open.
fkellermavnet 10:2ec59906a24e 372 at_sockclose_wnc(m_sSock[numSock].numWncSock);
fkellermavnet 0:affdbb35faa4 373 }
fkellermavnet 0:affdbb35faa4 374 }
fkellermavnet 0:affdbb35faa4 375 else {
fkellermavnet 0:affdbb35faa4 376 dbgPuts("Bad socket num or IP!");
fkellermavnet 0:affdbb35faa4 377 return (false);
fkellermavnet 0:affdbb35faa4 378 }
fkellermavnet 0:affdbb35faa4 379
fkellermavnet 0:affdbb35faa4 380 return (m_sSock[numSock].open);
fkellermavnet 0:affdbb35faa4 381 }
fkellermavnet 0:affdbb35faa4 382
fkellermavnet 0:affdbb35faa4 383 /**
fkellermavnet 0:affdbb35faa4 384 * \brief Write bytes of data to an open socket
fkellermavnet 0:affdbb35faa4 385 *
fkellermavnet 0:affdbb35faa4 386 * \param [in] sockNum - the number of the socket to write. s - a string containing
fkellermavnet 0:affdbb35faa4 387 * the byte data to send must be less than = 1500.
fkellermavnet 0:affdbb35faa4 388 *
fkellermavnet 0:affdbb35faa4 389 * \return true - if the write was successful. false otherwise.
fkellermavnet 0:affdbb35faa4 390 *
fkellermavnet 0:affdbb35faa4 391 * \details The results of the write do not have anything to do with the data
fkellermavnet 0:affdbb35faa4 392 * arriving at the endpoint.
fkellermavnet 0:affdbb35faa4 393 */
fkellermavnet 0:affdbb35faa4 394
fkellermavnet 1:ac2de545b981 395 bool WncController::sockWrite(const char * const s, uint32_t n, uint16_t numSock, bool isTcp)
fkellermavnet 0:affdbb35faa4 396 {
fkellermavnet 10:2ec59906a24e 397 bool result = true;
fkellermavnet 0:affdbb35faa4 398
fkellermavnet 10:2ec59906a24e 399 AtCmdErr_e cmdRes = at_sockwrite_wnc(s, n, m_sSock[numSock].numWncSock, isTcp);
fkellermavnet 0:affdbb35faa4 400 if (cmdRes != WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 401 if ((cmdRes == WNC_AT_CMD_ERREXT) || (cmdRes == WNC_AT_CMD_TIMEOUT) || (cmdRes == WNC_AT_CMD_ERRCME))
fkellermavnet 0:affdbb35faa4 402 {
fkellermavnet 1:ac2de545b981 403 // This may throw away any data that hasn't been written out of the WNC
fkellermavnet 0:affdbb35faa4 404 // but at this point with the way the WNC currently works we have
fkellermavnet 0:affdbb35faa4 405 // no choice.
fkellermavnet 0:affdbb35faa4 406 closeOpenSocket(numSock);
fkellermavnet 0:affdbb35faa4 407 }
fkellermavnet 0:affdbb35faa4 408 result = false;
fkellermavnet 0:affdbb35faa4 409 }
fkellermavnet 0:affdbb35faa4 410
fkellermavnet 0:affdbb35faa4 411 return (result);
fkellermavnet 0:affdbb35faa4 412 }
fkellermavnet 0:affdbb35faa4 413
fkellermavnet 0:affdbb35faa4 414 bool WncController::write(uint16_t numSock, const char * s, uint32_t n)
fkellermavnet 0:affdbb35faa4 415 {
fkellermavnet 0:affdbb35faa4 416 bool result;
fkellermavnet 0:affdbb35faa4 417
fkellermavnet 0:affdbb35faa4 418 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 0:affdbb35faa4 419 if (m_sSock[numSock].open == true) {
fkellermavnet 0:affdbb35faa4 420 if (n <= MAX_WNC_WRITE_BYTES) {
fkellermavnet 0:affdbb35faa4 421 result = sockWrite(s, n, numSock, m_sSock[numSock].isTcp);
fkellermavnet 0:affdbb35faa4 422 }
fkellermavnet 0:affdbb35faa4 423 else {
fkellermavnet 0:affdbb35faa4 424 uint16_t rem = n % MAX_WNC_WRITE_BYTES;
fkellermavnet 0:affdbb35faa4 425 while (n > MAX_WNC_WRITE_BYTES) {
fkellermavnet 0:affdbb35faa4 426 n -= MAX_WNC_WRITE_BYTES;
fkellermavnet 0:affdbb35faa4 427 result = sockWrite(s, MAX_WNC_WRITE_BYTES, numSock, m_sSock[numSock].isTcp);
fkellermavnet 0:affdbb35faa4 428 if (result == false) {
fkellermavnet 0:affdbb35faa4 429 n = 0;
fkellermavnet 0:affdbb35faa4 430 rem = 0;
fkellermavnet 0:affdbb35faa4 431 dbgPuts("Sock write fail!");
fkellermavnet 0:affdbb35faa4 432 }
fkellermavnet 0:affdbb35faa4 433 else
fkellermavnet 0:affdbb35faa4 434 s += MAX_WNC_WRITE_BYTES;
fkellermavnet 0:affdbb35faa4 435 }
fkellermavnet 0:affdbb35faa4 436 if (rem > 0)
fkellermavnet 0:affdbb35faa4 437 result = sockWrite(s, rem, numSock, m_sSock[numSock].isTcp);
fkellermavnet 0:affdbb35faa4 438 }
fkellermavnet 0:affdbb35faa4 439 }
fkellermavnet 0:affdbb35faa4 440 else {
fkellermavnet 0:affdbb35faa4 441 dbgPuts("Socket is closed for write!");
fkellermavnet 0:affdbb35faa4 442 result = false;
fkellermavnet 0:affdbb35faa4 443 }
fkellermavnet 0:affdbb35faa4 444 }
fkellermavnet 0:affdbb35faa4 445 else {
fkellermavnet 0:affdbb35faa4 446 dbgPuts("Bad socket num!");
fkellermavnet 0:affdbb35faa4 447 result = false;
fkellermavnet 0:affdbb35faa4 448 }
fkellermavnet 0:affdbb35faa4 449
fkellermavnet 0:affdbb35faa4 450 return (result);
fkellermavnet 0:affdbb35faa4 451 }
fkellermavnet 0:affdbb35faa4 452
fkellermavnet 0:affdbb35faa4 453 /**
fkellermavnet 0:affdbb35faa4 454 * \brief Poll and read back data from the WNC (if it has any)
fkellermavnet 0:affdbb35faa4 455 * If auto poll is enabled this read might fail (return with no data).
fkellermavnet 0:affdbb35faa4 456 *
fkellermavnet 0:affdbb35faa4 457 * \param [in] sockNum - the number of the socket to read. result - a string pointer containing
fkellermavnet 0:affdbb35faa4 458 * the byte data readback from the WNC.
fkellermavnet 0:affdbb35faa4 459 *
fkellermavnet 0:affdbb35faa4 460 * \return The number of bytes/chars that are read from the socket.
fkellermavnet 0:affdbb35faa4 461 *
fkellermavnet 0:affdbb35faa4 462 * \details DO NOT use the same string as is passed to the auto poll setup method!
fkellermavnet 0:affdbb35faa4 463 */
fkellermavnet 4:c5720f4d13ff 464
fkellermavnet 4:c5720f4d13ff 465 size_t WncController::read(uint16_t numSock, const uint8_t ** readBuf)
fkellermavnet 4:c5720f4d13ff 466 {
fkellermavnet 4:c5720f4d13ff 467 static string theBuf;
fkellermavnet 4:c5720f4d13ff 468 string readStr;
fkellermavnet 4:c5720f4d13ff 469
fkellermavnet 4:c5720f4d13ff 470 theBuf.erase(); // Clean-up from last time
fkellermavnet 4:c5720f4d13ff 471
fkellermavnet 4:c5720f4d13ff 472 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 4:c5720f4d13ff 473 if (m_sSock[numSock].open == true) {
fkellermavnet 4:c5720f4d13ff 474 uint8_t i = m_sSock[numSock].readRetries;
fkellermavnet 4:c5720f4d13ff 475 uint16_t to = m_sSock[numSock].readRetryWaitMs;
fkellermavnet 4:c5720f4d13ff 476 bool foundData = false;
fkellermavnet 4:c5720f4d13ff 477 do {
fkellermavnet 4:c5720f4d13ff 478 AtCmdErr_e cmdRes;
fkellermavnet 10:2ec59906a24e 479 cmdRes = at_sockread_wnc(&readStr, m_sSock[numSock].numWncSock, m_sSock[numSock].isTcp);
fkellermavnet 4:c5720f4d13ff 480 if (WNC_AT_CMD_OK == cmdRes) {
fkellermavnet 4:c5720f4d13ff 481 // This will let this loop read until the socket data is
fkellermavnet 4:c5720f4d13ff 482 // empty. If no data, then wait the retry amount of time.
fkellermavnet 4:c5720f4d13ff 483 if (readStr.size() > 0) {
fkellermavnet 4:c5720f4d13ff 484 theBuf += readStr;
fkellermavnet 4:c5720f4d13ff 485 foundData = true;
fkellermavnet 4:c5720f4d13ff 486 i = 1;
fkellermavnet 4:c5720f4d13ff 487 }
fkellermavnet 4:c5720f4d13ff 488 else {
fkellermavnet 4:c5720f4d13ff 489 // Once data is found start returning it asap
fkellermavnet 4:c5720f4d13ff 490 if (foundData == false)
fkellermavnet 4:c5720f4d13ff 491 waitMs(to);
fkellermavnet 4:c5720f4d13ff 492 }
fkellermavnet 4:c5720f4d13ff 493 }
fkellermavnet 4:c5720f4d13ff 494 else {
fkellermavnet 4:c5720f4d13ff 495 theBuf += readStr; // Append what if any we got before it errored.
fkellermavnet 4:c5720f4d13ff 496 dbgPuts("Sockread failed!");
fkellermavnet 4:c5720f4d13ff 497 if (cmdRes == WNC_AT_CMD_ERREXT || cmdRes == WNC_AT_CMD_TIMEOUT)
fkellermavnet 4:c5720f4d13ff 498 {
fkellermavnet 4:c5720f4d13ff 499 // This may throw away any data that hasn't been read out of the WNC
fkellermavnet 4:c5720f4d13ff 500 // but at this point with the way the WNC currently works we have
fkellermavnet 4:c5720f4d13ff 501 // no choice.
fkellermavnet 4:c5720f4d13ff 502 closeOpenSocket(numSock);
fkellermavnet 4:c5720f4d13ff 503 i = 0;
fkellermavnet 4:c5720f4d13ff 504 }
fkellermavnet 4:c5720f4d13ff 505 else
fkellermavnet 4:c5720f4d13ff 506 waitMs(to);
fkellermavnet 4:c5720f4d13ff 507 }
fkellermavnet 4:c5720f4d13ff 508 } while (i-- > 0);
fkellermavnet 4:c5720f4d13ff 509 }
fkellermavnet 4:c5720f4d13ff 510 else {
fkellermavnet 4:c5720f4d13ff 511 dbgPuts("Socket is closed for read");
fkellermavnet 4:c5720f4d13ff 512 }
fkellermavnet 4:c5720f4d13ff 513 }
fkellermavnet 4:c5720f4d13ff 514 else {
fkellermavnet 4:c5720f4d13ff 515 dbgPuts("Bad socket num!");
fkellermavnet 4:c5720f4d13ff 516 }
fkellermavnet 4:c5720f4d13ff 517
fkellermavnet 4:c5720f4d13ff 518 *readBuf = (const uint8_t *)theBuf.c_str();
fkellermavnet 4:c5720f4d13ff 519
fkellermavnet 4:c5720f4d13ff 520 return (theBuf.size());
fkellermavnet 4:c5720f4d13ff 521 }
fkellermavnet 4:c5720f4d13ff 522
fkellermavnet 0:affdbb35faa4 523 size_t WncController::read(uint16_t numSock, uint8_t * readBuf, uint32_t maxReadBufLen)
fkellermavnet 0:affdbb35faa4 524 {
fkellermavnet 0:affdbb35faa4 525 uint32_t numCopied = 0;
fkellermavnet 0:affdbb35faa4 526
fkellermavnet 0:affdbb35faa4 527 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 0:affdbb35faa4 528 if (m_sSock[numSock].open == true) {
fkellermavnet 9:76c6dd1434e1 529 uint8_t i = m_sSock[numSock].readRetries;
fkellermavnet 0:affdbb35faa4 530 uint16_t to = m_sSock[numSock].readRetryWaitMs;
fkellermavnet 0:affdbb35faa4 531 bool foundData = false;
fkellermavnet 0:affdbb35faa4 532 size_t numRead;
fkellermavnet 0:affdbb35faa4 533 do {
fkellermavnet 0:affdbb35faa4 534 AtCmdErr_e cmdRes;
fkellermavnet 10:2ec59906a24e 535 if (maxReadBufLen < MAX_WNC_READ_BYTES)
fkellermavnet 10:2ec59906a24e 536 cmdRes = at_sockread_wnc(readBuf, &numRead, maxReadBufLen, m_sSock[numSock].numWncSock, m_sSock[numSock].isTcp);
fkellermavnet 0:affdbb35faa4 537 else
fkellermavnet 10:2ec59906a24e 538 cmdRes = at_sockread_wnc(readBuf, &numRead, MAX_WNC_READ_BYTES, m_sSock[numSock].numWncSock, m_sSock[numSock].isTcp);
fkellermavnet 0:affdbb35faa4 539
fkellermavnet 0:affdbb35faa4 540 if (WNC_AT_CMD_OK == cmdRes) {
fkellermavnet 0:affdbb35faa4 541 // This will let this loop read until the socket data is
fkellermavnet 0:affdbb35faa4 542 // empty. If no data, then wait the retry amount of time.
fkellermavnet 0:affdbb35faa4 543 if (numRead > 0) {
fkellermavnet 0:affdbb35faa4 544 foundData = true;
fkellermavnet 0:affdbb35faa4 545 i = 1;
fkellermavnet 10:2ec59906a24e 546 if (numRead <= maxReadBufLen) {
fkellermavnet 0:affdbb35faa4 547 maxReadBufLen -= numRead;
fkellermavnet 0:affdbb35faa4 548 numCopied += numRead;
fkellermavnet 0:affdbb35faa4 549 readBuf += numRead;
fkellermavnet 0:affdbb35faa4 550 }
fkellermavnet 0:affdbb35faa4 551 else {
fkellermavnet 0:affdbb35faa4 552 i = 0; // No more room for data!
fkellermavnet 0:affdbb35faa4 553 dbgPutsNoTime("No more room for read data!");
fkellermavnet 0:affdbb35faa4 554 }
fkellermavnet 0:affdbb35faa4 555 }
fkellermavnet 0:affdbb35faa4 556 else {
fkellermavnet 0:affdbb35faa4 557 // Once data is found start returning it asap
fkellermavnet 0:affdbb35faa4 558 if (foundData == false)
fkellermavnet 0:affdbb35faa4 559 waitMs(to);
fkellermavnet 0:affdbb35faa4 560 }
fkellermavnet 0:affdbb35faa4 561 }
fkellermavnet 0:affdbb35faa4 562 else {
fkellermavnet 0:affdbb35faa4 563 dbgPuts("Sockread failed!");
fkellermavnet 0:affdbb35faa4 564 if (cmdRes == WNC_AT_CMD_ERREXT || cmdRes == WNC_AT_CMD_TIMEOUT)
fkellermavnet 0:affdbb35faa4 565 {
fkellermavnet 0:affdbb35faa4 566 // This may throw away any data that hasn't been read out of the WNC
fkellermavnet 0:affdbb35faa4 567 // but at this point with the way the WNC currently works we have
fkellermavnet 0:affdbb35faa4 568 // no choice.
fkellermavnet 0:affdbb35faa4 569 closeOpenSocket(numSock);
fkellermavnet 0:affdbb35faa4 570 i = 0;
fkellermavnet 0:affdbb35faa4 571 }
fkellermavnet 0:affdbb35faa4 572 else
fkellermavnet 0:affdbb35faa4 573 waitMs(to);
fkellermavnet 0:affdbb35faa4 574 }
fkellermavnet 10:2ec59906a24e 575 } while ((i-- > 0) && (maxReadBufLen > 0));
fkellermavnet 0:affdbb35faa4 576 }
fkellermavnet 0:affdbb35faa4 577 else {
fkellermavnet 0:affdbb35faa4 578 dbgPuts("Socket is closed for read");
fkellermavnet 0:affdbb35faa4 579 }
fkellermavnet 0:affdbb35faa4 580 }
fkellermavnet 0:affdbb35faa4 581 else {
fkellermavnet 0:affdbb35faa4 582 dbgPuts("Bad socket num!");
fkellermavnet 0:affdbb35faa4 583 }
fkellermavnet 0:affdbb35faa4 584
fkellermavnet 0:affdbb35faa4 585 return (numCopied);
fkellermavnet 0:affdbb35faa4 586 }
fkellermavnet 0:affdbb35faa4 587
fkellermavnet 0:affdbb35faa4 588 /**
fkellermavnet 0:affdbb35faa4 589 * \brief Set how many times the above read method will retry if data is not returned.
fkellermavnet 0:affdbb35faa4 590 *
fkellermavnet 0:affdbb35faa4 591 * \param [in] sockNum - the number of the socket to set. retries - how many times to
fkellermavnet 0:affdbb35faa4 592 * poll until data is found.
fkellermavnet 0:affdbb35faa4 593 *
fkellermavnet 0:affdbb35faa4 594 * \return None.
fkellermavnet 0:affdbb35faa4 595 *
fkellermavnet 0:affdbb35faa4 596 * \details None.
fkellermavnet 0:affdbb35faa4 597 */
fkellermavnet 0:affdbb35faa4 598 void WncController::setReadRetries(uint16_t numSock, uint16_t retries)
fkellermavnet 0:affdbb35faa4 599 {
fkellermavnet 0:affdbb35faa4 600 if (numSock < MAX_NUM_WNC_SOCKETS)
fkellermavnet 0:affdbb35faa4 601 m_sSock[numSock].readRetries = retries;
fkellermavnet 0:affdbb35faa4 602 else
fkellermavnet 0:affdbb35faa4 603 dbgPuts("Bad socket num!");
fkellermavnet 0:affdbb35faa4 604 }
fkellermavnet 0:affdbb35faa4 605
fkellermavnet 0:affdbb35faa4 606 /**
fkellermavnet 0:affdbb35faa4 607 * \brief Set how long between retries to wait.
fkellermavnet 0:affdbb35faa4 608 *
fkellermavnet 0:affdbb35faa4 609 * \param [in] sockNum - the number of the socket to set. readRetryWaitMs - how long to wait
fkellermavnet 0:affdbb35faa4 610 * before doing the read poll (calling read(...)).
fkellermavnet 0:affdbb35faa4 611 *
fkellermavnet 0:affdbb35faa4 612 * \return None.
fkellermavnet 0:affdbb35faa4 613 *
fkellermavnet 0:affdbb35faa4 614 * \details None.
fkellermavnet 0:affdbb35faa4 615 */
fkellermavnet 0:affdbb35faa4 616 void WncController::setReadRetryWait(uint16_t numSock, uint16_t readRetryWaitMs)
fkellermavnet 0:affdbb35faa4 617 {
fkellermavnet 0:affdbb35faa4 618 if (numSock < MAX_NUM_WNC_SOCKETS)
fkellermavnet 0:affdbb35faa4 619 m_sSock[numSock].readRetryWaitMs = readRetryWaitMs;
fkellermavnet 0:affdbb35faa4 620 else
fkellermavnet 0:affdbb35faa4 621 dbgPuts("Bad socket num!");
fkellermavnet 0:affdbb35faa4 622 }
fkellermavnet 0:affdbb35faa4 623
fkellermavnet 0:affdbb35faa4 624 /**
fkellermavnet 0:affdbb35faa4 625 * \brief Close the socket.
fkellermavnet 0:affdbb35faa4 626 *
fkellermavnet 0:affdbb35faa4 627 * \param [in] sockNum - the number of the socket to close.
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 bool WncController::closeSocket(uint16_t numSock)
fkellermavnet 0:affdbb35faa4 634 {
fkellermavnet 0:affdbb35faa4 635 if (numSock < MAX_NUM_WNC_SOCKETS) {
fkellermavnet 0:affdbb35faa4 636
fkellermavnet 10:2ec59906a24e 637 if (false == at_sockclose_wnc(m_sSock[numSock].numWncSock))
fkellermavnet 0:affdbb35faa4 638 dbgPuts("Sock close may not have closed!");
fkellermavnet 0:affdbb35faa4 639
fkellermavnet 0:affdbb35faa4 640 // Even with an error the socket could have closed,
fkellermavnet 0:affdbb35faa4 641 // can't tell for sure so just soft close it for now.
fkellermavnet 0:affdbb35faa4 642 m_sSock[numSock].open = false;
fkellermavnet 0:affdbb35faa4 643 }
fkellermavnet 0:affdbb35faa4 644 else {
fkellermavnet 0:affdbb35faa4 645 dbgPuts("Bad socket num!");
fkellermavnet 0:affdbb35faa4 646 }
fkellermavnet 0:affdbb35faa4 647
fkellermavnet 0:affdbb35faa4 648 return (m_sSock[numSock].open == false);
fkellermavnet 0:affdbb35faa4 649 }
fkellermavnet 0:affdbb35faa4 650
fkellermavnet 0:affdbb35faa4 651 // Note: If you want to make it more portable, create a
fkellermavnet 0:affdbb35faa4 652 // arecharsavailable() and readchar()
fkellermavnet 1:ac2de545b981 653 size_t WncController::mdmGetline(string * buff, int timeout_ms)
fkellermavnet 0:affdbb35faa4 654 {
fkellermavnet 0:affdbb35faa4 655 char chin = '\0';
fkellermavnet 0:affdbb35faa4 656 char chin_last;
fkellermavnet 0:affdbb35faa4 657 size_t len = 0;
fkellermavnet 0:affdbb35faa4 658
fkellermavnet 0:affdbb35faa4 659 startTimerB();
fkellermavnet 1:ac2de545b981 660 while ((len < (MAX_LEN_WNC_CMD_RESPONSE - 1)) && (getTimerTicksB_mS() < timeout_ms)) {
fkellermavnet 1:ac2de545b981 661 if (charReady()) {
fkellermavnet 0:affdbb35faa4 662 chin_last = chin;
fkellermavnet 1:ac2de545b981 663 chin = getc();
fkellermavnet 0:affdbb35faa4 664 if (isprint(chin)) {
fkellermavnet 1:ac2de545b981 665 *buff += chin;
fkellermavnet 0:affdbb35faa4 666 len++; // Bound the copy length to something reaonable just in case
fkellermavnet 0:affdbb35faa4 667 continue;
fkellermavnet 0:affdbb35faa4 668 }
fkellermavnet 0:affdbb35faa4 669 else if ((('\r' == chin_last) && ('\n' == chin)) || (('\n' == chin_last) && ('\r' == chin))) {
fkellermavnet 0:affdbb35faa4 670 break;
fkellermavnet 0:affdbb35faa4 671 }
fkellermavnet 0:affdbb35faa4 672 }
fkellermavnet 0:affdbb35faa4 673 }
fkellermavnet 0:affdbb35faa4 674 stopTimerB();
fkellermavnet 0:affdbb35faa4 675
fkellermavnet 0:affdbb35faa4 676 if (len >= (MAX_LEN_WNC_CMD_RESPONSE - 1))
fkellermavnet 0:affdbb35faa4 677 dbgPuts("Max cmd length reply exceeded!");
fkellermavnet 0:affdbb35faa4 678
fkellermavnet 0:affdbb35faa4 679 return (len);
fkellermavnet 0:affdbb35faa4 680 }
fkellermavnet 0:affdbb35faa4 681
fkellermavnet 0:affdbb35faa4 682 // Eventually this should try to reinstate the sockets open
fkellermavnet 0:affdbb35faa4 683 bool WncController::softwareInitMdm(void)
fkellermavnet 0:affdbb35faa4 684 {
fkellermavnet 0:affdbb35faa4 685 static bool reportStatus = true;
fkellermavnet 0:affdbb35faa4 686 unsigned i;
fkellermavnet 0:affdbb35faa4 687
fkellermavnet 0:affdbb35faa4 688 if (checkCellLink() == true) {
fkellermavnet 0:affdbb35faa4 689 if (reportStatus == false) {
fkellermavnet 0:affdbb35faa4 690 dbgPuts("Re-connected to cellular network!");
fkellermavnet 0:affdbb35faa4 691 reportStatus = true;
fkellermavnet 0:affdbb35faa4 692 }
fkellermavnet 0:affdbb35faa4 693
fkellermavnet 0:affdbb35faa4 694 // WNC has SIM and registered on network so
fkellermavnet 0:affdbb35faa4 695 // soft initialize the WNC.
fkellermavnet 0:affdbb35faa4 696 for (i = 0; i < WNC_SOFT_INIT_RETRY_COUNT; i++)
fkellermavnet 0:affdbb35faa4 697 if (at_init_wnc() == true)
fkellermavnet 0:affdbb35faa4 698 break;
fkellermavnet 0:affdbb35faa4 699
fkellermavnet 0:affdbb35faa4 700 // If it did not respond try a hardware init
fkellermavnet 0:affdbb35faa4 701 if (i == WNC_SOFT_INIT_RETRY_COUNT)
fkellermavnet 0:affdbb35faa4 702 {
fkellermavnet 0:affdbb35faa4 703 at_reinitialize_mdm();
fkellermavnet 0:affdbb35faa4 704 return (at_init_wnc(true)); // Hard reset occurred so make it go through the software init();
fkellermavnet 0:affdbb35faa4 705 }
fkellermavnet 0:affdbb35faa4 706 else
fkellermavnet 0:affdbb35faa4 707 return (true);
fkellermavnet 0:affdbb35faa4 708 }
fkellermavnet 0:affdbb35faa4 709 else
fkellermavnet 0:affdbb35faa4 710 {
fkellermavnet 0:affdbb35faa4 711 if (reportStatus == true) {
fkellermavnet 0:affdbb35faa4 712 dbgPuts("Not connected to cellular network!");
fkellermavnet 0:affdbb35faa4 713 reportStatus = false;
fkellermavnet 0:affdbb35faa4 714 }
fkellermavnet 0:affdbb35faa4 715 return (false);
fkellermavnet 0:affdbb35faa4 716 }
fkellermavnet 0:affdbb35faa4 717 }
fkellermavnet 0:affdbb35faa4 718
fkellermavnet 0:affdbb35faa4 719
fkellermavnet 0:affdbb35faa4 720 // Sets a global with failure or success, assumes 1 thread all the time
fkellermavnet 0:affdbb35faa4 721 WncController::AtCmdErr_e WncController::sendWncCmd(const char * const s, string ** r, int ms_timeout)
fkellermavnet 0:affdbb35faa4 722 {
fkellermavnet 0:affdbb35faa4 723 if (checkCellLink() == false) {
fkellermavnet 0:affdbb35faa4 724 static string noRespStr;
fkellermavnet 0:affdbb35faa4 725
fkellermavnet 0:affdbb35faa4 726 // Save some run-time!
fkellermavnet 0:affdbb35faa4 727 if (m_sDebugEnabled)
fkellermavnet 0:affdbb35faa4 728 {
fkellermavnet 0:affdbb35faa4 729 dbgPuts("FAIL send cmd: ", false);
fkellermavnet 0:affdbb35faa4 730 if (m_sMoreDebugEnabled && m_sDebugEnabled) {
fkellermavnet 0:affdbb35faa4 731 dbgPutsNoTime(s);
fkellermavnet 0:affdbb35faa4 732 }
fkellermavnet 0:affdbb35faa4 733 else {
fkellermavnet 0:affdbb35faa4 734 size_t n = strlen(s);
fkellermavnet 0:affdbb35faa4 735 if (n <= WNC_TRUNC_DEBUG_LENGTH) {
fkellermavnet 0:affdbb35faa4 736 dbgPutsNoTime(s);
fkellermavnet 0:affdbb35faa4 737 }
fkellermavnet 0:affdbb35faa4 738 else {
fkellermavnet 0:affdbb35faa4 739 string truncStr(s,WNC_TRUNC_DEBUG_LENGTH/2);
fkellermavnet 0:affdbb35faa4 740 truncStr += "..";
fkellermavnet 0:affdbb35faa4 741 truncStr += &s[n-(WNC_TRUNC_DEBUG_LENGTH/2)];
fkellermavnet 0:affdbb35faa4 742 dbgPutsNoTime(truncStr.c_str());
fkellermavnet 0:affdbb35faa4 743 }
fkellermavnet 0:affdbb35faa4 744 }
fkellermavnet 0:affdbb35faa4 745 }
fkellermavnet 0:affdbb35faa4 746
fkellermavnet 0:affdbb35faa4 747 noRespStr.erase();
fkellermavnet 0:affdbb35faa4 748 *r = &noRespStr;
fkellermavnet 0:affdbb35faa4 749
fkellermavnet 0:affdbb35faa4 750 return (WNC_AT_CMD_NO_CELL_LINK);
fkellermavnet 0:affdbb35faa4 751 }
fkellermavnet 0:affdbb35faa4 752
fkellermavnet 0:affdbb35faa4 753 if (m_sCheckNetStatus)
fkellermavnet 0:affdbb35faa4 754 {
fkellermavnet 0:affdbb35faa4 755 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 756 dbgPuts("[---------- Network Status -------------");
fkellermavnet 0:affdbb35faa4 757 string * pRespStr;
fkellermavnet 0:affdbb35faa4 758 at_send_wnc_cmd("AT@SOCKDIAL?", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 759 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 760 dbgPuts("---------------------------------------]");
fkellermavnet 0:affdbb35faa4 761 }
fkellermavnet 0:affdbb35faa4 762
fkellermavnet 0:affdbb35faa4 763 // If WNC ready, send user command
fkellermavnet 0:affdbb35faa4 764 return (at_send_wnc_cmd(s, r, ms_timeout));
fkellermavnet 0:affdbb35faa4 765 }
fkellermavnet 0:affdbb35faa4 766
fkellermavnet 0:affdbb35faa4 767 WncController::AtCmdErr_e WncController::at_send_wnc_cmd(const char * s, string ** r, int ms_timeout)
fkellermavnet 0:affdbb35faa4 768 {
fkellermavnet 0:affdbb35faa4 769 // Save some run-time!
fkellermavnet 0:affdbb35faa4 770 if (m_sDebugEnabled)
fkellermavnet 0:affdbb35faa4 771 {
fkellermavnet 0:affdbb35faa4 772 if (m_sMoreDebugEnabled) {
fkellermavnet 0:affdbb35faa4 773 dbgPuts("TX: ", false); dbgPutsNoTime(s);
fkellermavnet 0:affdbb35faa4 774 }
fkellermavnet 0:affdbb35faa4 775 else {
fkellermavnet 0:affdbb35faa4 776 if (m_sDebugEnabled) { // Save some run-time!
fkellermavnet 0:affdbb35faa4 777 size_t n = strlen(s);
fkellermavnet 0:affdbb35faa4 778 if (n <= WNC_TRUNC_DEBUG_LENGTH) {
fkellermavnet 0:affdbb35faa4 779 dbgPuts("TX: ", false); dbgPutsNoTime(s);
fkellermavnet 0:affdbb35faa4 780 }
fkellermavnet 0:affdbb35faa4 781 else {
fkellermavnet 0:affdbb35faa4 782 string truncStr(s,WNC_TRUNC_DEBUG_LENGTH/2);
fkellermavnet 0:affdbb35faa4 783 truncStr += "..";
fkellermavnet 0:affdbb35faa4 784 truncStr += &s[n - (WNC_TRUNC_DEBUG_LENGTH/2)];
fkellermavnet 0:affdbb35faa4 785 dbgPuts("TX: ", false); dbgPutsNoTime(truncStr.c_str());
fkellermavnet 0:affdbb35faa4 786 }
fkellermavnet 0:affdbb35faa4 787 }
fkellermavnet 0:affdbb35faa4 788 }
fkellermavnet 0:affdbb35faa4 789 }
fkellermavnet 0:affdbb35faa4 790
fkellermavnet 0:affdbb35faa4 791 AtCmdErr_e atResult = mdmSendAtCmdRsp(s, ms_timeout, &m_sWncStr);
fkellermavnet 0:affdbb35faa4 792 *r = &m_sWncStr; // Return a pointer to the static string
fkellermavnet 0:affdbb35faa4 793
fkellermavnet 0:affdbb35faa4 794 if (atResult != WNC_AT_CMD_TIMEOUT) {
fkellermavnet 0:affdbb35faa4 795 // Save some run-time!
fkellermavnet 0:affdbb35faa4 796 if (m_sDebugEnabled)
fkellermavnet 0:affdbb35faa4 797 {
fkellermavnet 0:affdbb35faa4 798 dbgPuts("RX: ", false);
fkellermavnet 0:affdbb35faa4 799 if (m_sMoreDebugEnabled) {
fkellermavnet 0:affdbb35faa4 800 dbgPutsNoTime(m_sWncStr.c_str());
fkellermavnet 0:affdbb35faa4 801 }
fkellermavnet 0:affdbb35faa4 802 else {
fkellermavnet 0:affdbb35faa4 803 if (m_sWncStr.size() <= WNC_TRUNC_DEBUG_LENGTH) {
fkellermavnet 0:affdbb35faa4 804 dbgPutsNoTime(m_sWncStr.c_str());
fkellermavnet 0:affdbb35faa4 805 }
fkellermavnet 0:affdbb35faa4 806 else {
fkellermavnet 0:affdbb35faa4 807 string truncStr = m_sWncStr.substr(0,WNC_TRUNC_DEBUG_LENGTH/2) + "..";
fkellermavnet 0:affdbb35faa4 808 truncStr += m_sWncStr.substr(m_sWncStr.size() - (WNC_TRUNC_DEBUG_LENGTH/2), WNC_TRUNC_DEBUG_LENGTH/2);
fkellermavnet 0:affdbb35faa4 809 dbgPutsNoTime(truncStr.c_str());
fkellermavnet 0:affdbb35faa4 810 }
fkellermavnet 0:affdbb35faa4 811 }
fkellermavnet 0:affdbb35faa4 812 }
fkellermavnet 0:affdbb35faa4 813 }
fkellermavnet 0:affdbb35faa4 814 else {
fkellermavnet 0:affdbb35faa4 815 dbgPuts("AT Cmd TIMEOUT!");
fkellermavnet 0:affdbb35faa4 816 dbgPuts("RX: ", false); dbgPutsNoTime(m_sWncStr.c_str());
fkellermavnet 0:affdbb35faa4 817 }
fkellermavnet 0:affdbb35faa4 818
fkellermavnet 0:affdbb35faa4 819 return (atResult);
fkellermavnet 0:affdbb35faa4 820 }
fkellermavnet 0:affdbb35faa4 821
fkellermavnet 0:affdbb35faa4 822 void WncController::closeOpenSocket(uint16_t numSock)
fkellermavnet 0:affdbb35faa4 823 {
fkellermavnet 0:affdbb35faa4 824 // Try to open and close the socket
fkellermavnet 0:affdbb35faa4 825 do {
fkellermavnet 0:affdbb35faa4 826 dbgPuts("Try to close and re-open socket");
fkellermavnet 10:2ec59906a24e 827 at_sockclose_wnc(m_sSock[numSock].numWncSock);
fkellermavnet 10:2ec59906a24e 828
fkellermavnet 10:2ec59906a24e 829 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 830 m_sSock[numSock].numWncSock = numWncSock;
fkellermavnet 10:2ec59906a24e 831 if (numWncSock > 0 && numWncSock <= MAX_NUM_WNC_SOCKETS)
fkellermavnet 10:2ec59906a24e 832 m_sSock[numSock].open = true;
fkellermavnet 10:2ec59906a24e 833 else
fkellermavnet 10:2ec59906a24e 834 m_sSock[numSock].open = false;
fkellermavnet 10:2ec59906a24e 835
fkellermavnet 0:affdbb35faa4 836 if (m_sSock[numSock].open == false)
fkellermavnet 0:affdbb35faa4 837 dbgPuts("Failed to re-open socket!");
fkellermavnet 0:affdbb35faa4 838 } while (m_sSock[numSock].open == false);
fkellermavnet 0:affdbb35faa4 839 }
fkellermavnet 0:affdbb35faa4 840
fkellermavnet 0:affdbb35faa4 841 bool WncController::sendSMSText(const char * const phoneNum, const char * const text)
fkellermavnet 0:affdbb35faa4 842 {
fkellermavnet 0:affdbb35faa4 843 if (at_sendSMStext_wnc(phoneNum, text) == true)
fkellermavnet 0:affdbb35faa4 844 return (true);
fkellermavnet 0:affdbb35faa4 845 else {
fkellermavnet 0:affdbb35faa4 846 dbgPuts("sendSMSText: Failed!");
fkellermavnet 0:affdbb35faa4 847 return (false);
fkellermavnet 0:affdbb35faa4 848 }
fkellermavnet 0:affdbb35faa4 849 }
fkellermavnet 0:affdbb35faa4 850
fkellermavnet 0:affdbb35faa4 851 size_t WncController::readSMSLog(const char ** log)
fkellermavnet 0:affdbb35faa4 852 {
fkellermavnet 0:affdbb35faa4 853 size_t n;
fkellermavnet 0:affdbb35faa4 854
fkellermavnet 0:affdbb35faa4 855 n = at_readSMSlog_wnc(log);
fkellermavnet 0:affdbb35faa4 856 if (n == 0)
fkellermavnet 0:affdbb35faa4 857 dbgPuts("readSMSLog: Failed!");
fkellermavnet 0:affdbb35faa4 858
fkellermavnet 0:affdbb35faa4 859 return (n);
fkellermavnet 0:affdbb35faa4 860 }
fkellermavnet 0:affdbb35faa4 861
fkellermavnet 0:affdbb35faa4 862 size_t WncController::getSignalQuality(const char ** log)
fkellermavnet 0:affdbb35faa4 863 {
fkellermavnet 0:affdbb35faa4 864 size_t n;
fkellermavnet 0:affdbb35faa4 865
fkellermavnet 0:affdbb35faa4 866 n = at_getSignalQuality_wnc(log);
fkellermavnet 0:affdbb35faa4 867 if (n == 0)
fkellermavnet 0:affdbb35faa4 868 dbgPuts("readSMSText: Failed!");
fkellermavnet 0:affdbb35faa4 869
fkellermavnet 0:affdbb35faa4 870 return (n);
fkellermavnet 0:affdbb35faa4 871 }
fkellermavnet 0:affdbb35faa4 872
fkellermavnet 0:affdbb35faa4 873 size_t WncController::at_getSignalQuality_wnc(const char ** log)
fkellermavnet 0:affdbb35faa4 874 {
fkellermavnet 0:affdbb35faa4 875 string * pRespStr;
fkellermavnet 0:affdbb35faa4 876 static string logStr;
fkellermavnet 0:affdbb35faa4 877
fkellermavnet 0:affdbb35faa4 878 logStr.erase();
fkellermavnet 0:affdbb35faa4 879
fkellermavnet 0:affdbb35faa4 880 if (at_send_wnc_cmd("AT%MEAS=\"0\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 881 logStr = *pRespStr;
fkellermavnet 0:affdbb35faa4 882 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 883 }
fkellermavnet 0:affdbb35faa4 884 else
fkellermavnet 0:affdbb35faa4 885 dbgPuts("AT%MEAS=0: failed!");
fkellermavnet 0:affdbb35faa4 886
fkellermavnet 0:affdbb35faa4 887 if (at_send_wnc_cmd("AT%MEAS=\"1\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 888 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 889 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 890 }
fkellermavnet 0:affdbb35faa4 891 else
fkellermavnet 0:affdbb35faa4 892 dbgPuts("AT%MEAS=1: failed!");
fkellermavnet 0:affdbb35faa4 893
fkellermavnet 0:affdbb35faa4 894 if (at_send_wnc_cmd("AT%MEAS=\"2\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 895 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 896 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 897 }
fkellermavnet 0:affdbb35faa4 898 else
fkellermavnet 0:affdbb35faa4 899 dbgPuts("AT%MEAS=2: failed!");
fkellermavnet 0:affdbb35faa4 900
fkellermavnet 0:affdbb35faa4 901 if (at_send_wnc_cmd("AT%MEAS=\"3\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 902 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 903 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 904 }
fkellermavnet 0:affdbb35faa4 905 else
fkellermavnet 0:affdbb35faa4 906 dbgPuts("AT%MEAS=3: failed!");
fkellermavnet 0:affdbb35faa4 907
fkellermavnet 0:affdbb35faa4 908 if (at_send_wnc_cmd("AT%MEAS=\"4\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 909 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 910 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 911 }
fkellermavnet 0:affdbb35faa4 912 else
fkellermavnet 0:affdbb35faa4 913 dbgPuts("AT%MEAS=4: failed!");
fkellermavnet 0:affdbb35faa4 914
fkellermavnet 0:affdbb35faa4 915 if (at_send_wnc_cmd("AT%MEAS=\"5\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 916 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 917 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 918 }
fkellermavnet 0:affdbb35faa4 919 else
fkellermavnet 0:affdbb35faa4 920 dbgPuts("AT%MEAS=5: failed!");
fkellermavnet 0:affdbb35faa4 921
fkellermavnet 0:affdbb35faa4 922 if (at_send_wnc_cmd("AT%MEAS=\"8\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 923 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 924 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 925 }
fkellermavnet 0:affdbb35faa4 926 else
fkellermavnet 0:affdbb35faa4 927 dbgPuts("AT%MEAS=8: failed!");
fkellermavnet 0:affdbb35faa4 928
fkellermavnet 0:affdbb35faa4 929 if (at_send_wnc_cmd("AT%MEAS=\"98\"", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 930 logStr += *pRespStr;
fkellermavnet 0:affdbb35faa4 931 logStr += "\r\n";
fkellermavnet 0:affdbb35faa4 932 }
fkellermavnet 0:affdbb35faa4 933 else
fkellermavnet 0:affdbb35faa4 934 dbgPuts("AT%MEAS=98: failed!");
fkellermavnet 0:affdbb35faa4 935
fkellermavnet 0:affdbb35faa4 936 *log = logStr.c_str();
fkellermavnet 0:affdbb35faa4 937
fkellermavnet 0:affdbb35faa4 938 return (logStr.size());
fkellermavnet 0:affdbb35faa4 939 }
fkellermavnet 0:affdbb35faa4 940
fkellermavnet 0:affdbb35faa4 941 bool WncController::getTimeDate(struct WncDateTime * tod)
fkellermavnet 0:affdbb35faa4 942 {
fkellermavnet 0:affdbb35faa4 943 if (at_gettimedate_wnc(tod) == true)
fkellermavnet 0:affdbb35faa4 944 return (true);
fkellermavnet 0:affdbb35faa4 945 else {
fkellermavnet 0:affdbb35faa4 946 dbgPuts("Get time date failed!");
fkellermavnet 0:affdbb35faa4 947 return (false);
fkellermavnet 0:affdbb35faa4 948 }
fkellermavnet 0:affdbb35faa4 949 }
fkellermavnet 0:affdbb35faa4 950
fkellermavnet 0:affdbb35faa4 951 bool WncController::at_ping_wnc(const char * ip)
fkellermavnet 0:affdbb35faa4 952 {
fkellermavnet 0:affdbb35faa4 953 string * pRespStr;
fkellermavnet 0:affdbb35faa4 954 string cmdStr = "AT@PINGREQ=\"";
fkellermavnet 0:affdbb35faa4 955 cmdStr += ip;
fkellermavnet 0:affdbb35faa4 956 cmdStr += "\"";
fkellermavnet 0:affdbb35faa4 957 return (at_send_wnc_cmd(cmdStr.c_str(), &pRespStr, WNC_PING_CMD_TIMEOUT_MS) == WNC_AT_CMD_OK);
fkellermavnet 0:affdbb35faa4 958 }
fkellermavnet 0:affdbb35faa4 959
fkellermavnet 0:affdbb35faa4 960 bool WncController::at_gettimedate_wnc(struct WncDateTime * tod)
fkellermavnet 0:affdbb35faa4 961 {
fkellermavnet 0:affdbb35faa4 962 string * pRespStr;
fkellermavnet 0:affdbb35faa4 963 char * pEnd;
fkellermavnet 0:affdbb35faa4 964
fkellermavnet 0:affdbb35faa4 965 if (at_send_wnc_cmd("AT+CCLK?", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 966 if (pRespStr->size() > 0) {
fkellermavnet 0:affdbb35faa4 967 size_t pos1 = pRespStr->find("+CCLK:");
fkellermavnet 0:affdbb35faa4 968 if (pos1 != string::npos) {
fkellermavnet 0:affdbb35faa4 969 pEnd = (char *)pRespStr->c_str() + pos1 + 8;
fkellermavnet 0:affdbb35faa4 970 tod->year = strtol(pEnd, &pEnd, 10);
fkellermavnet 0:affdbb35faa4 971 tod->month = strtol(pEnd+1, &pEnd, 10);
fkellermavnet 0:affdbb35faa4 972 tod->day = strtol(pEnd+1, &pEnd, 10);
fkellermavnet 0:affdbb35faa4 973 tod->hour = strtol(pEnd+1, &pEnd, 10);
fkellermavnet 0:affdbb35faa4 974 tod->min = strtol(pEnd+1, &pEnd, 10);
fkellermavnet 0:affdbb35faa4 975 tod->sec = strtol(pEnd+1, &pEnd, 10);
fkellermavnet 0:affdbb35faa4 976 return (true);
fkellermavnet 0:affdbb35faa4 977 }
fkellermavnet 0:affdbb35faa4 978 }
fkellermavnet 0:affdbb35faa4 979 }
fkellermavnet 0:affdbb35faa4 980
fkellermavnet 0:affdbb35faa4 981 return (false);
fkellermavnet 0:affdbb35faa4 982 }
fkellermavnet 0:affdbb35faa4 983
fkellermavnet 6:a656e820d7ff 984 size_t WncController::readSMSText(const char n, const char ** msg)
fkellermavnet 0:affdbb35faa4 985 {
fkellermavnet 6:a656e820d7ff 986 size_t i;
fkellermavnet 0:affdbb35faa4 987
fkellermavnet 6:a656e820d7ff 988 i = at_readSMStext_wnc(n,msg);
fkellermavnet 6:a656e820d7ff 989 if (i == 0)
fkellermavnet 0:affdbb35faa4 990 dbgPuts("readSMSText: Failed!");
fkellermavnet 0:affdbb35faa4 991
fkellermavnet 0:affdbb35faa4 992 return (n);
fkellermavnet 0:affdbb35faa4 993 }
fkellermavnet 0:affdbb35faa4 994
fkellermavnet 0:affdbb35faa4 995 bool WncController::at_get_wnc_net_stats(WncIpStats * s)
fkellermavnet 0:affdbb35faa4 996 {
fkellermavnet 0:affdbb35faa4 997 string * pRespStr;
fkellermavnet 0:affdbb35faa4 998 AtCmdErr_e cmdRes = at_send_wnc_cmd("AT+CGCONTRDP=1", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 999
fkellermavnet 0:affdbb35faa4 1000 if (WNC_AT_CMD_OK == cmdRes) {
fkellermavnet 0:affdbb35faa4 1001 if (pRespStr->size() > 0) {
fkellermavnet 0:affdbb35faa4 1002 memset((void*)s, '\0', sizeof(*s)); // Clean-up
fkellermavnet 0:affdbb35faa4 1003 string ss;
fkellermavnet 0:affdbb35faa4 1004 unsigned i;
fkellermavnet 0:affdbb35faa4 1005 size_t pe;
fkellermavnet 0:affdbb35faa4 1006 size_t ps = pRespStr->rfind("\"");
fkellermavnet 0:affdbb35faa4 1007 if (ps != string::npos) {
fkellermavnet 0:affdbb35faa4 1008 ps += 2; // Skip the , after the "
fkellermavnet 0:affdbb35faa4 1009 pe = ps;
fkellermavnet 0:affdbb35faa4 1010 for(i=0;i<4;i++)
fkellermavnet 0:affdbb35faa4 1011 pe = pRespStr->find(".", pe) + 1;
fkellermavnet 0:affdbb35faa4 1012 ss = pRespStr->substr(ps, pe - 1 - ps);
fkellermavnet 0:affdbb35faa4 1013 strncpy(s->ip, ss.c_str(), MAX_LEN_IP_STR);
fkellermavnet 0:affdbb35faa4 1014 s->ip[MAX_LEN_IP_STR - 1] = '\0';
fkellermavnet 0:affdbb35faa4 1015 ps = pe;
fkellermavnet 0:affdbb35faa4 1016 for(i=0;i<3;i++)
fkellermavnet 0:affdbb35faa4 1017 pe = pRespStr->find(".", pe) + 1;
fkellermavnet 0:affdbb35faa4 1018 pe = pRespStr->find(",", pe);
fkellermavnet 0:affdbb35faa4 1019 ss = pRespStr->substr(ps, pe - ps);
fkellermavnet 0:affdbb35faa4 1020 strncpy(s->mask, ss.c_str(), MAX_LEN_IP_STR);
fkellermavnet 0:affdbb35faa4 1021 s->mask[MAX_LEN_IP_STR - 1] = '\0';
fkellermavnet 0:affdbb35faa4 1022 ps = pe + 1;
fkellermavnet 0:affdbb35faa4 1023 for(i=0;i<3;i++)
fkellermavnet 0:affdbb35faa4 1024 pe = pRespStr->find(".", pe) + 1;
fkellermavnet 0:affdbb35faa4 1025 pe = pRespStr->find(",", pe);
fkellermavnet 0:affdbb35faa4 1026 ss = pRespStr->substr(ps, pe - ps);
fkellermavnet 0:affdbb35faa4 1027 strncpy(s->gateway, ss.c_str(), MAX_LEN_IP_STR);
fkellermavnet 0:affdbb35faa4 1028 s->gateway[MAX_LEN_IP_STR - 1] = '\0';
fkellermavnet 0:affdbb35faa4 1029 ps = pe + 1;
fkellermavnet 0:affdbb35faa4 1030 for(i=0;i<3;i++)
fkellermavnet 0:affdbb35faa4 1031 pe = pRespStr->find(".", pe) + 1;
fkellermavnet 0:affdbb35faa4 1032 pe = pRespStr->find(",", pe);
fkellermavnet 0:affdbb35faa4 1033 ss = pRespStr->substr(ps, pe - ps);
fkellermavnet 0:affdbb35faa4 1034 strncpy(s->dnsPrimary, ss.c_str(), MAX_LEN_IP_STR);
fkellermavnet 0:affdbb35faa4 1035 s->dnsPrimary[MAX_LEN_IP_STR - 1] = '\0';
fkellermavnet 0:affdbb35faa4 1036 ps = pe + 1;
fkellermavnet 0:affdbb35faa4 1037 for(i=0;i<3;i++)
fkellermavnet 0:affdbb35faa4 1038 pe = pRespStr->find(".", pe) + 1;
fkellermavnet 0:affdbb35faa4 1039 pe = pRespStr->find(",", pe);
fkellermavnet 0:affdbb35faa4 1040 ss = pRespStr->substr(ps, pe - ps);
fkellermavnet 0:affdbb35faa4 1041 strncpy(s->dnsSecondary, ss.c_str(), MAX_LEN_IP_STR);
fkellermavnet 0:affdbb35faa4 1042 s->dnsSecondary[MAX_LEN_IP_STR - 1] = '\0';
fkellermavnet 0:affdbb35faa4 1043
fkellermavnet 0:affdbb35faa4 1044 dbgPuts("~~~~~~~~~~ WNC IP Stats ~~~~~~~~~~~~");
fkellermavnet 0:affdbb35faa4 1045 dbgPuts("ip: ", false); dbgPutsNoTime(s->ip);
fkellermavnet 0:affdbb35faa4 1046 dbgPuts("mask: ", false); dbgPutsNoTime(s->mask);
fkellermavnet 0:affdbb35faa4 1047 dbgPuts("gateway: ", false); dbgPutsNoTime(s->gateway);
fkellermavnet 0:affdbb35faa4 1048 dbgPuts("dns pri: ", false); dbgPutsNoTime(s->dnsPrimary);
fkellermavnet 0:affdbb35faa4 1049 dbgPuts("dns sec: ", false); dbgPutsNoTime(s->dnsSecondary);
fkellermavnet 0:affdbb35faa4 1050 dbgPuts("~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~");
fkellermavnet 0:affdbb35faa4 1051
fkellermavnet 0:affdbb35faa4 1052 return (true);
fkellermavnet 0:affdbb35faa4 1053 }
fkellermavnet 0:affdbb35faa4 1054 }
fkellermavnet 0:affdbb35faa4 1055 }
fkellermavnet 0:affdbb35faa4 1056
fkellermavnet 0:affdbb35faa4 1057 return (false);
fkellermavnet 0:affdbb35faa4 1058 }
fkellermavnet 0:affdbb35faa4 1059
fkellermavnet 0:affdbb35faa4 1060 bool WncController::deleteSMSTextFromMem(char msgIdx)
fkellermavnet 0:affdbb35faa4 1061 {
fkellermavnet 0:affdbb35faa4 1062 const char * err = "deleteSMSTextFromMem: Failed!";
fkellermavnet 0:affdbb35faa4 1063
fkellermavnet 0:affdbb35faa4 1064 switch (msgIdx)
fkellermavnet 0:affdbb35faa4 1065 {
fkellermavnet 0:affdbb35faa4 1066 case '*':
fkellermavnet 0:affdbb35faa4 1067 at_deleteSMSTextFromMem_wnc('1');
fkellermavnet 0:affdbb35faa4 1068 at_deleteSMSTextFromMem_wnc('2');
fkellermavnet 0:affdbb35faa4 1069 at_deleteSMSTextFromMem_wnc('3');
fkellermavnet 0:affdbb35faa4 1070 return (true); // WNC may error if slot empty, just ignore!
fkellermavnet 0:affdbb35faa4 1071
fkellermavnet 0:affdbb35faa4 1072 case '1':
fkellermavnet 0:affdbb35faa4 1073 case '2':
fkellermavnet 0:affdbb35faa4 1074 case '3':
fkellermavnet 0:affdbb35faa4 1075 if (true == at_deleteSMSTextFromMem_wnc(msgIdx))
fkellermavnet 0:affdbb35faa4 1076 return (true);
fkellermavnet 0:affdbb35faa4 1077 else {
fkellermavnet 0:affdbb35faa4 1078 dbgPuts(err);
fkellermavnet 0:affdbb35faa4 1079 return (false);
fkellermavnet 0:affdbb35faa4 1080 }
fkellermavnet 0:affdbb35faa4 1081
fkellermavnet 0:affdbb35faa4 1082 default:
fkellermavnet 0:affdbb35faa4 1083 dbgPuts(err);
fkellermavnet 0:affdbb35faa4 1084 return (false);
fkellermavnet 0:affdbb35faa4 1085 }
fkellermavnet 0:affdbb35faa4 1086 }
fkellermavnet 0:affdbb35faa4 1087
fkellermavnet 0:affdbb35faa4 1088 bool WncController::sendSMSTextFromMem(char msgIdx)
fkellermavnet 0:affdbb35faa4 1089 {
fkellermavnet 0:affdbb35faa4 1090 const char * err = "deleteSMSTextFromMem: Failed!";
fkellermavnet 0:affdbb35faa4 1091
fkellermavnet 0:affdbb35faa4 1092 switch (msgIdx)
fkellermavnet 0:affdbb35faa4 1093 {
fkellermavnet 0:affdbb35faa4 1094 case '*':
fkellermavnet 0:affdbb35faa4 1095 at_sendSMStextMem_wnc('1');
fkellermavnet 0:affdbb35faa4 1096 at_sendSMStextMem_wnc('2');
fkellermavnet 0:affdbb35faa4 1097 at_sendSMStextMem_wnc('3');
fkellermavnet 0:affdbb35faa4 1098 return (true); // WNC may error if slot is empty, just ignore!
fkellermavnet 0:affdbb35faa4 1099
fkellermavnet 0:affdbb35faa4 1100 case '1':
fkellermavnet 0:affdbb35faa4 1101 case '2':
fkellermavnet 0:affdbb35faa4 1102 case '3':
fkellermavnet 0:affdbb35faa4 1103 if (at_sendSMStextMem_wnc(msgIdx) == true)
fkellermavnet 0:affdbb35faa4 1104 return (true);
fkellermavnet 0:affdbb35faa4 1105 else {
fkellermavnet 0:affdbb35faa4 1106 dbgPuts(err);
fkellermavnet 0:affdbb35faa4 1107 return (false);
fkellermavnet 0:affdbb35faa4 1108 }
fkellermavnet 0:affdbb35faa4 1109
fkellermavnet 0:affdbb35faa4 1110 default:
fkellermavnet 0:affdbb35faa4 1111 dbgPuts(err);
fkellermavnet 0:affdbb35faa4 1112 return (false);
fkellermavnet 0:affdbb35faa4 1113 }
fkellermavnet 0:affdbb35faa4 1114 }
fkellermavnet 0:affdbb35faa4 1115
fkellermavnet 0:affdbb35faa4 1116 bool WncController::at_deleteSMSTextFromMem_wnc(char n)
fkellermavnet 0:affdbb35faa4 1117 {
fkellermavnet 0:affdbb35faa4 1118 string cmdStr, respStr;
fkellermavnet 0:affdbb35faa4 1119 // Message is stored in WNC, now send it!
fkellermavnet 0:affdbb35faa4 1120 cmdStr = "AT+CMGD=";
fkellermavnet 0:affdbb35faa4 1121 cmdStr += n;
fkellermavnet 0:affdbb35faa4 1122 cmdStr += "\r\n";
fkellermavnet 0:affdbb35faa4 1123 dbgPuts("TX: ", false); dbgPutsNoTime(cmdStr.c_str(), false);
fkellermavnet 0:affdbb35faa4 1124 AtCmdErr_e r = mdmSendAtCmdRsp(cmdStr.c_str(), m_sCmdTimeoutMs, &respStr);
fkellermavnet 0:affdbb35faa4 1125 dbgPuts("RX: ", false); dbgPutsNoTime(respStr.c_str());
fkellermavnet 0:affdbb35faa4 1126 return (r == WNC_AT_CMD_OK);
fkellermavnet 0:affdbb35faa4 1127 }
fkellermavnet 0:affdbb35faa4 1128
fkellermavnet 0:affdbb35faa4 1129 bool WncController::at_sendSMStextMem_wnc(char n)
fkellermavnet 0:affdbb35faa4 1130 {
fkellermavnet 0:affdbb35faa4 1131 string cmdStr, respStr;
fkellermavnet 0:affdbb35faa4 1132 // Message is stored in WNC, now send it!
fkellermavnet 0:affdbb35faa4 1133 cmdStr = "AT+CMSS=";
fkellermavnet 0:affdbb35faa4 1134 cmdStr += n;
fkellermavnet 0:affdbb35faa4 1135 cmdStr += "\r\n";
fkellermavnet 0:affdbb35faa4 1136 dbgPuts("TX: ", false); dbgPutsNoTime(cmdStr.c_str(), false);
fkellermavnet 0:affdbb35faa4 1137 AtCmdErr_e r = mdmSendAtCmdRsp(cmdStr.c_str(), m_sCmdTimeoutMs, &respStr);
fkellermavnet 0:affdbb35faa4 1138 dbgPuts("RX: ", false); dbgPutsNoTime(respStr.c_str());
fkellermavnet 0:affdbb35faa4 1139 return (r == WNC_AT_CMD_OK);
fkellermavnet 0:affdbb35faa4 1140 }
fkellermavnet 0:affdbb35faa4 1141
fkellermavnet 0:affdbb35faa4 1142 bool WncController::at_sendSMStext_wnc(const char * const phoneNum, const char * const text)
fkellermavnet 0:affdbb35faa4 1143 {
fkellermavnet 0:affdbb35faa4 1144 string respStr;
fkellermavnet 0:affdbb35faa4 1145 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1146 size_t l = strlen(text);
fkellermavnet 0:affdbb35faa4 1147
fkellermavnet 0:affdbb35faa4 1148 if (l <= MAX_WNC_SMS_LENGTH)
fkellermavnet 0:affdbb35faa4 1149 {
fkellermavnet 0:affdbb35faa4 1150 // Check to see if the SMS service is available
fkellermavnet 0:affdbb35faa4 1151 checkCellLink();
fkellermavnet 0:affdbb35faa4 1152 if (m_sReadyForSMS == true) {
fkellermavnet 0:affdbb35faa4 1153 at_send_wnc_cmd("AT+CMGF=1", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1154 string cmdStr("AT+CMGS=\"");
fkellermavnet 0:affdbb35faa4 1155 cmdStr += phoneNum;
fkellermavnet 0:affdbb35faa4 1156 cmdStr += "\"";
fkellermavnet 0:affdbb35faa4 1157 dbgPuts("TX: ", false); dbgPutsNoTime(cmdStr.c_str());
fkellermavnet 0:affdbb35faa4 1158 cmdStr += "\x0d"; // x0d = <ENTER>
fkellermavnet 0:affdbb35faa4 1159 // Send raw command with short timeout (the timeout will fail cause the WNC is not supposed to reply yet!
fkellermavnet 0:affdbb35faa4 1160 // And we want a delay before sending the actual text part of the string!
fkellermavnet 0:affdbb35faa4 1161 mdmSendAtCmdRsp(cmdStr.c_str(), 300, &respStr, false); // False turns off auto-addition of CR+LF (the WNC wants nothing here)
fkellermavnet 0:affdbb35faa4 1162 dbgPuts("RX: ", false); dbgPutsNoTime(respStr.c_str());
fkellermavnet 0:affdbb35faa4 1163 if ((respStr.size() > 0) && (respStr.find("ERROR") == string::npos)) {
fkellermavnet 0:affdbb35faa4 1164 // Part 2 of the text, this is the actual text part:
fkellermavnet 0:affdbb35faa4 1165 cmdStr = text;
fkellermavnet 11:3ff6c1cb5b03 1166 dbgPuts("TX: ", false); dbgPutsNoTime(cmdStr.c_str());
fkellermavnet 0:affdbb35faa4 1167 cmdStr += "\x1A"; // <CTRL>-Z is what tells the WNC the message is complete to send!
fkellermavnet 0:affdbb35faa4 1168 AtCmdErr_e r = mdmSendAtCmdRsp(cmdStr.c_str(), 10000, &respStr);
fkellermavnet 11:3ff6c1cb5b03 1169 dbgPuts("RX: ", false); dbgPutsNoTime(respStr.c_str());
fkellermavnet 0:affdbb35faa4 1170 if (respStr.size() == 0)
fkellermavnet 0:affdbb35faa4 1171 return (false);
fkellermavnet 0:affdbb35faa4 1172 else
fkellermavnet 0:affdbb35faa4 1173 return (r == WNC_AT_CMD_OK);
fkellermavnet 0:affdbb35faa4 1174 }
fkellermavnet 0:affdbb35faa4 1175 }
fkellermavnet 0:affdbb35faa4 1176 }
fkellermavnet 0:affdbb35faa4 1177
fkellermavnet 0:affdbb35faa4 1178 return (false);
fkellermavnet 0:affdbb35faa4 1179 }
fkellermavnet 0:affdbb35faa4 1180
fkellermavnet 0:affdbb35faa4 1181 bool WncController::saveSMSText(const char * const phoneNum, const char * const text, char * msgIdx)
fkellermavnet 0:affdbb35faa4 1182 {
fkellermavnet 0:affdbb35faa4 1183 if (at_saveSMStext_wnc(phoneNum, text, msgIdx) == true)
fkellermavnet 0:affdbb35faa4 1184 return (true);
fkellermavnet 0:affdbb35faa4 1185 else {
fkellermavnet 0:affdbb35faa4 1186 dbgPuts("saveSMSTextToMem: failed!\r\n");
fkellermavnet 0:affdbb35faa4 1187 return (false);
fkellermavnet 0:affdbb35faa4 1188 }
fkellermavnet 0:affdbb35faa4 1189 }
fkellermavnet 0:affdbb35faa4 1190
fkellermavnet 0:affdbb35faa4 1191 bool WncController::at_saveSMStext_wnc(const char * const phoneNum, const char * const text, char * msgIdx)
fkellermavnet 0:affdbb35faa4 1192 {
fkellermavnet 0:affdbb35faa4 1193 string respStr;
fkellermavnet 0:affdbb35faa4 1194 size_t l = strlen(text);
fkellermavnet 0:affdbb35faa4 1195
fkellermavnet 0:affdbb35faa4 1196 if (l <= MAX_WNC_SMS_LENGTH)
fkellermavnet 0:affdbb35faa4 1197 {
fkellermavnet 0:affdbb35faa4 1198 // Check to see if the SMS service is available
fkellermavnet 0:affdbb35faa4 1199 checkCellLink();
fkellermavnet 0:affdbb35faa4 1200 if (m_sReadyForSMS == true) {
fkellermavnet 0:affdbb35faa4 1201 string cmdStr("AT+CMGW=\"");
fkellermavnet 0:affdbb35faa4 1202 cmdStr += phoneNum;
fkellermavnet 0:affdbb35faa4 1203 cmdStr += "\"";
fkellermavnet 0:affdbb35faa4 1204 dbgPuts("TX: ", false); dbgPutsNoTime(cmdStr.c_str());
fkellermavnet 0:affdbb35faa4 1205 cmdStr += "\x0d"; // x0d = <ENTER>
fkellermavnet 0:affdbb35faa4 1206 // Send raw command with short timeout (the timeout will fail cause the WNC is not supposed to reply yet!
fkellermavnet 0:affdbb35faa4 1207 // And we want a delay before sending the actual text part of the string!
fkellermavnet 0:affdbb35faa4 1208 mdmSendAtCmdRsp(cmdStr.c_str(), 300, &respStr, false); // False turns off auto-addition of CR+LF (the WNC wants nothing here)
fkellermavnet 0:affdbb35faa4 1209 dbgPuts("RX: ", false); dbgPutsNoTime(respStr.c_str());
fkellermavnet 0:affdbb35faa4 1210 if ((respStr.size() > 0) && (respStr.find("ERROR") == string::npos)) {
fkellermavnet 0:affdbb35faa4 1211 // Part 2 of the text, this is the actual text part:
fkellermavnet 0:affdbb35faa4 1212 cmdStr = text;
fkellermavnet 0:affdbb35faa4 1213 dbgPuts("TX: ", false); dbgPutsNoTime(cmdStr.c_str());
fkellermavnet 0:affdbb35faa4 1214 cmdStr += "\x1A"; // <CTRL>-Z is what tells the WNC the message is complete to save!
fkellermavnet 0:affdbb35faa4 1215 AtCmdErr_e r = mdmSendAtCmdRsp(cmdStr.c_str(), 10000, &respStr);
fkellermavnet 0:affdbb35faa4 1216 dbgPuts("RX: ", false); dbgPutsNoTime(respStr.c_str());
fkellermavnet 0:affdbb35faa4 1217 if (respStr.size() > 0) {
fkellermavnet 0:affdbb35faa4 1218 // respStr will have the SMS index
fkellermavnet 0:affdbb35faa4 1219 size_t pos1 = respStr.find("+CMGW: ");
fkellermavnet 0:affdbb35faa4 1220 size_t pos2 = respStr.rfind("OK");
fkellermavnet 0:affdbb35faa4 1221 if (pos1 != string::npos && pos2 != string::npos) {
fkellermavnet 0:affdbb35faa4 1222 *msgIdx = *string(respStr.substr(pos1+7, 1)).c_str();
fkellermavnet 0:affdbb35faa4 1223 return (true);
fkellermavnet 0:affdbb35faa4 1224 }
fkellermavnet 0:affdbb35faa4 1225 else {
fkellermavnet 0:affdbb35faa4 1226 *msgIdx = '!';
fkellermavnet 0:affdbb35faa4 1227 }
fkellermavnet 0:affdbb35faa4 1228 }
fkellermavnet 0:affdbb35faa4 1229 }
fkellermavnet 0:affdbb35faa4 1230 }
fkellermavnet 0:affdbb35faa4 1231 }
fkellermavnet 0:affdbb35faa4 1232
fkellermavnet 0:affdbb35faa4 1233 return (false);
fkellermavnet 0:affdbb35faa4 1234 }
fkellermavnet 0:affdbb35faa4 1235
fkellermavnet 0:affdbb35faa4 1236
fkellermavnet 0:affdbb35faa4 1237 size_t WncController::at_readSMSlog_wnc(const char ** log)
fkellermavnet 0:affdbb35faa4 1238 {
fkellermavnet 0:affdbb35faa4 1239 string * pRespStr;
fkellermavnet 6:a656e820d7ff 1240 static string smsLogStr;
fkellermavnet 6:a656e820d7ff 1241
fkellermavnet 6:a656e820d7ff 1242 smsLogStr.erase();
fkellermavnet 0:affdbb35faa4 1243
fkellermavnet 0:affdbb35faa4 1244 if (at_send_wnc_cmd("AT+CMGL", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK)
fkellermavnet 6:a656e820d7ff 1245 smsLogStr = *pRespStr;
fkellermavnet 0:affdbb35faa4 1246
fkellermavnet 6:a656e820d7ff 1247 *log = smsLogStr.c_str();
fkellermavnet 6:a656e820d7ff 1248
fkellermavnet 0:affdbb35faa4 1249 return (pRespStr->size());
fkellermavnet 0:affdbb35faa4 1250 }
fkellermavnet 0:affdbb35faa4 1251
fkellermavnet 6:a656e820d7ff 1252 size_t WncController::at_readSMStext_wnc(const char n, const char ** log)
fkellermavnet 0:affdbb35faa4 1253 {
fkellermavnet 6:a656e820d7ff 1254 static string smsReadTxtStr;
fkellermavnet 0:affdbb35faa4 1255 string * pRespStr;
fkellermavnet 6:a656e820d7ff 1256 string cmdStr;
fkellermavnet 6:a656e820d7ff 1257
fkellermavnet 6:a656e820d7ff 1258 smsReadTxtStr.erase();
fkellermavnet 6:a656e820d7ff 1259 cmdStr = "AT+CMGR";
fkellermavnet 6:a656e820d7ff 1260 cmdStr += '1';
fkellermavnet 0:affdbb35faa4 1261 if (at_send_wnc_cmd("AT+CMGR", &pRespStr, m_sCmdTimeoutMs) == WNC_AT_CMD_OK)
fkellermavnet 0:affdbb35faa4 1262 *log = pRespStr->c_str();
fkellermavnet 0:affdbb35faa4 1263 else
fkellermavnet 0:affdbb35faa4 1264 *log = "\0";
fkellermavnet 0:affdbb35faa4 1265
fkellermavnet 0:affdbb35faa4 1266 return (pRespStr->size());
fkellermavnet 0:affdbb35faa4 1267 }
fkellermavnet 0:affdbb35faa4 1268
fkellermavnet 0:affdbb35faa4 1269 bool WncController::at_at_wnc(void)
fkellermavnet 0:affdbb35faa4 1270 {
fkellermavnet 0:affdbb35faa4 1271 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1272 return (WNC_AT_CMD_OK == at_send_wnc_cmd("AT", &pRespStr, WNC_QUICK_CMD_TIMEOUT_MS)); // Heartbeat?
fkellermavnet 0:affdbb35faa4 1273 }
fkellermavnet 0:affdbb35faa4 1274
fkellermavnet 0:affdbb35faa4 1275 bool WncController::at_init_wnc(bool hardReset)
fkellermavnet 0:affdbb35faa4 1276 {
fkellermavnet 0:affdbb35faa4 1277 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1278 AtCmdErr_e cmdRes;
fkellermavnet 0:affdbb35faa4 1279
fkellermavnet 0:affdbb35faa4 1280 if (hardReset == true)
fkellermavnet 0:affdbb35faa4 1281 dbgPuts("Hard Soft Reset!");
fkellermavnet 0:affdbb35faa4 1282
fkellermavnet 0:affdbb35faa4 1283 dbgPuts("Start AT init of WNC:");
fkellermavnet 0:affdbb35faa4 1284
fkellermavnet 0:affdbb35faa4 1285 // Kick it twice to perhaps remove cued responses from an incomplete
fkellermavnet 0:affdbb35faa4 1286 // power cycle.
fkellermavnet 0:affdbb35faa4 1287 at_send_wnc_cmd("AT", &pRespStr, WNC_QUICK_CMD_TIMEOUT_MS);
fkellermavnet 0:affdbb35faa4 1288 at_send_wnc_cmd("AT", &pRespStr, WNC_QUICK_CMD_TIMEOUT_MS);
fkellermavnet 0:affdbb35faa4 1289
fkellermavnet 0:affdbb35faa4 1290 // Quick commands below do not need to check cellular connectivity
fkellermavnet 0:affdbb35faa4 1291 at_send_wnc_cmd("ATE0", &pRespStr, WNC_QUICK_CMD_TIMEOUT_MS); // Echo Off
fkellermavnet 0:affdbb35faa4 1292 at_send_wnc_cmd("AT+CMEE=2", &pRespStr, m_sCmdTimeoutMs); // 2 - verbose error, 1 - numeric error, 0 - just ERROR
fkellermavnet 6:a656e820d7ff 1293
fkellermavnet 6:a656e820d7ff 1294 // Setup 3 memory slots in the WNC SIM for SMS usage.
fkellermavnet 6:a656e820d7ff 1295 at_send_wnc_cmd("AT+CMGF=1", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 6:a656e820d7ff 1296 at_send_wnc_cmd("AT+CPMS=\"SM\",\"SM\",\"SM\"", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 6:a656e820d7ff 1297
fkellermavnet 0:affdbb35faa4 1298 cmdRes = at_send_wnc_cmd("AT", &pRespStr, WNC_QUICK_CMD_TIMEOUT_MS); // Heartbeat?
fkellermavnet 0:affdbb35faa4 1299
fkellermavnet 0:affdbb35faa4 1300 // If the simple commands are not working, no chance of more complex.
fkellermavnet 0:affdbb35faa4 1301 // I have seen re-trying commands make it worse.
fkellermavnet 0:affdbb35faa4 1302 if (cmdRes != WNC_AT_CMD_OK)
fkellermavnet 0:affdbb35faa4 1303 return (false);
fkellermavnet 0:affdbb35faa4 1304
fkellermavnet 0:affdbb35faa4 1305 cmdRes = at_send_wnc_cmd("AT@INTERNET=1", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1306 if (cmdRes != WNC_AT_CMD_OK)
fkellermavnet 0:affdbb35faa4 1307 return (false);
fkellermavnet 0:affdbb35faa4 1308
fkellermavnet 0:affdbb35faa4 1309 cmdRes = at_send_wnc_cmd("AT@SOCKDIAL=1", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1310 if (cmdRes != WNC_AT_CMD_OK)
fkellermavnet 0:affdbb35faa4 1311 return (false);
fkellermavnet 0:affdbb35faa4 1312
fkellermavnet 0:affdbb35faa4 1313 dbgPuts("SUCCESS: AT init of WNC!");
fkellermavnet 0:affdbb35faa4 1314
fkellermavnet 0:affdbb35faa4 1315 return (true);
fkellermavnet 0:affdbb35faa4 1316 }
fkellermavnet 0:affdbb35faa4 1317
fkellermavnet 0:affdbb35faa4 1318
fkellermavnet 10:2ec59906a24e 1319 int16_t WncController::at_sockopen_wnc(const char * const ip, uint16_t port, uint16_t numSock, bool tcp, uint16_t timeOutSec)
fkellermavnet 0:affdbb35faa4 1320 {
fkellermavnet 0:affdbb35faa4 1321 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1322 string cmd_str("AT@SOCKCREAT=");
fkellermavnet 0:affdbb35faa4 1323 AtCmdErr_e res;
fkellermavnet 0:affdbb35faa4 1324
fkellermavnet 0:affdbb35faa4 1325 if (tcp) cmd_str += "1"; // TCP
fkellermavnet 0:affdbb35faa4 1326 else cmd_str += "2"; // else UDP
fkellermavnet 0:affdbb35faa4 1327
fkellermavnet 0:affdbb35faa4 1328 cmd_str += ",0";
fkellermavnet 0:affdbb35faa4 1329 res = sendWncCmd(cmd_str.c_str(), &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1330 if (res == WNC_AT_CMD_OK)
fkellermavnet 0:affdbb35faa4 1331 {
fkellermavnet 10:2ec59906a24e 1332 size_t pos1 = pRespStr->find("T:");
fkellermavnet 10:2ec59906a24e 1333 size_t pos2 = pRespStr->rfind("OK");
fkellermavnet 10:2ec59906a24e 1334 if ((pos1 != string::npos) && (pos2 != string::npos)) {
fkellermavnet 10:2ec59906a24e 1335 size_t numLen = pos2 - (pos1 + 2);
fkellermavnet 10:2ec59906a24e 1336 string sockStr = pRespStr->substr(pos1 + 2, numLen);
fkellermavnet 10:2ec59906a24e 1337 cmd_str = "AT@SOCKCONN=";
fkellermavnet 10:2ec59906a24e 1338 cmd_str += sockStr;
fkellermavnet 10:2ec59906a24e 1339 cmd_str += ",\"";
fkellermavnet 10:2ec59906a24e 1340 cmd_str += ip;
fkellermavnet 10:2ec59906a24e 1341 cmd_str += "\",";
fkellermavnet 10:2ec59906a24e 1342 cmd_str += _to_string(port);
fkellermavnet 10:2ec59906a24e 1343 cmd_str += ",";
fkellermavnet 10:2ec59906a24e 1344 if (timeOutSec < 30)
fkellermavnet 10:2ec59906a24e 1345 timeOutSec = 30;
fkellermavnet 10:2ec59906a24e 1346 else if (timeOutSec > 360)
fkellermavnet 10:2ec59906a24e 1347 timeOutSec = 360;
fkellermavnet 10:2ec59906a24e 1348 cmd_str += _to_string(timeOutSec);
fkellermavnet 10:2ec59906a24e 1349 res = sendWncCmd(cmd_str.c_str(), &pRespStr, 1000 * timeOutSec + 1000);
fkellermavnet 10:2ec59906a24e 1350 if (m_sMoreDebugEnabled) {
fkellermavnet 10:2ec59906a24e 1351 at_send_wnc_cmd("AT@SOCKCREAT?", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 10:2ec59906a24e 1352 at_send_wnc_cmd("AT@SOCKCONN?", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 10:2ec59906a24e 1353 }
fkellermavnet 10:2ec59906a24e 1354 return (strtol(sockStr.c_str(), NULL, 10));
fkellermavnet 0:affdbb35faa4 1355 }
fkellermavnet 10:2ec59906a24e 1356 else {
fkellermavnet 10:2ec59906a24e 1357 dbgPuts("Invalid sockcreat response!");
fkellermavnet 10:2ec59906a24e 1358 return (0);
fkellermavnet 10:2ec59906a24e 1359 }
fkellermavnet 0:affdbb35faa4 1360 }
fkellermavnet 0:affdbb35faa4 1361 else
fkellermavnet 10:2ec59906a24e 1362 return (0);
fkellermavnet 0:affdbb35faa4 1363 }
fkellermavnet 0:affdbb35faa4 1364
fkellermavnet 0:affdbb35faa4 1365 bool WncController::at_sockclose_wnc(uint16_t numSock)
fkellermavnet 0:affdbb35faa4 1366 {
fkellermavnet 0:affdbb35faa4 1367 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1368 string cmd_str("AT@SOCKCLOSE=");
fkellermavnet 0:affdbb35faa4 1369
fkellermavnet 10:2ec59906a24e 1370 cmd_str += _to_string(numSock);
fkellermavnet 0:affdbb35faa4 1371 // Don't check the cell status to close the socket
fkellermavnet 0:affdbb35faa4 1372 return (WNC_AT_CMD_OK == at_send_wnc_cmd(cmd_str.c_str(), &pRespStr, m_sCmdTimeoutMs));
fkellermavnet 0:affdbb35faa4 1373 }
fkellermavnet 0:affdbb35faa4 1374
fkellermavnet 0:affdbb35faa4 1375 bool WncController::at_dnsresolve_wnc(const char * s, string * ipStr)
fkellermavnet 0:affdbb35faa4 1376 {
fkellermavnet 0:affdbb35faa4 1377 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1378 string str(s);
fkellermavnet 0:affdbb35faa4 1379
fkellermavnet 0:affdbb35faa4 1380 ipStr->erase(); // Clear out string until resolved!
fkellermavnet 0:affdbb35faa4 1381 str = "AT@DNSRESVDON=\"" + str;
fkellermavnet 0:affdbb35faa4 1382 str += "\"";
fkellermavnet 0:affdbb35faa4 1383 if (sendWncCmd(str.c_str(), &pRespStr, WNC_DNS_RESOLVE_WAIT_MS) == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 1384 size_t pos_start = pRespStr->find(":\"") + 2;
fkellermavnet 0:affdbb35faa4 1385 if (pos_start != string::npos) {
fkellermavnet 0:affdbb35faa4 1386 size_t pos_end = pRespStr->find("\"", pos_start) - 1;
fkellermavnet 0:affdbb35faa4 1387 if (pos_end != string::npos) {
fkellermavnet 0:affdbb35faa4 1388 if (pos_end > pos_start) {
fkellermavnet 0:affdbb35faa4 1389 // Make a copy for use later (the source string is re-used)
fkellermavnet 0:affdbb35faa4 1390 *ipStr = pRespStr->substr(pos_start, pos_end - pos_start + 1);
fkellermavnet 0:affdbb35faa4 1391 return (true);
fkellermavnet 0:affdbb35faa4 1392 }
fkellermavnet 0:affdbb35faa4 1393 }
fkellermavnet 0:affdbb35faa4 1394 }
fkellermavnet 0:affdbb35faa4 1395 }
fkellermavnet 0:affdbb35faa4 1396
fkellermavnet 0:affdbb35faa4 1397 *ipStr = INVALID_IP_STR;
fkellermavnet 0:affdbb35faa4 1398
fkellermavnet 0:affdbb35faa4 1399 return (false);
fkellermavnet 0:affdbb35faa4 1400 }
fkellermavnet 0:affdbb35faa4 1401
fkellermavnet 0:affdbb35faa4 1402 bool WncController::waitForPowerOnModemToRespond(uint8_t timeoutSecs)
fkellermavnet 0:affdbb35faa4 1403 {
fkellermavnet 0:affdbb35faa4 1404 // Now, give the modem x seconds to start responding by
fkellermavnet 0:affdbb35faa4 1405 // sending simple 'AT' commands to modem once per second.
fkellermavnet 0:affdbb35faa4 1406 if (timeoutSecs > 0) {
fkellermavnet 0:affdbb35faa4 1407 do {
fkellermavnet 0:affdbb35faa4 1408 timeoutSecs--;
fkellermavnet 1:ac2de545b981 1409 dbgPutsNoTime("\rWaiting ", false); dbgPutsNoTime(_to_string(timeoutSecs), false);
fkellermavnet 1:ac2de545b981 1410 dbgPutsNoTime(" ", false);
fkellermavnet 0:affdbb35faa4 1411 AtCmdErr_e rc = mdmSendAtCmdRsp("AT", 500, &m_sWncStr);
fkellermavnet 0:affdbb35faa4 1412 if (rc == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 1413 dbgPutsNoTime(""); // CR LF
fkellermavnet 0:affdbb35faa4 1414 return true; //timer.read();
fkellermavnet 0:affdbb35faa4 1415 }
fkellermavnet 0:affdbb35faa4 1416 waitMs(500);
fkellermavnet 0:affdbb35faa4 1417 }
fkellermavnet 0:affdbb35faa4 1418 while (timeoutSecs > 0);
fkellermavnet 1:ac2de545b981 1419 dbgPutsNoTime(""); // CR LF
fkellermavnet 0:affdbb35faa4 1420 }
fkellermavnet 0:affdbb35faa4 1421
fkellermavnet 0:affdbb35faa4 1422 return (false);
fkellermavnet 0:affdbb35faa4 1423 }
fkellermavnet 0:affdbb35faa4 1424
fkellermavnet 0:affdbb35faa4 1425 WncController::AtCmdErr_e WncController::at_sockwrite_wnc(const char * s, uint32_t n, uint16_t numSock, bool isTcp)
fkellermavnet 0:affdbb35faa4 1426 {
fkellermavnet 0:affdbb35faa4 1427 AtCmdErr_e result;
fkellermavnet 0:affdbb35faa4 1428
fkellermavnet 0:affdbb35faa4 1429 if ((n > 0) && (n <= MAX_WNC_WRITE_BYTES)) {
fkellermavnet 0:affdbb35faa4 1430 string * pRespStr;
fkellermavnet 1:ac2de545b981 1431 const char * num2str;
fkellermavnet 0:affdbb35faa4 1432 string cmd_str;
fkellermavnet 0:affdbb35faa4 1433
fkellermavnet 0:affdbb35faa4 1434 if (isTcp == true)
fkellermavnet 0:affdbb35faa4 1435 cmd_str="AT@SOCKWRITE=";
fkellermavnet 0:affdbb35faa4 1436 else
fkellermavnet 0:affdbb35faa4 1437 cmd_str="AT@SOCKWRITE="; // "AT@SOCKSEND=";
fkellermavnet 0:affdbb35faa4 1438
fkellermavnet 10:2ec59906a24e 1439 cmd_str += _to_string(numSock);
fkellermavnet 0:affdbb35faa4 1440 cmd_str += ",";
fkellermavnet 1:ac2de545b981 1441 cmd_str += _to_string(n);
fkellermavnet 0:affdbb35faa4 1442 cmd_str += ",\"";
fkellermavnet 6:a656e820d7ff 1443 while(n > 0) {
fkellermavnet 6:a656e820d7ff 1444 n--;
fkellermavnet 1:ac2de545b981 1445 num2str = _to_hex_string((uint8_t)*s++);
fkellermavnet 0:affdbb35faa4 1446 // Always 2-digit ascii hex:
fkellermavnet 1:ac2de545b981 1447 if (strlen(num2str) == 1)
fkellermavnet 1:ac2de545b981 1448 cmd_str += '0';
fkellermavnet 0:affdbb35faa4 1449 cmd_str += num2str;
fkellermavnet 0:affdbb35faa4 1450 }
fkellermavnet 0:affdbb35faa4 1451 cmd_str += "\"";
fkellermavnet 0:affdbb35faa4 1452 result = sendWncCmd(cmd_str.c_str(), &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1453 }
fkellermavnet 0:affdbb35faa4 1454 else {
fkellermavnet 0:affdbb35faa4 1455 dbgPuts("sockwrite Err, string len bad!");
fkellermavnet 0:affdbb35faa4 1456 result = WNC_AT_CMD_ERR;
fkellermavnet 0:affdbb35faa4 1457 }
fkellermavnet 0:affdbb35faa4 1458
fkellermavnet 0:affdbb35faa4 1459 return (result);
fkellermavnet 0:affdbb35faa4 1460 }
fkellermavnet 0:affdbb35faa4 1461
fkellermavnet 4:c5720f4d13ff 1462 WncController::AtCmdErr_e WncController::at_sockread_wnc(string * pS, uint16_t numSock, bool isTcp)
fkellermavnet 4:c5720f4d13ff 1463 {
fkellermavnet 4:c5720f4d13ff 1464 AtCmdErr_e result = WNC_AT_CMD_OK;
fkellermavnet 4:c5720f4d13ff 1465
fkellermavnet 4:c5720f4d13ff 1466 string * pRespStr;
fkellermavnet 4:c5720f4d13ff 1467 string cmd_str;
fkellermavnet 4:c5720f4d13ff 1468 size_t pos_start, pos_end;
fkellermavnet 4:c5720f4d13ff 1469 int i;
fkellermavnet 5:20207cc5502e 1470
fkellermavnet 5:20207cc5502e 1471 pS->erase(); // Start with a fresh string
fkellermavnet 4:c5720f4d13ff 1472
fkellermavnet 4:c5720f4d13ff 1473 if (isTcp == true)
fkellermavnet 4:c5720f4d13ff 1474 cmd_str="AT@SOCKREAD=";
fkellermavnet 4:c5720f4d13ff 1475 else
fkellermavnet 4:c5720f4d13ff 1476 cmd_str="AT@SOCKREAD="; // "AT@SOCKRECV=";
fkellermavnet 4:c5720f4d13ff 1477
fkellermavnet 10:2ec59906a24e 1478 cmd_str += _to_string(numSock);
fkellermavnet 4:c5720f4d13ff 1479 cmd_str += ",";
fkellermavnet 4:c5720f4d13ff 1480 cmd_str += _to_string(MAX_WNC_READ_BYTES);
fkellermavnet 4:c5720f4d13ff 1481
fkellermavnet 4:c5720f4d13ff 1482 // Experimental: read should not need to check cell net status
fkellermavnet 4:c5720f4d13ff 1483 result = at_send_wnc_cmd(cmd_str.c_str(), &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 4:c5720f4d13ff 1484 if (result == WNC_AT_CMD_OK) {
fkellermavnet 4:c5720f4d13ff 1485 pos_start = pRespStr->find("\"") + 1;
fkellermavnet 4:c5720f4d13ff 1486 pos_end = pRespStr->rfind("\"") - 1;
fkellermavnet 4:c5720f4d13ff 1487
fkellermavnet 4:c5720f4d13ff 1488 // Make sure search finds what it's looking for!
fkellermavnet 4:c5720f4d13ff 1489 if (pos_start != string::npos && pos_end != string::npos)
fkellermavnet 4:c5720f4d13ff 1490 i = (pos_end - pos_start + 1); // Num hex chars, 2 per byte
fkellermavnet 4:c5720f4d13ff 1491 else
fkellermavnet 4:c5720f4d13ff 1492 i = 0;
fkellermavnet 4:c5720f4d13ff 1493
fkellermavnet 4:c5720f4d13ff 1494 if (i < 0)
fkellermavnet 4:c5720f4d13ff 1495 dbgPuts("Invalid READ string!");
fkellermavnet 4:c5720f4d13ff 1496 else if (i > 2*MAX_WNC_READ_BYTES) {
fkellermavnet 4:c5720f4d13ff 1497 // Bound the ill formated WNC read string!
fkellermavnet 4:c5720f4d13ff 1498 i = 2*MAX_WNC_READ_BYTES;
fkellermavnet 4:c5720f4d13ff 1499 dbgPuts("TRUNCATING read data!");
fkellermavnet 4:c5720f4d13ff 1500 }
fkellermavnet 4:c5720f4d13ff 1501
fkellermavnet 4:c5720f4d13ff 1502 // If data, convert the hex string into byte values
fkellermavnet 4:c5720f4d13ff 1503 if (i > 0)
fkellermavnet 4:c5720f4d13ff 1504 {
fkellermavnet 4:c5720f4d13ff 1505 string byte;
fkellermavnet 4:c5720f4d13ff 1506 while (pos_start < pos_end) {
fkellermavnet 4:c5720f4d13ff 1507 byte = pRespStr->substr(pos_start, 2);
fkellermavnet 4:c5720f4d13ff 1508 *pS += (uint8_t)strtol(byte.c_str(), NULL, 16);
fkellermavnet 4:c5720f4d13ff 1509 pos_start += 2;
fkellermavnet 4:c5720f4d13ff 1510 }
fkellermavnet 4:c5720f4d13ff 1511 }
fkellermavnet 4:c5720f4d13ff 1512 }
fkellermavnet 4:c5720f4d13ff 1513
fkellermavnet 4:c5720f4d13ff 1514 return (result);
fkellermavnet 4:c5720f4d13ff 1515 }
fkellermavnet 4:c5720f4d13ff 1516
fkellermavnet 0:affdbb35faa4 1517 WncController::AtCmdErr_e WncController::at_sockread_wnc(uint8_t * pS, uint32_t * numRead, uint16_t n, uint16_t numSock, bool isTcp)
fkellermavnet 0:affdbb35faa4 1518 {
fkellermavnet 0:affdbb35faa4 1519 AtCmdErr_e result = WNC_AT_CMD_OK;
fkellermavnet 0:affdbb35faa4 1520 *numRead = 0;
fkellermavnet 0:affdbb35faa4 1521
fkellermavnet 0:affdbb35faa4 1522 if ((n > 0) && (n <= MAX_WNC_READ_BYTES)) {
fkellermavnet 0:affdbb35faa4 1523 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1524 string cmd_str;
fkellermavnet 0:affdbb35faa4 1525 size_t pos_start, pos_end;
fkellermavnet 0:affdbb35faa4 1526 int i;
fkellermavnet 0:affdbb35faa4 1527
fkellermavnet 0:affdbb35faa4 1528 if (isTcp == true)
fkellermavnet 0:affdbb35faa4 1529 cmd_str="AT@SOCKREAD=";
fkellermavnet 0:affdbb35faa4 1530 else
fkellermavnet 0:affdbb35faa4 1531 cmd_str="AT@SOCKREAD="; // "AT@SOCKRECV=";
fkellermavnet 0:affdbb35faa4 1532
fkellermavnet 10:2ec59906a24e 1533 cmd_str += _to_string(numSock);
fkellermavnet 0:affdbb35faa4 1534 cmd_str += ",";
fkellermavnet 0:affdbb35faa4 1535 cmd_str += _to_string(n);
fkellermavnet 0:affdbb35faa4 1536
fkellermavnet 0:affdbb35faa4 1537 // Experimental: read should not need to check cell net status
fkellermavnet 0:affdbb35faa4 1538 result = at_send_wnc_cmd(cmd_str.c_str(), &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1539 if (result == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 1540 pos_start = pRespStr->find("\"") + 1;
fkellermavnet 0:affdbb35faa4 1541 pos_end = pRespStr->rfind("\"") - 1;
fkellermavnet 0:affdbb35faa4 1542
fkellermavnet 0:affdbb35faa4 1543 // Make sure search finds what it's looking for!
fkellermavnet 0:affdbb35faa4 1544 if (pos_start != string::npos && pos_end != string::npos)
fkellermavnet 0:affdbb35faa4 1545 i = (pos_end - pos_start + 1); // Num hex chars, 2 per byte
fkellermavnet 0:affdbb35faa4 1546 else
fkellermavnet 0:affdbb35faa4 1547 i = 0;
fkellermavnet 10:2ec59906a24e 1548
fkellermavnet 4:c5720f4d13ff 1549 if (i < 0)
fkellermavnet 4:c5720f4d13ff 1550 dbgPuts("Invalid READ string!");
fkellermavnet 7:e6f22159ef23 1551 else if (i > 2*n) {
fkellermavnet 4:c5720f4d13ff 1552 // Bound the ill formated WNC read string!
fkellermavnet 7:e6f22159ef23 1553 i = 2*n;
fkellermavnet 4:c5720f4d13ff 1554 dbgPuts("TRUNCATING read data!");
fkellermavnet 4:c5720f4d13ff 1555 }
fkellermavnet 4:c5720f4d13ff 1556
fkellermavnet 1:ac2de545b981 1557 // If data, convert the hex string into byte values
fkellermavnet 4:c5720f4d13ff 1558 if (i > 0)
fkellermavnet 0:affdbb35faa4 1559 {
fkellermavnet 0:affdbb35faa4 1560 string byte;
fkellermavnet 0:affdbb35faa4 1561 while (pos_start < pos_end) {
fkellermavnet 0:affdbb35faa4 1562 byte = pRespStr->substr(pos_start, 2);
fkellermavnet 4:c5720f4d13ff 1563 *pS++ = (uint8_t)strtol(byte.c_str(), NULL, 16);
fkellermavnet 0:affdbb35faa4 1564 pos_start += 2;
fkellermavnet 0:affdbb35faa4 1565 (*numRead)++;
fkellermavnet 0:affdbb35faa4 1566 }
fkellermavnet 0:affdbb35faa4 1567 }
fkellermavnet 0:affdbb35faa4 1568 }
fkellermavnet 0:affdbb35faa4 1569 }
fkellermavnet 0:affdbb35faa4 1570 else {
fkellermavnet 0:affdbb35faa4 1571 dbgPuts("sockread Err, to many to read!");
fkellermavnet 0:affdbb35faa4 1572 result = WNC_AT_CMD_ERR;
fkellermavnet 0:affdbb35faa4 1573 }
fkellermavnet 0:affdbb35faa4 1574
fkellermavnet 0:affdbb35faa4 1575 return (result);
fkellermavnet 0:affdbb35faa4 1576 }
fkellermavnet 0:affdbb35faa4 1577
fkellermavnet 0:affdbb35faa4 1578 bool WncController::at_reinitialize_mdm(void)
fkellermavnet 0:affdbb35faa4 1579 {
fkellermavnet 0:affdbb35faa4 1580 // Atempt to re-register
fkellermavnet 0:affdbb35faa4 1581 // string * pRespStr;
fkellermavnet 0:affdbb35faa4 1582 // dbgPuts("Force re-register!");
fkellermavnet 0:affdbb35faa4 1583 // at_send_wnc_cmd("AT+CFUN=0,0", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1584 // waitMs(31000);
fkellermavnet 0:affdbb35faa4 1585 // at_send_wnc_cmd("AT+CFUN=1,0", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1586 // waitMs(31000);
fkellermavnet 0:affdbb35faa4 1587
fkellermavnet 0:affdbb35faa4 1588 // Initialize the modem
fkellermavnet 0:affdbb35faa4 1589 dbgPuts("Modem RE-initializing with SOFT Reset...");
fkellermavnet 0:affdbb35faa4 1590
fkellermavnet 0:affdbb35faa4 1591 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1592 at_send_wnc_cmd("AT@DMREBOOT", &pRespStr, m_sCmdTimeoutMs);
fkellermavnet 0:affdbb35faa4 1593 waitMs(5000);
fkellermavnet 0:affdbb35faa4 1594
fkellermavnet 0:affdbb35faa4 1595 // Now, give the modem time to start responding by
fkellermavnet 0:affdbb35faa4 1596 // sending simple 'AT' commands to the modem once per second.
fkellermavnet 0:affdbb35faa4 1597 int timeoutSecs = WNC_REINIT_MAX_TIME_MS;
fkellermavnet 0:affdbb35faa4 1598 do {
fkellermavnet 0:affdbb35faa4 1599 dbgPuts("\rWaiting ", false); dbgPutsNoTime(_to_string(timeoutSecs), false);
fkellermavnet 0:affdbb35faa4 1600 AtCmdErr_e rc = mdmSendAtCmdRsp("AT", 500, &m_sWncStr);
fkellermavnet 0:affdbb35faa4 1601 if (rc == WNC_AT_CMD_OK) {
fkellermavnet 0:affdbb35faa4 1602 dbgPutsNoTime(""); // CR LF
fkellermavnet 0:affdbb35faa4 1603 break;
fkellermavnet 0:affdbb35faa4 1604 }
fkellermavnet 0:affdbb35faa4 1605 waitMs(500);
fkellermavnet 0:affdbb35faa4 1606 timeoutSecs--;
fkellermavnet 0:affdbb35faa4 1607 }
fkellermavnet 0:affdbb35faa4 1608 while (timeoutSecs > 0);
fkellermavnet 0:affdbb35faa4 1609
fkellermavnet 0:affdbb35faa4 1610 if (timeoutSecs <= 0)
fkellermavnet 0:affdbb35faa4 1611 dbgPuts("\r\nModem RE-init FAILED!");
fkellermavnet 0:affdbb35faa4 1612 else
fkellermavnet 0:affdbb35faa4 1613 dbgPuts("\r\nModem RE-init complete!");
fkellermavnet 0:affdbb35faa4 1614
fkellermavnet 0:affdbb35faa4 1615 return (timeoutSecs > 0);
fkellermavnet 0:affdbb35faa4 1616 }
fkellermavnet 0:affdbb35faa4 1617
fkellermavnet 0:affdbb35faa4 1618 WncController::AtCmdErr_e WncController::mdmSendAtCmdRsp(const char *cmd, int timeout_ms, string * rsp, bool crLf)
fkellermavnet 0:affdbb35faa4 1619 {
fkellermavnet 0:affdbb35faa4 1620 rsp->erase(); // Clean up from possible prior cmd response
fkellermavnet 0:affdbb35faa4 1621
fkellermavnet 0:affdbb35faa4 1622 // Don't bother the WNC if user hasn't turned it on.
fkellermavnet 0:affdbb35faa4 1623 if (m_sState == WNC_OFF)
fkellermavnet 0:affdbb35faa4 1624 return (WNC_AT_CMD_WNC_NOT_ON);
fkellermavnet 0:affdbb35faa4 1625
fkellermavnet 0:affdbb35faa4 1626 size_t n = strlen(cmd);
fkellermavnet 0:affdbb35faa4 1627
fkellermavnet 0:affdbb35faa4 1628 // Wait per WNC advise
fkellermavnet 0:affdbb35faa4 1629 waitMs(WNC_WAIT_FOR_AT_CMD_MS);
fkellermavnet 0:affdbb35faa4 1630
fkellermavnet 0:affdbb35faa4 1631 if (cmd && n > 0) {
fkellermavnet 0:affdbb35faa4 1632 sendCmd(cmd, crLf);
fkellermavnet 0:affdbb35faa4 1633 // sendCmdSlow(cmd, n, 500); // 3rd arg is micro seconds between chars sent
fkellermavnet 0:affdbb35faa4 1634 }
fkellermavnet 0:affdbb35faa4 1635
fkellermavnet 0:affdbb35faa4 1636 startTimerA();
fkellermavnet 1:ac2de545b981 1637 while (getTimerTicksA_mS() < timeout_ms) {
fkellermavnet 1:ac2de545b981 1638 n = mdmGetline(rsp, timeout_ms - getTimerTicksA_mS());
fkellermavnet 0:affdbb35faa4 1639
fkellermavnet 0:affdbb35faa4 1640 if (n == 0)
fkellermavnet 0:affdbb35faa4 1641 continue;
fkellermavnet 0:affdbb35faa4 1642
fkellermavnet 0:affdbb35faa4 1643 if (rsp->rfind("OK") != string::npos) {
fkellermavnet 0:affdbb35faa4 1644 stopTimerA();
fkellermavnet 0:affdbb35faa4 1645 return (WNC_AT_CMD_OK);
fkellermavnet 0:affdbb35faa4 1646 }
fkellermavnet 0:affdbb35faa4 1647
fkellermavnet 0:affdbb35faa4 1648 if (rsp->rfind("+CME ERROR") != string::npos) {
fkellermavnet 0:affdbb35faa4 1649 stopTimerA();
fkellermavnet 0:affdbb35faa4 1650 return (WNC_AT_CMD_ERRCME);
fkellermavnet 0:affdbb35faa4 1651 }
fkellermavnet 0:affdbb35faa4 1652
fkellermavnet 0:affdbb35faa4 1653 if (rsp->rfind("@EXTERR") != string::npos) {
fkellermavnet 0:affdbb35faa4 1654 stopTimerA();
fkellermavnet 0:affdbb35faa4 1655 return (WNC_AT_CMD_ERREXT);
fkellermavnet 0:affdbb35faa4 1656 }
fkellermavnet 0:affdbb35faa4 1657
fkellermavnet 0:affdbb35faa4 1658 if (rsp->rfind("ERROR") != string::npos) {
fkellermavnet 0:affdbb35faa4 1659 stopTimerA();
fkellermavnet 0:affdbb35faa4 1660 return (WNC_AT_CMD_ERR);
fkellermavnet 0:affdbb35faa4 1661 }
fkellermavnet 0:affdbb35faa4 1662 }
fkellermavnet 0:affdbb35faa4 1663 stopTimerA();
fkellermavnet 0:affdbb35faa4 1664
fkellermavnet 0:affdbb35faa4 1665 return (WNC_AT_CMD_TIMEOUT);
fkellermavnet 0:affdbb35faa4 1666 }
fkellermavnet 0:affdbb35faa4 1667
fkellermavnet 0:affdbb35faa4 1668 bool WncController::at_setapn_wnc(const char * const apnStr)
fkellermavnet 0:affdbb35faa4 1669 {
fkellermavnet 0:affdbb35faa4 1670 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1671
fkellermavnet 0:affdbb35faa4 1672 string cmd_str("AT%PDNSET=1,");
fkellermavnet 0:affdbb35faa4 1673 cmd_str += apnStr;
fkellermavnet 0:affdbb35faa4 1674 cmd_str += ",IP";
fkellermavnet 0:affdbb35faa4 1675 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 1676 return (true);
fkellermavnet 0:affdbb35faa4 1677 else
fkellermavnet 0:affdbb35faa4 1678 return (false);
fkellermavnet 0:affdbb35faa4 1679 }
fkellermavnet 0:affdbb35faa4 1680
fkellermavnet 0:affdbb35faa4 1681 bool WncController::at_getrssiber_wnc(int16_t * dBm, int16_t * ber)
fkellermavnet 0:affdbb35faa4 1682 {
fkellermavnet 0:affdbb35faa4 1683 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1684 AtCmdErr_e cmdRes;
fkellermavnet 0:affdbb35faa4 1685 cmdRes = at_send_wnc_cmd("AT+CSQ", &pRespStr, m_sCmdTimeoutMs); // Check RSSI,BER
fkellermavnet 0:affdbb35faa4 1686 if (cmdRes != WNC_AT_CMD_OK)
fkellermavnet 0:affdbb35faa4 1687 return (false);
fkellermavnet 0:affdbb35faa4 1688
fkellermavnet 0:affdbb35faa4 1689 if (pRespStr->size() == 0) {
fkellermavnet 0:affdbb35faa4 1690 dbgPuts("Strange RSSI result!");
fkellermavnet 0:affdbb35faa4 1691 return (false);
fkellermavnet 0:affdbb35faa4 1692 }
fkellermavnet 0:affdbb35faa4 1693 else {
fkellermavnet 0:affdbb35faa4 1694 size_t pos1 = pRespStr->find("SQ:");
fkellermavnet 0:affdbb35faa4 1695 size_t pos2 = pRespStr->rfind(",");
fkellermavnet 0:affdbb35faa4 1696 // Sanity check
fkellermavnet 0:affdbb35faa4 1697 if ((pos1 != string::npos) && (pos2 != string::npos) && (pos2 > pos1)) {
fkellermavnet 0:affdbb35faa4 1698 string subStr = pRespStr->substr(pos1 + 4, pos2 - pos1 );
fkellermavnet 0:affdbb35faa4 1699 int rawRssi = atoi(subStr.c_str());
fkellermavnet 0:affdbb35faa4 1700
fkellermavnet 0:affdbb35faa4 1701 // Convert WNC RSSI into dBm range:
fkellermavnet 0:affdbb35faa4 1702 // 0 - -113 dBm
fkellermavnet 0:affdbb35faa4 1703 // 1 - -111 dBm
fkellermavnet 0:affdbb35faa4 1704 // 2..30 - -109 to -53 dBm
fkellermavnet 0:affdbb35faa4 1705 // 31 - -51dBm or >
fkellermavnet 0:affdbb35faa4 1706 // 99 - not known or not detectable
fkellermavnet 0:affdbb35faa4 1707 if (rawRssi == 99)
fkellermavnet 0:affdbb35faa4 1708 *dBm = -199;
fkellermavnet 0:affdbb35faa4 1709 else if (rawRssi == 0)
fkellermavnet 0:affdbb35faa4 1710 *dBm = -113;
fkellermavnet 0:affdbb35faa4 1711 else if (rawRssi == 1)
fkellermavnet 0:affdbb35faa4 1712 *dBm = -111;
fkellermavnet 0:affdbb35faa4 1713 else if (rawRssi == 31)
fkellermavnet 0:affdbb35faa4 1714 *dBm = -51;
fkellermavnet 0:affdbb35faa4 1715 else if (rawRssi >= 2 && rawRssi <= 30)
fkellermavnet 0:affdbb35faa4 1716 *dBm = -113 + 2 * rawRssi;
fkellermavnet 0:affdbb35faa4 1717 else {
fkellermavnet 0:affdbb35faa4 1718 dbgPuts("Invalid RSSI!");
fkellermavnet 0:affdbb35faa4 1719 return (false);
fkellermavnet 0:affdbb35faa4 1720 }
fkellermavnet 0:affdbb35faa4 1721 // Parse out BER: 0..7 as RXQUAL values in the table 3GPP TS 45.008 subclause 8.2.4
fkellermavnet 0:affdbb35faa4 1722 // 99 - unknown or undetectable
fkellermavnet 0:affdbb35faa4 1723 subStr = pRespStr->substr(pos2 + 1, pRespStr->length() - (pos2 + 1));
fkellermavnet 0:affdbb35faa4 1724 *ber = atoi(subStr.c_str());
fkellermavnet 0:affdbb35faa4 1725 }
fkellermavnet 0:affdbb35faa4 1726 else {
fkellermavnet 0:affdbb35faa4 1727 dbgPuts("Strange RSSI result2!");
fkellermavnet 0:affdbb35faa4 1728 return (false);
fkellermavnet 0:affdbb35faa4 1729 }
fkellermavnet 0:affdbb35faa4 1730 }
fkellermavnet 0:affdbb35faa4 1731
fkellermavnet 0:affdbb35faa4 1732 return (true);
fkellermavnet 0:affdbb35faa4 1733 }
fkellermavnet 0:affdbb35faa4 1734
fkellermavnet 0:affdbb35faa4 1735 bool WncController::checkCellLink(void)
fkellermavnet 0:affdbb35faa4 1736 {
fkellermavnet 0:affdbb35faa4 1737 string * pRespStr;
fkellermavnet 0:affdbb35faa4 1738 size_t pos;
fkellermavnet 0:affdbb35faa4 1739 int regSts;
fkellermavnet 0:affdbb35faa4 1740 int cmdRes1, cmdRes2;
fkellermavnet 0:affdbb35faa4 1741
fkellermavnet 0:affdbb35faa4 1742 if (m_sState == WNC_OFF)
fkellermavnet 0:affdbb35faa4 1743 return (false);
fkellermavnet 0:affdbb35faa4 1744
fkellermavnet 0:affdbb35faa4 1745 m_sState = WNC_ON_NO_CELL_LINK;
fkellermavnet 0:affdbb35faa4 1746
fkellermavnet 0:affdbb35faa4 1747 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 1748 dbgPuts("<-------- Begin Cell Status ------------");
fkellermavnet 0:affdbb35faa4 1749
fkellermavnet 0:affdbb35faa4 1750 cmdRes1 = at_send_wnc_cmd("AT+CSQ", &pRespStr, m_sCmdTimeoutMs); // Check RSSI,BER
fkellermavnet 0:affdbb35faa4 1751 cmdRes2 = at_send_wnc_cmd("AT+CPIN?", &pRespStr, m_sCmdTimeoutMs); // Check if SIM locked
fkellermavnet 0:affdbb35faa4 1752
fkellermavnet 0:affdbb35faa4 1753 if ((cmdRes1 != WNC_AT_CMD_OK) && (cmdRes2 != WNC_AT_CMD_OK))
fkellermavnet 0:affdbb35faa4 1754 {
fkellermavnet 0:affdbb35faa4 1755 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 1756 {
fkellermavnet 0:affdbb35faa4 1757 if ((cmdRes1 == WNC_AT_CMD_TIMEOUT) || (cmdRes2 == WNC_AT_CMD_TIMEOUT))
fkellermavnet 0:affdbb35faa4 1758 dbgPuts("------------ WNC No Response! --------->");
fkellermavnet 0:affdbb35faa4 1759 else
fkellermavnet 0:affdbb35faa4 1760 dbgPuts("------------ WNC Cmd Error! ----------->");
fkellermavnet 0:affdbb35faa4 1761 }
fkellermavnet 0:affdbb35faa4 1762 return (false);
fkellermavnet 0:affdbb35faa4 1763 }
fkellermavnet 0:affdbb35faa4 1764
fkellermavnet 0:affdbb35faa4 1765 // If SIM Card not ready don't bother with commands!
fkellermavnet 0:affdbb35faa4 1766 if (pRespStr->find("CPIN: READY") == string::npos)
fkellermavnet 0:affdbb35faa4 1767 {
fkellermavnet 0:affdbb35faa4 1768 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 1769 dbgPuts("------------ WNC SIM Problem! --------->");
fkellermavnet 0:affdbb35faa4 1770
fkellermavnet 0:affdbb35faa4 1771 return (false);
fkellermavnet 0:affdbb35faa4 1772 }
fkellermavnet 0:affdbb35faa4 1773
fkellermavnet 0:affdbb35faa4 1774 // SIM card OK, now check for signal and cellular network registration
fkellermavnet 0:affdbb35faa4 1775 cmdRes1 = at_send_wnc_cmd("AT+CREG?", &pRespStr, m_sCmdTimeoutMs); // Check if registered on network
fkellermavnet 0:affdbb35faa4 1776 if (cmdRes1 != WNC_AT_CMD_OK)
fkellermavnet 0:affdbb35faa4 1777 {
fkellermavnet 0:affdbb35faa4 1778 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 1779 dbgPuts("------------ WNC +CREG? Fail! --------->");
fkellermavnet 0:affdbb35faa4 1780
fkellermavnet 0:affdbb35faa4 1781 return (false);
fkellermavnet 0:affdbb35faa4 1782 }
fkellermavnet 0:affdbb35faa4 1783 else
fkellermavnet 0:affdbb35faa4 1784 {
fkellermavnet 0:affdbb35faa4 1785 pos = pRespStr->find("CREG: ");
fkellermavnet 0:affdbb35faa4 1786 if (pos != string::npos)
fkellermavnet 0:affdbb35faa4 1787 {
fkellermavnet 0:affdbb35faa4 1788 // The registration is the 2nd arg in the comma separated list
fkellermavnet 0:affdbb35faa4 1789 *pRespStr = pRespStr->substr(pos+8, 1);
fkellermavnet 0:affdbb35faa4 1790 regSts = atoi(pRespStr->c_str());
fkellermavnet 0:affdbb35faa4 1791 switch (regSts) {
fkellermavnet 0:affdbb35faa4 1792 case 1:
fkellermavnet 0:affdbb35faa4 1793 case 5:
fkellermavnet 0:affdbb35faa4 1794 case 6:
fkellermavnet 0:affdbb35faa4 1795 case 7:
fkellermavnet 0:affdbb35faa4 1796 m_sReadyForSMS = true;
fkellermavnet 0:affdbb35faa4 1797 break;
fkellermavnet 0:affdbb35faa4 1798 default:
fkellermavnet 0:affdbb35faa4 1799 m_sReadyForSMS = false;
fkellermavnet 0:affdbb35faa4 1800 dbgPuts("SMS Service Down!");
fkellermavnet 0:affdbb35faa4 1801 }
fkellermavnet 0:affdbb35faa4 1802
fkellermavnet 0:affdbb35faa4 1803 // 1 - registered home, 5 - registered roaming
fkellermavnet 0:affdbb35faa4 1804 if ((regSts != 1) && (regSts != 5))
fkellermavnet 0:affdbb35faa4 1805 {
fkellermavnet 0:affdbb35faa4 1806 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 1807 dbgPuts("------ WNC Cell Link Down for Data! --->");
fkellermavnet 0:affdbb35faa4 1808
fkellermavnet 0:affdbb35faa4 1809 return (false);
fkellermavnet 0:affdbb35faa4 1810 }
fkellermavnet 0:affdbb35faa4 1811 }
fkellermavnet 0:affdbb35faa4 1812
fkellermavnet 0:affdbb35faa4 1813 if (m_sMoreDebugEnabled)
fkellermavnet 0:affdbb35faa4 1814 dbgPuts("------------ WNC Ready ---------------->");
fkellermavnet 0:affdbb35faa4 1815 }
fkellermavnet 0:affdbb35faa4 1816
fkellermavnet 0:affdbb35faa4 1817 m_sState = WNC_ON;
fkellermavnet 0:affdbb35faa4 1818
fkellermavnet 0:affdbb35faa4 1819 return (true);
fkellermavnet 0:affdbb35faa4 1820 }
fkellermavnet 0:affdbb35faa4 1821
fkellermavnet 0:affdbb35faa4 1822 int WncController::dbgPutsNoTime(const char * s, bool crlf)
fkellermavnet 0:affdbb35faa4 1823 {
fkellermavnet 0:affdbb35faa4 1824 if (m_sDebugEnabled == true) {
fkellermavnet 1:ac2de545b981 1825 int r = dbgWriteChars(s);
fkellermavnet 0:affdbb35faa4 1826 if (crlf == true)
fkellermavnet 1:ac2de545b981 1827 return (dbgWriteChars("\r\n"));
fkellermavnet 0:affdbb35faa4 1828 else
fkellermavnet 0:affdbb35faa4 1829 return (r);
fkellermavnet 0:affdbb35faa4 1830 }
fkellermavnet 0:affdbb35faa4 1831 else
fkellermavnet 0:affdbb35faa4 1832 return 0;
fkellermavnet 0:affdbb35faa4 1833 };
fkellermavnet 0:affdbb35faa4 1834
fkellermavnet 0:affdbb35faa4 1835 int WncController::dbgPuts(const char * s, bool crlf)
fkellermavnet 0:affdbb35faa4 1836 {
fkellermavnet 0:affdbb35faa4 1837 dbgPutsNoTime("[*] ", false);
fkellermavnet 0:affdbb35faa4 1838 dbgPutsNoTime(_to_string(getLogTimerTicks()), false);
fkellermavnet 1:ac2de545b981 1839 dbgPutsNoTime(" ", false);
fkellermavnet 0:affdbb35faa4 1840
fkellermavnet 0:affdbb35faa4 1841 int r = dbgPutsNoTime(s, false);
fkellermavnet 1:ac2de545b981 1842
fkellermavnet 0:affdbb35faa4 1843 if (crlf == true)
fkellermavnet 1:ac2de545b981 1844 return (dbgPutsNoTime("", true));
fkellermavnet 0:affdbb35faa4 1845 else
fkellermavnet 0:affdbb35faa4 1846 return (r);
fkellermavnet 0:affdbb35faa4 1847 };
fkellermavnet 0:affdbb35faa4 1848
fkellermavnet 0:affdbb35faa4 1849 void WncController::sendCmd(const char * cmd, bool crLf)
fkellermavnet 0:affdbb35faa4 1850 {
fkellermavnet 0:affdbb35faa4 1851 puts(cmd);
fkellermavnet 0:affdbb35faa4 1852 if (crLf == true)
fkellermavnet 0:affdbb35faa4 1853 puts("\r\n");
fkellermavnet 0:affdbb35faa4 1854 }
fkellermavnet 0:affdbb35faa4 1855
fkellermavnet 0:affdbb35faa4 1856 // WNC used to have troubles handling full speed, seems to not need this now.
fkellermavnet 0:affdbb35faa4 1857 void WncController::sendCmd(const char * cmd, unsigned n, unsigned wait_uS, bool crLf)
fkellermavnet 0:affdbb35faa4 1858 {
fkellermavnet 0:affdbb35faa4 1859 while (n--) {
fkellermavnet 0:affdbb35faa4 1860 putc(*cmd++);
fkellermavnet 0:affdbb35faa4 1861 waitUs(wait_uS);
fkellermavnet 0:affdbb35faa4 1862 };
fkellermavnet 0:affdbb35faa4 1863 if (crLf == true) {
fkellermavnet 0:affdbb35faa4 1864 putc('\r');
fkellermavnet 0:affdbb35faa4 1865 waitUs(wait_uS);
fkellermavnet 0:affdbb35faa4 1866 putc('\n');
fkellermavnet 0:affdbb35faa4 1867 waitUs(wait_uS);
fkellermavnet 0:affdbb35faa4 1868 }
fkellermavnet 0:affdbb35faa4 1869 }
fkellermavnet 0:affdbb35faa4 1870
fkellermavnet 0:affdbb35faa4 1871
fkellermavnet 0:affdbb35faa4 1872 }; // End namespace WncController_fk