local fork

Dependencies:   Socket USBHostWANDongle_bleedingedge lwip-sys lwip

Dependents:   Encrypted

Fork of VodafoneUSBModem_bleedingedge by Donatien Garnier

Committer:
ashleymills
Date:
Wed Jan 09 16:13:50 2013 +0000
Revision:
75:a6ac8206a58d
Parent:
60:6f42a974eea6
Child:
76:c0e63c16306e
Experimental MU509 Support

Who changed what in which revision?

UserRevisionLine numberNew contents of line
donatien 0:3b2f052c333b 1 /* SMSInterface.cpp */
donatien 22:06fb2a93a1f6 2 /* Copyright (C) 2012 mbed.org, MIT License
donatien 22:06fb2a93a1f6 3 *
donatien 22:06fb2a93a1f6 4 * Permission is hereby granted, free of charge, to any person obtaining a copy of this software
donatien 22:06fb2a93a1f6 5 * and associated documentation files (the "Software"), to deal in the Software without restriction,
donatien 22:06fb2a93a1f6 6 * including without limitation the rights to use, copy, modify, merge, publish, distribute,
donatien 22:06fb2a93a1f6 7 * sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is
donatien 22:06fb2a93a1f6 8 * furnished to do so, subject to the following conditions:
donatien 22:06fb2a93a1f6 9 *
donatien 22:06fb2a93a1f6 10 * The above copyright notice and this permission notice shall be included in all copies or
donatien 22:06fb2a93a1f6 11 * substantial portions of the Software.
donatien 22:06fb2a93a1f6 12 *
donatien 22:06fb2a93a1f6 13 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING
donatien 22:06fb2a93a1f6 14 * BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
donatien 22:06fb2a93a1f6 15 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,
donatien 22:06fb2a93a1f6 16 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
donatien 22:06fb2a93a1f6 17 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
donatien 22:06fb2a93a1f6 18 */
donatien 0:3b2f052c333b 19
ashleymills 75:a6ac8206a58d 20 #define __DEBUG__ 4
donatien 0:3b2f052c333b 21 #ifndef __MODULE__
donatien 0:3b2f052c333b 22 #define __MODULE__ "SMSInterface.cpp"
donatien 0:3b2f052c333b 23 #endif
donatien 0:3b2f052c333b 24
donatien 0:3b2f052c333b 25 #include "core/fwk.h"
donatien 0:3b2f052c333b 26
donatien 0:3b2f052c333b 27 #include "SMSInterface.h"
donatien 0:3b2f052c333b 28
donatien 0:3b2f052c333b 29 #include <cstdio>
donatien 60:6f42a974eea6 30 #include <cstring>
donatien 0:3b2f052c333b 31
donatien 0:3b2f052c333b 32 #define DEFAULT_TIMEOUT 10000
donatien 0:3b2f052c333b 33
donatien 26:d37501dc6c61 34 SMSInterface::SMSInterface(ATCommandsInterface* pIf) : m_pIf(pIf), m_msg(NULL), m_maxMsgLength(0), m_msisdn(NULL)
donatien 0:3b2f052c333b 35 {
donatien 0:3b2f052c333b 36 m_pIf->registerEventsHandler(this); //Add us to the unsolicited result codes handlers
donatien 0:3b2f052c333b 37 }
donatien 0:3b2f052c333b 38
donatien 0:3b2f052c333b 39 int SMSInterface::init()
donatien 0:3b2f052c333b 40 {
donatien 26:d37501dc6c61 41 m_msgRefListCount = 0;
donatien 26:d37501dc6c61 42 m_needsUpdate = true;
donatien 26:d37501dc6c61 43 m_state = SMS_IDLE;
donatien 26:d37501dc6c61 44
donatien 0:3b2f052c333b 45 DBG("Set format");
donatien 0:3b2f052c333b 46 //Set Text mode format
donatien 0:3b2f052c333b 47 int ret = m_pIf->executeSimple("AT+CMGF=1", NULL, DEFAULT_TIMEOUT);
donatien 0:3b2f052c333b 48 if(ret != OK)
donatien 0:3b2f052c333b 49 {
donatien 0:3b2f052c333b 50 return NET_PROTOCOL;
donatien 0:3b2f052c333b 51 }
donatien 0:3b2f052c333b 52
donatien 0:3b2f052c333b 53 DBG("Setup new messages indication");
donatien 0:3b2f052c333b 54 //Setup new messages indication
donatien 0:3b2f052c333b 55 ret = m_pIf->executeSimple("AT+CNMI=2,1,0,0,0", NULL, DEFAULT_TIMEOUT);
donatien 0:3b2f052c333b 56 if(ret != OK)
donatien 0:3b2f052c333b 57 {
donatien 0:3b2f052c333b 58 return NET_PROTOCOL;
donatien 0:3b2f052c333b 59 }
donatien 0:3b2f052c333b 60
donatien 0:3b2f052c333b 61 DBG("Try to fetch inbox");
donatien 0:3b2f052c333b 62 m_inboxMtx.lock();
donatien 0:3b2f052c333b 63 if( m_needsUpdate )
donatien 0:3b2f052c333b 64 {
donatien 0:3b2f052c333b 65 ret = updateInbox(); //Fetch existing messages references
donatien 0:3b2f052c333b 66 if(ret)
donatien 0:3b2f052c333b 67 {
donatien 0:3b2f052c333b 68 m_inboxMtx.unlock();
donatien 0:3b2f052c333b 69 return NET_PROTOCOL;
donatien 0:3b2f052c333b 70 }
donatien 0:3b2f052c333b 71 }
donatien 0:3b2f052c333b 72 m_inboxMtx.unlock();
donatien 0:3b2f052c333b 73
donatien 0:3b2f052c333b 74 DBG("Initialization done");
donatien 0:3b2f052c333b 75 return OK;
donatien 0:3b2f052c333b 76 }
donatien 0:3b2f052c333b 77
donatien 0:3b2f052c333b 78 int SMSInterface::send(const char* number, const char* message)
donatien 0:3b2f052c333b 79 {
donatien 0:3b2f052c333b 80 if( strlen(number) > 16 )
donatien 0:3b2f052c333b 81 {
donatien 0:3b2f052c333b 82 return NET_INVALID; //Number too long to match 3GPP spec
donatien 0:3b2f052c333b 83 }
donatien 0:3b2f052c333b 84
donatien 0:3b2f052c333b 85 int ret;
donatien 0:3b2f052c333b 86
donatien 0:3b2f052c333b 87 //Prepare infos
donatien 0:3b2f052c333b 88 m_state = SMS_SEND_CMD_SENT;
donatien 0:3b2f052c333b 89 m_msg = (char*) message;
donatien 0:3b2f052c333b 90
donatien 0:3b2f052c333b 91 DBG("Send SM");
donatien 0:3b2f052c333b 92 //Send command
donatien 0:3b2f052c333b 93 char cmd[32];
donatien 0:3b2f052c333b 94 std::sprintf(cmd, "AT+CMGS=\"%s\"", number);
donatien 0:3b2f052c333b 95 ret = m_pIf->execute(cmd, this, NULL, DEFAULT_TIMEOUT);
donatien 0:3b2f052c333b 96
donatien 0:3b2f052c333b 97 if( (ret != OK) || (m_state != SMS_CMD_PROCESSED) )
donatien 0:3b2f052c333b 98 {
donatien 0:3b2f052c333b 99 WARN("ret %d, state %d", ret, m_state);
donatien 0:3b2f052c333b 100 m_state = SMS_IDLE;
donatien 0:3b2f052c333b 101 return NET_PROTOCOL;
donatien 0:3b2f052c333b 102 }
donatien 0:3b2f052c333b 103
donatien 0:3b2f052c333b 104 DBG("SM sent");
donatien 0:3b2f052c333b 105 m_state = SMS_IDLE;
donatien 0:3b2f052c333b 106 return OK;
donatien 0:3b2f052c333b 107 }
donatien 0:3b2f052c333b 108
donatien 0:3b2f052c333b 109
donatien 0:3b2f052c333b 110 int SMSInterface::get(char* number, char* message, size_t maxLength)
donatien 0:3b2f052c333b 111 {
donatien 0:3b2f052c333b 112 if( maxLength < 1 )
donatien 0:3b2f052c333b 113 {
donatien 0:3b2f052c333b 114 return NET_INVALID; //Buffer too short
donatien 0:3b2f052c333b 115 }
donatien 0:3b2f052c333b 116
donatien 0:3b2f052c333b 117 int ret;
donatien 0:3b2f052c333b 118
donatien 0:3b2f052c333b 119 DBG("Get next message");
donatien 0:3b2f052c333b 120 m_inboxMtx.lock();
donatien 56:f1965f3f4504 121 if( ((m_msgRefListCount == 0) && m_needsUpdate) || ((m_msgRefListCount > 0) && (m_msgRefList[0] == -1)) )
donatien 0:3b2f052c333b 122 {
donatien 56:f1965f3f4504 123 DBG("Message list count is 0 and needs updating or next index is unknown, calling updateInbox()");
donatien 0:3b2f052c333b 124 ret = updateInbox();
nherriot 39:85dc5ca10b7f 125
donatien 0:3b2f052c333b 126 if (ret)
donatien 0:3b2f052c333b 127 {
donatien 0:3b2f052c333b 128 m_inboxMtx.unlock();
donatien 0:3b2f052c333b 129 return ret;
donatien 0:3b2f052c333b 130 }
donatien 0:3b2f052c333b 131 }
donatien 56:f1965f3f4504 132
donatien 56:f1965f3f4504 133 DBG("%d messages to read", m_msgRefListCount);
donatien 0:3b2f052c333b 134
donatien 0:3b2f052c333b 135 if(m_msgRefListCount == 0)
donatien 0:3b2f052c333b 136 {
donatien 0:3b2f052c333b 137 m_inboxMtx.unlock();
nherriot 39:85dc5ca10b7f 138 DBG("Message list count is 0, I think it's empty and returning.");
donatien 0:3b2f052c333b 139 return NET_EMPTY; //No message to read
donatien 0:3b2f052c333b 140 }
donatien 0:3b2f052c333b 141
donatien 0:3b2f052c333b 142 //Prepare infos
donatien 0:3b2f052c333b 143 m_state = SMS_GET_CMD_SENT;
donatien 0:3b2f052c333b 144 m_msisdn = (char*) number;
donatien 0:3b2f052c333b 145 m_msg = (char*) message;
donatien 0:3b2f052c333b 146 m_maxMsgLength = maxLength;
donatien 0:3b2f052c333b 147
donatien 0:3b2f052c333b 148 DBG("Get SMS");
donatien 0:3b2f052c333b 149 //List command
donatien 0:3b2f052c333b 150 char cmd[32];
donatien 0:3b2f052c333b 151 std::sprintf(cmd, "AT+CMGR=%d", m_msgRefList[0]);
donatien 0:3b2f052c333b 152 ret = m_pIf->execute(cmd, this, NULL, DEFAULT_TIMEOUT);
donatien 0:3b2f052c333b 153 if( ret != OK )
donatien 0:3b2f052c333b 154 {
donatien 0:3b2f052c333b 155 WARN("AT+CMGR returned %d", ret);
donatien 0:3b2f052c333b 156 m_state = SMS_IDLE;
donatien 0:3b2f052c333b 157 m_inboxMtx.unlock();
donatien 0:3b2f052c333b 158 return NET_PROTOCOL;
donatien 0:3b2f052c333b 159 }
donatien 0:3b2f052c333b 160
donatien 0:3b2f052c333b 161 if (m_state != SMS_CMD_PROCESSED)
donatien 0:3b2f052c333b 162 {
donatien 50:8ad4cb12749d 163 WARN("State variable is not 'SMS_CMD_PROCESSED' - returning 'NET_EMPTY'");
donatien 0:3b2f052c333b 164 }
donatien 0:3b2f052c333b 165
ashleymills 42:daa4dd282103 166 DBG("Deleting message from index number: %d", m_msgRefList[0] );
donatien 0:3b2f052c333b 167 //Delete message from outbox
donatien 0:3b2f052c333b 168 std::sprintf(cmd, "AT+CMGD=%d", m_msgRefList[0]);
donatien 0:3b2f052c333b 169 ret = m_pIf->executeSimple(cmd, NULL, DEFAULT_TIMEOUT);
donatien 0:3b2f052c333b 170 if(ret != OK)
donatien 0:3b2f052c333b 171 {
donatien 50:8ad4cb12749d 172 ERR("Could not delete message");
donatien 0:3b2f052c333b 173 }
donatien 0:3b2f052c333b 174 //Remove message from list
donatien 56:f1965f3f4504 175 std::memmove(&m_msgRefList[0], &m_msgRefList[1], MIN(m_msgRefListCount-1,MAX_SM-1)*sizeof(m_msgRefList[0]));
donatien 0:3b2f052c333b 176 m_msgRefListCount--;
donatien 50:8ad4cb12749d 177
donatien 56:f1965f3f4504 178 if(m_msgRefListCount > MAX_SM - 1) //Last message index is unknown, so put -1 to tell the lib to fetch it when needed
donatien 56:f1965f3f4504 179 {
donatien 56:f1965f3f4504 180 DBG("Last message index is unknown, will need to be updated");
donatien 56:f1965f3f4504 181 m_msgRefList[MAX_SM - 1] = -1;
donatien 56:f1965f3f4504 182 }
donatien 56:f1965f3f4504 183
donatien 56:f1965f3f4504 184 DBG("%d messages to read", m_msgRefListCount);
donatien 56:f1965f3f4504 185
donatien 50:8ad4cb12749d 186 if (m_state != SMS_CMD_PROCESSED)
donatien 50:8ad4cb12749d 187 {
donatien 50:8ad4cb12749d 188 m_state = SMS_IDLE;
donatien 50:8ad4cb12749d 189 m_inboxMtx.unlock();
donatien 50:8ad4cb12749d 190 return NET_EMPTY;
donatien 50:8ad4cb12749d 191 }
donatien 50:8ad4cb12749d 192
donatien 50:8ad4cb12749d 193 m_state = SMS_IDLE;
donatien 0:3b2f052c333b 194 m_inboxMtx.unlock();
donatien 0:3b2f052c333b 195
donatien 0:3b2f052c333b 196 return OK;
donatien 0:3b2f052c333b 197 }
donatien 0:3b2f052c333b 198
donatien 0:3b2f052c333b 199
donatien 0:3b2f052c333b 200 int SMSInterface::getCount(size_t* pCount)
donatien 0:3b2f052c333b 201 {
donatien 0:3b2f052c333b 202 int ret;
donatien 0:3b2f052c333b 203
donatien 0:3b2f052c333b 204 m_inboxMtx.lock();
donatien 0:3b2f052c333b 205 if( m_needsUpdate )
donatien 0:3b2f052c333b 206 {
donatien 0:3b2f052c333b 207 ret = updateInbox();
donatien 0:3b2f052c333b 208 if(ret)
donatien 0:3b2f052c333b 209 {
donatien 0:3b2f052c333b 210 m_inboxMtx.unlock();
donatien 0:3b2f052c333b 211 return NET_PROTOCOL;
donatien 0:3b2f052c333b 212 }
donatien 0:3b2f052c333b 213 }
donatien 0:3b2f052c333b 214
donatien 0:3b2f052c333b 215 *pCount = m_msgRefListCount;
donatien 0:3b2f052c333b 216 m_inboxMtx.unlock();
donatien 0:3b2f052c333b 217
donatien 0:3b2f052c333b 218 return OK;
donatien 0:3b2f052c333b 219 }
donatien 0:3b2f052c333b 220
donatien 0:3b2f052c333b 221
donatien 0:3b2f052c333b 222 /*virtual*/ int SMSInterface::onNewATResponseLine(ATCommandsInterface* pInst, const char* line)
donatien 0:3b2f052c333b 223 {
donatien 0:3b2f052c333b 224 if(m_state == SMS_SEND_CMD_SENT)
donatien 0:3b2f052c333b 225 {
donatien 0:3b2f052c333b 226 if( std::sscanf(line, "+CMGS: %*d") == 0 )
donatien 0:3b2f052c333b 227 {
donatien 0:3b2f052c333b 228 DBG("SM sent");
donatien 0:3b2f052c333b 229 m_state = SMS_CMD_PROCESSED;
donatien 0:3b2f052c333b 230 }
donatien 0:3b2f052c333b 231 }
donatien 0:3b2f052c333b 232 else if(m_state == SMS_GET_CMD_SENT)
donatien 0:3b2f052c333b 233 {
donatien 0:3b2f052c333b 234 DBG("Header: %s", line);
donatien 0:3b2f052c333b 235 if( std::sscanf(line, "+CMGR: %*[^,],\"%16[^\"]\"", m_msisdn) == 1 ) //Get message ref
donatien 0:3b2f052c333b 236 {
donatien 0:3b2f052c333b 237 m_state = SMS_GET_HDR_RECEIVED;
donatien 0:3b2f052c333b 238 }
donatien 0:3b2f052c333b 239 }
donatien 0:3b2f052c333b 240 else if(m_state == SMS_GET_HDR_RECEIVED)
donatien 0:3b2f052c333b 241 {
donatien 0:3b2f052c333b 242 DBG("Message: %s", line);
donatien 0:3b2f052c333b 243 size_t cpyLen = MIN( std::strlen(line), m_maxMsgLength - 1 );
donatien 0:3b2f052c333b 244 std::memcpy( m_msg, line, cpyLen );
donatien 0:3b2f052c333b 245 m_msg[cpyLen] = '\0';
donatien 0:3b2f052c333b 246 m_state = SMS_CMD_PROCESSED;
donatien 0:3b2f052c333b 247 }
donatien 0:3b2f052c333b 248 else if(m_state == SMS_GET_COUNT_CMD_SENT)
donatien 0:3b2f052c333b 249 {
donatien 0:3b2f052c333b 250 DBG("Header: %s", line);
donatien 0:3b2f052c333b 251 int msgRef;
donatien 28:c94ffb45a848 252 if( std::sscanf(line, "+CMGL: %d,\"REC", &msgRef) == 1 ) //Filter on REC READ and REC UNREAD messages
donatien 0:3b2f052c333b 253 {
donatien 0:3b2f052c333b 254 m_state = SMS_GET_COUNT_HDR_RECEIVED;
donatien 0:3b2f052c333b 255 //Add message to list
donatien 0:3b2f052c333b 256 if(m_msgRefListCount < MAX_SM)
donatien 0:3b2f052c333b 257 {
donatien 0:3b2f052c333b 258 m_msgRefList[m_msgRefListCount] = msgRef;
donatien 0:3b2f052c333b 259 }
donatien 0:3b2f052c333b 260 m_msgRefListCount++; //Always count message
donatien 0:3b2f052c333b 261 DBG("m_msgRefListCount=%d",m_msgRefListCount);
donatien 0:3b2f052c333b 262 }
donatien 0:3b2f052c333b 263 }
donatien 0:3b2f052c333b 264 else if(m_state == SMS_GET_COUNT_HDR_RECEIVED)
donatien 0:3b2f052c333b 265 {
donatien 0:3b2f052c333b 266 DBG("Message (debug only): %s", line); //For debug only
donatien 0:3b2f052c333b 267 m_state = SMS_GET_COUNT_CMD_SENT;
donatien 0:3b2f052c333b 268 }
donatien 0:3b2f052c333b 269 return OK;
donatien 0:3b2f052c333b 270 }
donatien 0:3b2f052c333b 271
donatien 0:3b2f052c333b 272 /*virtual*/ int SMSInterface::onNewEntryPrompt(ATCommandsInterface* pInst)
donatien 0:3b2f052c333b 273 {
donatien 0:3b2f052c333b 274 if(m_state == SMS_SEND_CMD_SENT)
donatien 0:3b2f052c333b 275 {
donatien 0:3b2f052c333b 276 char* crPtr = strchr(m_msg, CR);
donatien 0:3b2f052c333b 277 if(crPtr != NULL)
donatien 0:3b2f052c333b 278 {
donatien 0:3b2f052c333b 279 int crPos = crPtr - m_msg;
donatien 0:3b2f052c333b 280 //Replace m_inputBuf[crPos] with null-terminating char
donatien 0:3b2f052c333b 281 m_msg[crPos] = '\x0';
donatien 0:3b2f052c333b 282
donatien 0:3b2f052c333b 283 //If there is a CR char, split message there
donatien 0:3b2f052c333b 284
donatien 0:3b2f052c333b 285 //Do print the message
donatien 0:3b2f052c333b 286 int ret = pInst->sendData(m_msg);
donatien 0:3b2f052c333b 287 if(ret)
donatien 0:3b2f052c333b 288 {
donatien 0:3b2f052c333b 289 return ret;
donatien 0:3b2f052c333b 290 }
donatien 0:3b2f052c333b 291
donatien 0:3b2f052c333b 292 char cr[2] = {CR, '\0'};
donatien 0:3b2f052c333b 293 ret = pInst->sendData(cr);
donatien 0:3b2f052c333b 294 if(ret)
donatien 0:3b2f052c333b 295 {
donatien 0:3b2f052c333b 296 return ret;
donatien 0:3b2f052c333b 297 }
donatien 0:3b2f052c333b 298
donatien 0:3b2f052c333b 299 m_msg += crPos;
donatien 0:3b2f052c333b 300
donatien 0:3b2f052c333b 301 if(m_msg[0] == LF)
donatien 0:3b2f052c333b 302 {
donatien 0:3b2f052c333b 303 m_msg++; //Discard LF char as well
donatien 0:3b2f052c333b 304 }
donatien 0:3b2f052c333b 305
donatien 0:3b2f052c333b 306 return NET_MOREINFO;
donatien 0:3b2f052c333b 307 }
donatien 0:3b2f052c333b 308 else
donatien 0:3b2f052c333b 309 {
donatien 0:3b2f052c333b 310 //Do print the message
donatien 0:3b2f052c333b 311 pInst->sendData(m_msg);
donatien 0:3b2f052c333b 312 return OK;
donatien 0:3b2f052c333b 313 }
donatien 0:3b2f052c333b 314 }
donatien 0:3b2f052c333b 315
donatien 0:3b2f052c333b 316 return OK;
donatien 0:3b2f052c333b 317 }
donatien 0:3b2f052c333b 318
donatien 0:3b2f052c333b 319 /*virtual*/ bool SMSInterface::isATCodeHandled(const char* atCode) //Is this AT code handled
donatien 0:3b2f052c333b 320 {
donatien 0:3b2f052c333b 321 DBG("AT code is %s", atCode);
donatien 0:3b2f052c333b 322 if( strcmp("+CMTI", atCode) == 0 )
donatien 0:3b2f052c333b 323 {
donatien 0:3b2f052c333b 324 return true;
donatien 0:3b2f052c333b 325 }
donatien 0:3b2f052c333b 326
donatien 0:3b2f052c333b 327 DBG("Not handled");
donatien 0:3b2f052c333b 328 return false;
donatien 0:3b2f052c333b 329 }
donatien 0:3b2f052c333b 330
donatien 0:3b2f052c333b 331 /*virtual*/ void SMSInterface::onDispatchStart()
donatien 0:3b2f052c333b 332 {
donatien 57:593fb493172f 333
donatien 0:3b2f052c333b 334 }
donatien 0:3b2f052c333b 335
donatien 0:3b2f052c333b 336 /*virtual*/ void SMSInterface::onDispatchStop()
donatien 0:3b2f052c333b 337 {
donatien 57:593fb493172f 338
donatien 57:593fb493172f 339 }
donatien 0:3b2f052c333b 340
donatien 57:593fb493172f 341 /*virtual*/ char* SMSInterface::getEventsEnableCommand()
donatien 57:593fb493172f 342 {
donatien 57:593fb493172f 343 return "AT+CNMI=2,1,0,0,0";
donatien 57:593fb493172f 344 }
donatien 57:593fb493172f 345
donatien 57:593fb493172f 346 /*virtual*/ char* SMSInterface::getEventsDisableCommand()
donatien 57:593fb493172f 347 {
donatien 57:593fb493172f 348 return "AT+CNMI=0,0,0,0,0"; //Indications will be buffered within the modem and flushed back when the former command is executed
donatien 0:3b2f052c333b 349 }
donatien 0:3b2f052c333b 350
donatien 0:3b2f052c333b 351 /*virtual*/ void SMSInterface::onEvent(const char* atCode, const char* evt)
donatien 0:3b2f052c333b 352 {
donatien 0:3b2f052c333b 353 if( strcmp("+CMTI", atCode) != 0 )
donatien 0:3b2f052c333b 354 {
donatien 0:3b2f052c333b 355 return; //Not supported
donatien 0:3b2f052c333b 356 }
donatien 0:3b2f052c333b 357
donatien 0:3b2f052c333b 358 DBG("Unsollicited result code: %s - %s", atCode, evt);
donatien 0:3b2f052c333b 359
donatien 0:3b2f052c333b 360 //Get index
donatien 0:3b2f052c333b 361 int msgRef;
donatien 0:3b2f052c333b 362 if( std::sscanf(evt, "\"SM\",%d", &msgRef) == 1 )
donatien 0:3b2f052c333b 363 {
donatien 0:3b2f052c333b 364 DBG("Adding message to list (ref %d)", msgRef);
donatien 50:8ad4cb12749d 365 if(m_inboxMtx.trylock())
donatien 0:3b2f052c333b 366 {
donatien 50:8ad4cb12749d 367 //Add message to list
donatien 50:8ad4cb12749d 368 if(m_msgRefListCount < MAX_SM)
donatien 50:8ad4cb12749d 369 {
donatien 50:8ad4cb12749d 370 m_msgRefList[m_msgRefListCount] = msgRef;
donatien 50:8ad4cb12749d 371 }
donatien 50:8ad4cb12749d 372 m_msgRefListCount++; //Always count message
donatien 50:8ad4cb12749d 373 m_inboxMtx.unlock();
donatien 0:3b2f052c333b 374 }
donatien 0:3b2f052c333b 375 else
donatien 0:3b2f052c333b 376 {
donatien 50:8ad4cb12749d 377 WARN("Could not get lock");
donatien 0:3b2f052c333b 378 m_needsUpdate = true;
donatien 0:3b2f052c333b 379 }
donatien 0:3b2f052c333b 380 }
donatien 0:3b2f052c333b 381 }
donatien 0:3b2f052c333b 382
donatien 0:3b2f052c333b 383 int SMSInterface::updateInbox()
donatien 0:3b2f052c333b 384 {
donatien 0:3b2f052c333b 385 //Get memory indexes of unread messages
donatien 0:3b2f052c333b 386
donatien 0:3b2f052c333b 387 DBG("Updating inbox");
donatien 0:3b2f052c333b 388 m_msgRefListCount = 0; //Reset list
donatien 50:8ad4cb12749d 389 m_needsUpdate = false; //Assume we won't need update after this routine (can be set to true by an incoming SM event)
donatien 0:3b2f052c333b 390
donatien 28:c94ffb45a848 391 //First list the "REC READ" messages that were not processed in the previous session
donatien 28:c94ffb45a848 392 m_state = SMS_GET_COUNT_CMD_SENT;
donatien 28:c94ffb45a848 393 int ret = m_pIf->execute("AT+CMGL=\"REC READ\"", this, NULL, DEFAULT_TIMEOUT);
donatien 28:c94ffb45a848 394 if( ret != OK )
donatien 28:c94ffb45a848 395 {
donatien 28:c94ffb45a848 396 WARN("AT+CMGL returned %d", ret);
donatien 28:c94ffb45a848 397 m_state = SMS_IDLE;
donatien 28:c94ffb45a848 398 m_msgRefListCount = 0; //List could be invalid
donatien 28:c94ffb45a848 399 m_needsUpdate = true;
donatien 28:c94ffb45a848 400 return NET_PROTOCOL;
donatien 28:c94ffb45a848 401 }
donatien 28:c94ffb45a848 402
donatien 50:8ad4cb12749d 403 //Now list the "REC UNREAD" messages that were received by the modem since
donatien 28:c94ffb45a848 404 m_state = SMS_GET_COUNT_CMD_SENT;
donatien 28:c94ffb45a848 405 ret = m_pIf->execute("AT+CMGL=\"REC UNREAD\"", this, NULL, DEFAULT_TIMEOUT);
donatien 0:3b2f052c333b 406 if( ret != OK )
donatien 0:3b2f052c333b 407 {
donatien 0:3b2f052c333b 408 WARN("AT+CMGL returned %d", ret);
donatien 0:3b2f052c333b 409 m_state = SMS_IDLE;
donatien 0:3b2f052c333b 410 m_msgRefListCount = 0; //List could be invalid
donatien 0:3b2f052c333b 411 m_needsUpdate = true;
donatien 0:3b2f052c333b 412 return NET_PROTOCOL;
donatien 0:3b2f052c333b 413 }
donatien 0:3b2f052c333b 414
donatien 0:3b2f052c333b 415 DBG("%d incoming messages in inbox", m_msgRefListCount);
donatien 0:3b2f052c333b 416
donatien 0:3b2f052c333b 417 m_state = SMS_IDLE;
donatien 0:3b2f052c333b 418
donatien 0:3b2f052c333b 419 return OK;
donatien 0:3b2f052c333b 420 }
donatien 0:3b2f052c333b 421
donatien 0:3b2f052c333b 422