Vodafone K3770/K3772-Z modems driver & networking library
Dependencies: Socket USBHostWANDongle lwip-sys lwip
Dependents: VodafoneUSBModemHTTPClientTest VodafoneUSBModemNTPClientTest VodafoneUSBModemSMSTest VodafoneUSBModemUSSDTest ... more
Fork of VodafoneUSBModem_bleedingedge by
This is the driver for the Vodafone K3700 & K3772-Z Dongles:
More details and instructions can be found here.
sms/SMSInterface.cpp@84:39e28d162195, 2013-03-08 (annotated)
- Committer:
- ashleymills
- Date:
- Fri Mar 08 10:21:36 2013 +0000
- Revision:
- 84:39e28d162195
- Parent:
- 83:897a0de9d668
- Child:
- 91:7b311719374d
Merged MU509 and K3773 changes.
Who changed what in which revision?
User | Revision | Line number | New 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 | 80:c0e63c16306e | 20 | #define __DEBUG__ 0 |
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 | 62: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 | { |
ashleymills | 83:897a0de9d668 | 36 | DBG("registering sms"); |
donatien | 0:3b2f052c333b | 37 | m_pIf->registerEventsHandler(this); //Add us to the unsolicited result codes handlers |
donatien | 0:3b2f052c333b | 38 | } |
donatien | 0:3b2f052c333b | 39 | |
donatien | 0:3b2f052c333b | 40 | int SMSInterface::init() |
donatien | 0:3b2f052c333b | 41 | { |
donatien | 26:d37501dc6c61 | 42 | m_msgRefListCount = 0; |
donatien | 26:d37501dc6c61 | 43 | m_needsUpdate = true; |
donatien | 26:d37501dc6c61 | 44 | m_state = SMS_IDLE; |
donatien | 26:d37501dc6c61 | 45 | |
donatien | 0:3b2f052c333b | 46 | DBG("Set format"); |
donatien | 0:3b2f052c333b | 47 | //Set Text mode format |
donatien | 0:3b2f052c333b | 48 | int ret = m_pIf->executeSimple("AT+CMGF=1", NULL, DEFAULT_TIMEOUT); |
donatien | 0:3b2f052c333b | 49 | if(ret != OK) |
donatien | 0:3b2f052c333b | 50 | { |
donatien | 0:3b2f052c333b | 51 | return NET_PROTOCOL; |
donatien | 0:3b2f052c333b | 52 | } |
donatien | 0:3b2f052c333b | 53 | |
donatien | 0:3b2f052c333b | 54 | DBG("Setup new messages indication"); |
donatien | 0:3b2f052c333b | 55 | //Setup new messages indication |
donatien | 0:3b2f052c333b | 56 | ret = m_pIf->executeSimple("AT+CNMI=2,1,0,0,0", NULL, DEFAULT_TIMEOUT); |
donatien | 0:3b2f052c333b | 57 | if(ret != OK) |
donatien | 0:3b2f052c333b | 58 | { |
donatien | 0:3b2f052c333b | 59 | return NET_PROTOCOL; |
donatien | 0:3b2f052c333b | 60 | } |
donatien | 0:3b2f052c333b | 61 | |
donatien | 0:3b2f052c333b | 62 | DBG("Try to fetch inbox"); |
donatien | 0:3b2f052c333b | 63 | m_inboxMtx.lock(); |
donatien | 0:3b2f052c333b | 64 | if( m_needsUpdate ) |
donatien | 0:3b2f052c333b | 65 | { |
donatien | 0:3b2f052c333b | 66 | ret = updateInbox(); //Fetch existing messages references |
donatien | 0:3b2f052c333b | 67 | if(ret) |
donatien | 0:3b2f052c333b | 68 | { |
donatien | 0:3b2f052c333b | 69 | m_inboxMtx.unlock(); |
donatien | 0:3b2f052c333b | 70 | return NET_PROTOCOL; |
donatien | 0:3b2f052c333b | 71 | } |
donatien | 0:3b2f052c333b | 72 | } |
donatien | 0:3b2f052c333b | 73 | m_inboxMtx.unlock(); |
donatien | 0:3b2f052c333b | 74 | |
donatien | 0:3b2f052c333b | 75 | DBG("Initialization done"); |
donatien | 0:3b2f052c333b | 76 | return OK; |
donatien | 0:3b2f052c333b | 77 | } |
donatien | 0:3b2f052c333b | 78 | |
donatien | 0:3b2f052c333b | 79 | int SMSInterface::send(const char* number, const char* message) |
donatien | 0:3b2f052c333b | 80 | { |
donatien | 0:3b2f052c333b | 81 | if( strlen(number) > 16 ) |
donatien | 0:3b2f052c333b | 82 | { |
donatien | 0:3b2f052c333b | 83 | return NET_INVALID; //Number too long to match 3GPP spec |
donatien | 0:3b2f052c333b | 84 | } |
donatien | 0:3b2f052c333b | 85 | |
donatien | 0:3b2f052c333b | 86 | int ret; |
donatien | 0:3b2f052c333b | 87 | |
donatien | 0:3b2f052c333b | 88 | //Prepare infos |
donatien | 0:3b2f052c333b | 89 | m_state = SMS_SEND_CMD_SENT; |
donatien | 0:3b2f052c333b | 90 | m_msg = (char*) message; |
donatien | 0:3b2f052c333b | 91 | |
donatien | 0:3b2f052c333b | 92 | DBG("Send SM"); |
donatien | 0:3b2f052c333b | 93 | //Send command |
donatien | 0:3b2f052c333b | 94 | char cmd[32]; |
donatien | 0:3b2f052c333b | 95 | std::sprintf(cmd, "AT+CMGS=\"%s\"", number); |
donatien | 0:3b2f052c333b | 96 | ret = m_pIf->execute(cmd, this, NULL, DEFAULT_TIMEOUT); |
donatien | 0:3b2f052c333b | 97 | |
donatien | 0:3b2f052c333b | 98 | if( (ret != OK) || (m_state != SMS_CMD_PROCESSED) ) |
donatien | 0:3b2f052c333b | 99 | { |
donatien | 0:3b2f052c333b | 100 | WARN("ret %d, state %d", ret, m_state); |
donatien | 0:3b2f052c333b | 101 | m_state = SMS_IDLE; |
donatien | 0:3b2f052c333b | 102 | return NET_PROTOCOL; |
donatien | 0:3b2f052c333b | 103 | } |
donatien | 0:3b2f052c333b | 104 | |
donatien | 0:3b2f052c333b | 105 | DBG("SM sent"); |
donatien | 0:3b2f052c333b | 106 | m_state = SMS_IDLE; |
donatien | 0:3b2f052c333b | 107 | return OK; |
donatien | 0:3b2f052c333b | 108 | } |
donatien | 0:3b2f052c333b | 109 | |
donatien | 0:3b2f052c333b | 110 | |
donatien | 0:3b2f052c333b | 111 | int SMSInterface::get(char* number, char* message, size_t maxLength) |
donatien | 0:3b2f052c333b | 112 | { |
donatien | 0:3b2f052c333b | 113 | if( maxLength < 1 ) |
donatien | 0:3b2f052c333b | 114 | { |
donatien | 0:3b2f052c333b | 115 | return NET_INVALID; //Buffer too short |
donatien | 0:3b2f052c333b | 116 | } |
donatien | 0:3b2f052c333b | 117 | |
donatien | 0:3b2f052c333b | 118 | int ret; |
donatien | 0:3b2f052c333b | 119 | |
donatien | 0:3b2f052c333b | 120 | DBG("Get next message"); |
ashleymills | 80:c0e63c16306e | 121 | |
donatien | 0:3b2f052c333b | 122 | m_inboxMtx.lock(); |
donatien | 58:f1965f3f4504 | 123 | if( ((m_msgRefListCount == 0) && m_needsUpdate) || ((m_msgRefListCount > 0) && (m_msgRefList[0] == -1)) ) |
donatien | 0:3b2f052c333b | 124 | { |
donatien | 58:f1965f3f4504 | 125 | DBG("Message list count is 0 and needs updating or next index is unknown, calling updateInbox()"); |
donatien | 0:3b2f052c333b | 126 | ret = updateInbox(); |
nherriot | 39:85dc5ca10b7f | 127 | |
donatien | 0:3b2f052c333b | 128 | if (ret) |
donatien | 0:3b2f052c333b | 129 | { |
donatien | 0:3b2f052c333b | 130 | m_inboxMtx.unlock(); |
donatien | 0:3b2f052c333b | 131 | return ret; |
donatien | 0:3b2f052c333b | 132 | } |
donatien | 0:3b2f052c333b | 133 | } |
donatien | 58:f1965f3f4504 | 134 | |
donatien | 58:f1965f3f4504 | 135 | DBG("%d messages to read", m_msgRefListCount); |
donatien | 0:3b2f052c333b | 136 | |
donatien | 0:3b2f052c333b | 137 | if(m_msgRefListCount == 0) |
donatien | 0:3b2f052c333b | 138 | { |
donatien | 0:3b2f052c333b | 139 | m_inboxMtx.unlock(); |
nherriot | 39:85dc5ca10b7f | 140 | DBG("Message list count is 0, I think it's empty and returning."); |
donatien | 0:3b2f052c333b | 141 | return NET_EMPTY; //No message to read |
donatien | 0:3b2f052c333b | 142 | } |
donatien | 0:3b2f052c333b | 143 | |
donatien | 0:3b2f052c333b | 144 | //Prepare infos |
donatien | 0:3b2f052c333b | 145 | m_state = SMS_GET_CMD_SENT; |
donatien | 0:3b2f052c333b | 146 | m_msisdn = (char*) number; |
donatien | 0:3b2f052c333b | 147 | m_msg = (char*) message; |
donatien | 0:3b2f052c333b | 148 | m_maxMsgLength = maxLength; |
donatien | 0:3b2f052c333b | 149 | |
donatien | 0:3b2f052c333b | 150 | DBG("Get SMS"); |
donatien | 0:3b2f052c333b | 151 | //List command |
donatien | 0:3b2f052c333b | 152 | char cmd[32]; |
donatien | 0:3b2f052c333b | 153 | std::sprintf(cmd, "AT+CMGR=%d", m_msgRefList[0]); |
donatien | 0:3b2f052c333b | 154 | ret = m_pIf->execute(cmd, this, NULL, DEFAULT_TIMEOUT); |
donatien | 0:3b2f052c333b | 155 | if( ret != OK ) |
donatien | 0:3b2f052c333b | 156 | { |
donatien | 0:3b2f052c333b | 157 | WARN("AT+CMGR returned %d", ret); |
donatien | 0:3b2f052c333b | 158 | m_state = SMS_IDLE; |
donatien | 0:3b2f052c333b | 159 | m_inboxMtx.unlock(); |
donatien | 0:3b2f052c333b | 160 | return NET_PROTOCOL; |
donatien | 0:3b2f052c333b | 161 | } |
donatien | 0:3b2f052c333b | 162 | |
donatien | 0:3b2f052c333b | 163 | if (m_state != SMS_CMD_PROCESSED) |
donatien | 0:3b2f052c333b | 164 | { |
donatien | 50:8ad4cb12749d | 165 | WARN("State variable is not 'SMS_CMD_PROCESSED' - returning 'NET_EMPTY'"); |
donatien | 0:3b2f052c333b | 166 | } |
donatien | 0:3b2f052c333b | 167 | |
ashleymills | 42:daa4dd282103 | 168 | DBG("Deleting message from index number: %d", m_msgRefList[0] ); |
donatien | 0:3b2f052c333b | 169 | //Delete message from outbox |
donatien | 0:3b2f052c333b | 170 | std::sprintf(cmd, "AT+CMGD=%d", m_msgRefList[0]); |
donatien | 0:3b2f052c333b | 171 | ret = m_pIf->executeSimple(cmd, NULL, DEFAULT_TIMEOUT); |
donatien | 0:3b2f052c333b | 172 | if(ret != OK) |
donatien | 0:3b2f052c333b | 173 | { |
donatien | 50:8ad4cb12749d | 174 | ERR("Could not delete message"); |
donatien | 0:3b2f052c333b | 175 | } |
donatien | 0:3b2f052c333b | 176 | //Remove message from list |
donatien | 58:f1965f3f4504 | 177 | std::memmove(&m_msgRefList[0], &m_msgRefList[1], MIN(m_msgRefListCount-1,MAX_SM-1)*sizeof(m_msgRefList[0])); |
donatien | 0:3b2f052c333b | 178 | m_msgRefListCount--; |
donatien | 50:8ad4cb12749d | 179 | |
donatien | 58:f1965f3f4504 | 180 | if(m_msgRefListCount > MAX_SM - 1) //Last message index is unknown, so put -1 to tell the lib to fetch it when needed |
donatien | 58:f1965f3f4504 | 181 | { |
donatien | 58:f1965f3f4504 | 182 | DBG("Last message index is unknown, will need to be updated"); |
donatien | 58:f1965f3f4504 | 183 | m_msgRefList[MAX_SM - 1] = -1; |
donatien | 58:f1965f3f4504 | 184 | } |
donatien | 58:f1965f3f4504 | 185 | |
donatien | 58:f1965f3f4504 | 186 | DBG("%d messages to read", m_msgRefListCount); |
donatien | 58:f1965f3f4504 | 187 | |
donatien | 50:8ad4cb12749d | 188 | if (m_state != SMS_CMD_PROCESSED) |
donatien | 50:8ad4cb12749d | 189 | { |
donatien | 50:8ad4cb12749d | 190 | m_state = SMS_IDLE; |
donatien | 50:8ad4cb12749d | 191 | m_inboxMtx.unlock(); |
donatien | 50:8ad4cb12749d | 192 | return NET_EMPTY; |
donatien | 50:8ad4cb12749d | 193 | } |
donatien | 50:8ad4cb12749d | 194 | |
donatien | 50:8ad4cb12749d | 195 | m_state = SMS_IDLE; |
donatien | 0:3b2f052c333b | 196 | m_inboxMtx.unlock(); |
donatien | 0:3b2f052c333b | 197 | |
donatien | 0:3b2f052c333b | 198 | return OK; |
donatien | 0:3b2f052c333b | 199 | } |
donatien | 0:3b2f052c333b | 200 | |
donatien | 0:3b2f052c333b | 201 | |
donatien | 0:3b2f052c333b | 202 | int SMSInterface::getCount(size_t* pCount) |
donatien | 0:3b2f052c333b | 203 | { |
donatien | 0:3b2f052c333b | 204 | int ret; |
donatien | 0:3b2f052c333b | 205 | |
donatien | 0:3b2f052c333b | 206 | m_inboxMtx.lock(); |
donatien | 0:3b2f052c333b | 207 | if( m_needsUpdate ) |
donatien | 0:3b2f052c333b | 208 | { |
donatien | 0:3b2f052c333b | 209 | ret = updateInbox(); |
donatien | 0:3b2f052c333b | 210 | if(ret) |
donatien | 0:3b2f052c333b | 211 | { |
donatien | 0:3b2f052c333b | 212 | m_inboxMtx.unlock(); |
donatien | 0:3b2f052c333b | 213 | return NET_PROTOCOL; |
donatien | 0:3b2f052c333b | 214 | } |
donatien | 0:3b2f052c333b | 215 | } |
donatien | 0:3b2f052c333b | 216 | |
donatien | 0:3b2f052c333b | 217 | *pCount = m_msgRefListCount; |
donatien | 0:3b2f052c333b | 218 | m_inboxMtx.unlock(); |
donatien | 0:3b2f052c333b | 219 | |
donatien | 0:3b2f052c333b | 220 | return OK; |
donatien | 0:3b2f052c333b | 221 | } |
donatien | 0:3b2f052c333b | 222 | |
donatien | 0:3b2f052c333b | 223 | |
donatien | 0:3b2f052c333b | 224 | /*virtual*/ int SMSInterface::onNewATResponseLine(ATCommandsInterface* pInst, const char* line) |
donatien | 0:3b2f052c333b | 225 | { |
donatien | 0:3b2f052c333b | 226 | if(m_state == SMS_SEND_CMD_SENT) |
donatien | 0:3b2f052c333b | 227 | { |
donatien | 0:3b2f052c333b | 228 | if( std::sscanf(line, "+CMGS: %*d") == 0 ) |
donatien | 0:3b2f052c333b | 229 | { |
donatien | 0:3b2f052c333b | 230 | DBG("SM sent"); |
donatien | 0:3b2f052c333b | 231 | m_state = SMS_CMD_PROCESSED; |
donatien | 0:3b2f052c333b | 232 | } |
donatien | 0:3b2f052c333b | 233 | } |
donatien | 0:3b2f052c333b | 234 | else if(m_state == SMS_GET_CMD_SENT) |
donatien | 0:3b2f052c333b | 235 | { |
donatien | 0:3b2f052c333b | 236 | DBG("Header: %s", line); |
donatien | 0:3b2f052c333b | 237 | if( std::sscanf(line, "+CMGR: %*[^,],\"%16[^\"]\"", m_msisdn) == 1 ) //Get message ref |
donatien | 0:3b2f052c333b | 238 | { |
donatien | 0:3b2f052c333b | 239 | m_state = SMS_GET_HDR_RECEIVED; |
donatien | 0:3b2f052c333b | 240 | } |
donatien | 0:3b2f052c333b | 241 | } |
donatien | 0:3b2f052c333b | 242 | else if(m_state == SMS_GET_HDR_RECEIVED) |
donatien | 0:3b2f052c333b | 243 | { |
ashleymills | 83:897a0de9d668 | 244 | |
donatien | 0:3b2f052c333b | 245 | size_t cpyLen = MIN( std::strlen(line), m_maxMsgLength - 1 ); |
ashleymills | 83:897a0de9d668 | 246 | DBG("Message: %s (%d)", line, cpyLen); |
donatien | 0:3b2f052c333b | 247 | std::memcpy( m_msg, line, cpyLen ); |
donatien | 0:3b2f052c333b | 248 | m_msg[cpyLen] = '\0'; |
donatien | 0:3b2f052c333b | 249 | m_state = SMS_CMD_PROCESSED; |
donatien | 0:3b2f052c333b | 250 | } |
donatien | 0:3b2f052c333b | 251 | else if(m_state == SMS_GET_COUNT_CMD_SENT) |
donatien | 0:3b2f052c333b | 252 | { |
donatien | 0:3b2f052c333b | 253 | DBG("Header: %s", line); |
donatien | 0:3b2f052c333b | 254 | int msgRef; |
donatien | 28:c94ffb45a848 | 255 | if( std::sscanf(line, "+CMGL: %d,\"REC", &msgRef) == 1 ) //Filter on REC READ and REC UNREAD messages |
donatien | 0:3b2f052c333b | 256 | { |
donatien | 0:3b2f052c333b | 257 | m_state = SMS_GET_COUNT_HDR_RECEIVED; |
donatien | 0:3b2f052c333b | 258 | //Add message to list |
donatien | 0:3b2f052c333b | 259 | if(m_msgRefListCount < MAX_SM) |
donatien | 0:3b2f052c333b | 260 | { |
donatien | 0:3b2f052c333b | 261 | m_msgRefList[m_msgRefListCount] = msgRef; |
donatien | 0:3b2f052c333b | 262 | } |
donatien | 0:3b2f052c333b | 263 | m_msgRefListCount++; //Always count message |
donatien | 0:3b2f052c333b | 264 | DBG("m_msgRefListCount=%d",m_msgRefListCount); |
donatien | 0:3b2f052c333b | 265 | } |
donatien | 0:3b2f052c333b | 266 | } |
donatien | 0:3b2f052c333b | 267 | else if(m_state == SMS_GET_COUNT_HDR_RECEIVED) |
donatien | 0:3b2f052c333b | 268 | { |
donatien | 0:3b2f052c333b | 269 | DBG("Message (debug only): %s", line); //For debug only |
donatien | 0:3b2f052c333b | 270 | m_state = SMS_GET_COUNT_CMD_SENT; |
donatien | 0:3b2f052c333b | 271 | } |
donatien | 0:3b2f052c333b | 272 | return OK; |
donatien | 0:3b2f052c333b | 273 | } |
donatien | 0:3b2f052c333b | 274 | |
donatien | 0:3b2f052c333b | 275 | /*virtual*/ int SMSInterface::onNewEntryPrompt(ATCommandsInterface* pInst) |
donatien | 0:3b2f052c333b | 276 | { |
donatien | 0:3b2f052c333b | 277 | if(m_state == SMS_SEND_CMD_SENT) |
donatien | 0:3b2f052c333b | 278 | { |
donatien | 0:3b2f052c333b | 279 | char* crPtr = strchr(m_msg, CR); |
donatien | 0:3b2f052c333b | 280 | if(crPtr != NULL) |
donatien | 0:3b2f052c333b | 281 | { |
donatien | 0:3b2f052c333b | 282 | int crPos = crPtr - m_msg; |
donatien | 0:3b2f052c333b | 283 | //Replace m_inputBuf[crPos] with null-terminating char |
donatien | 0:3b2f052c333b | 284 | m_msg[crPos] = '\x0'; |
donatien | 0:3b2f052c333b | 285 | |
donatien | 0:3b2f052c333b | 286 | //If there is a CR char, split message there |
donatien | 0:3b2f052c333b | 287 | |
donatien | 0:3b2f052c333b | 288 | //Do print the message |
donatien | 0:3b2f052c333b | 289 | int ret = pInst->sendData(m_msg); |
donatien | 0:3b2f052c333b | 290 | if(ret) |
donatien | 0:3b2f052c333b | 291 | { |
donatien | 0:3b2f052c333b | 292 | return ret; |
donatien | 0:3b2f052c333b | 293 | } |
donatien | 0:3b2f052c333b | 294 | |
donatien | 0:3b2f052c333b | 295 | char cr[2] = {CR, '\0'}; |
donatien | 0:3b2f052c333b | 296 | ret = pInst->sendData(cr); |
donatien | 0:3b2f052c333b | 297 | if(ret) |
donatien | 0:3b2f052c333b | 298 | { |
donatien | 0:3b2f052c333b | 299 | return ret; |
donatien | 0:3b2f052c333b | 300 | } |
donatien | 0:3b2f052c333b | 301 | |
donatien | 0:3b2f052c333b | 302 | m_msg += crPos; |
donatien | 0:3b2f052c333b | 303 | |
donatien | 0:3b2f052c333b | 304 | if(m_msg[0] == LF) |
donatien | 0:3b2f052c333b | 305 | { |
donatien | 0:3b2f052c333b | 306 | m_msg++; //Discard LF char as well |
donatien | 0:3b2f052c333b | 307 | } |
donatien | 0:3b2f052c333b | 308 | |
donatien | 0:3b2f052c333b | 309 | return NET_MOREINFO; |
donatien | 0:3b2f052c333b | 310 | } |
donatien | 0:3b2f052c333b | 311 | else |
donatien | 0:3b2f052c333b | 312 | { |
donatien | 0:3b2f052c333b | 313 | //Do print the message |
donatien | 0:3b2f052c333b | 314 | pInst->sendData(m_msg); |
donatien | 0:3b2f052c333b | 315 | return OK; |
donatien | 0:3b2f052c333b | 316 | } |
donatien | 0:3b2f052c333b | 317 | } |
donatien | 0:3b2f052c333b | 318 | |
donatien | 0:3b2f052c333b | 319 | return OK; |
donatien | 0:3b2f052c333b | 320 | } |
donatien | 0:3b2f052c333b | 321 | |
donatien | 0:3b2f052c333b | 322 | /*virtual*/ bool SMSInterface::isATCodeHandled(const char* atCode) //Is this AT code handled |
donatien | 0:3b2f052c333b | 323 | { |
ashleymills | 80:c0e63c16306e | 324 | |
donatien | 0:3b2f052c333b | 325 | DBG("AT code is %s", atCode); |
donatien | 0:3b2f052c333b | 326 | if( strcmp("+CMTI", atCode) == 0 ) |
donatien | 0:3b2f052c333b | 327 | { |
donatien | 0:3b2f052c333b | 328 | return true; |
donatien | 0:3b2f052c333b | 329 | } |
donatien | 0:3b2f052c333b | 330 | |
donatien | 0:3b2f052c333b | 331 | DBG("Not handled"); |
donatien | 0:3b2f052c333b | 332 | return false; |
donatien | 0:3b2f052c333b | 333 | } |
donatien | 0:3b2f052c333b | 334 | |
donatien | 0:3b2f052c333b | 335 | /*virtual*/ void SMSInterface::onDispatchStart() |
donatien | 0:3b2f052c333b | 336 | { |
donatien | 59:593fb493172f | 337 | |
donatien | 0:3b2f052c333b | 338 | } |
donatien | 0:3b2f052c333b | 339 | |
donatien | 0:3b2f052c333b | 340 | /*virtual*/ void SMSInterface::onDispatchStop() |
donatien | 0:3b2f052c333b | 341 | { |
donatien | 59:593fb493172f | 342 | |
donatien | 59:593fb493172f | 343 | } |
donatien | 0:3b2f052c333b | 344 | |
donatien | 59:593fb493172f | 345 | /*virtual*/ char* SMSInterface::getEventsEnableCommand() |
donatien | 59:593fb493172f | 346 | { |
donatien | 59:593fb493172f | 347 | return "AT+CNMI=2,1,0,0,0"; |
donatien | 59:593fb493172f | 348 | } |
donatien | 59:593fb493172f | 349 | |
donatien | 59:593fb493172f | 350 | /*virtual*/ char* SMSInterface::getEventsDisableCommand() |
donatien | 59:593fb493172f | 351 | { |
donatien | 59:593fb493172f | 352 | 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 | 353 | } |
donatien | 0:3b2f052c333b | 354 | |
donatien | 0:3b2f052c333b | 355 | /*virtual*/ void SMSInterface::onEvent(const char* atCode, const char* evt) |
donatien | 0:3b2f052c333b | 356 | { |
donatien | 0:3b2f052c333b | 357 | if( strcmp("+CMTI", atCode) != 0 ) |
donatien | 0:3b2f052c333b | 358 | { |
donatien | 0:3b2f052c333b | 359 | return; //Not supported |
donatien | 0:3b2f052c333b | 360 | } |
donatien | 0:3b2f052c333b | 361 | |
donatien | 0:3b2f052c333b | 362 | DBG("Unsollicited result code: %s - %s", atCode, evt); |
donatien | 0:3b2f052c333b | 363 | |
donatien | 0:3b2f052c333b | 364 | //Get index |
donatien | 0:3b2f052c333b | 365 | int msgRef; |
donatien | 0:3b2f052c333b | 366 | if( std::sscanf(evt, "\"SM\",%d", &msgRef) == 1 ) |
donatien | 0:3b2f052c333b | 367 | { |
donatien | 0:3b2f052c333b | 368 | DBG("Adding message to list (ref %d)", msgRef); |
donatien | 50:8ad4cb12749d | 369 | if(m_inboxMtx.trylock()) |
donatien | 0:3b2f052c333b | 370 | { |
donatien | 50:8ad4cb12749d | 371 | //Add message to list |
donatien | 50:8ad4cb12749d | 372 | if(m_msgRefListCount < MAX_SM) |
donatien | 50:8ad4cb12749d | 373 | { |
donatien | 50:8ad4cb12749d | 374 | m_msgRefList[m_msgRefListCount] = msgRef; |
donatien | 50:8ad4cb12749d | 375 | } |
donatien | 50:8ad4cb12749d | 376 | m_msgRefListCount++; //Always count message |
donatien | 50:8ad4cb12749d | 377 | m_inboxMtx.unlock(); |
donatien | 0:3b2f052c333b | 378 | } |
donatien | 0:3b2f052c333b | 379 | else |
donatien | 0:3b2f052c333b | 380 | { |
donatien | 50:8ad4cb12749d | 381 | WARN("Could not get lock"); |
donatien | 0:3b2f052c333b | 382 | m_needsUpdate = true; |
donatien | 0:3b2f052c333b | 383 | } |
donatien | 0:3b2f052c333b | 384 | } |
donatien | 0:3b2f052c333b | 385 | } |
donatien | 0:3b2f052c333b | 386 | |
donatien | 0:3b2f052c333b | 387 | int SMSInterface::updateInbox() |
donatien | 0:3b2f052c333b | 388 | { |
donatien | 0:3b2f052c333b | 389 | //Get memory indexes of unread messages |
donatien | 0:3b2f052c333b | 390 | |
donatien | 0:3b2f052c333b | 391 | DBG("Updating inbox"); |
donatien | 0:3b2f052c333b | 392 | m_msgRefListCount = 0; //Reset list |
donatien | 50:8ad4cb12749d | 393 | 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 | 394 | |
donatien | 28:c94ffb45a848 | 395 | //First list the "REC READ" messages that were not processed in the previous session |
donatien | 28:c94ffb45a848 | 396 | m_state = SMS_GET_COUNT_CMD_SENT; |
donatien | 28:c94ffb45a848 | 397 | int ret = m_pIf->execute("AT+CMGL=\"REC READ\"", this, NULL, DEFAULT_TIMEOUT); |
donatien | 28:c94ffb45a848 | 398 | if( ret != OK ) |
donatien | 28:c94ffb45a848 | 399 | { |
donatien | 28:c94ffb45a848 | 400 | WARN("AT+CMGL returned %d", ret); |
donatien | 28:c94ffb45a848 | 401 | m_state = SMS_IDLE; |
donatien | 28:c94ffb45a848 | 402 | m_msgRefListCount = 0; //List could be invalid |
donatien | 28:c94ffb45a848 | 403 | m_needsUpdate = true; |
donatien | 28:c94ffb45a848 | 404 | return NET_PROTOCOL; |
donatien | 28:c94ffb45a848 | 405 | } |
donatien | 28:c94ffb45a848 | 406 | |
donatien | 50:8ad4cb12749d | 407 | //Now list the "REC UNREAD" messages that were received by the modem since |
donatien | 28:c94ffb45a848 | 408 | m_state = SMS_GET_COUNT_CMD_SENT; |
donatien | 28:c94ffb45a848 | 409 | ret = m_pIf->execute("AT+CMGL=\"REC UNREAD\"", this, NULL, DEFAULT_TIMEOUT); |
donatien | 0:3b2f052c333b | 410 | if( ret != OK ) |
donatien | 0:3b2f052c333b | 411 | { |
donatien | 0:3b2f052c333b | 412 | WARN("AT+CMGL returned %d", ret); |
donatien | 0:3b2f052c333b | 413 | m_state = SMS_IDLE; |
donatien | 0:3b2f052c333b | 414 | m_msgRefListCount = 0; //List could be invalid |
donatien | 0:3b2f052c333b | 415 | m_needsUpdate = true; |
donatien | 0:3b2f052c333b | 416 | return NET_PROTOCOL; |
donatien | 0:3b2f052c333b | 417 | } |
donatien | 0:3b2f052c333b | 418 | |
donatien | 0:3b2f052c333b | 419 | DBG("%d incoming messages in inbox", m_msgRefListCount); |
donatien | 0:3b2f052c333b | 420 | |
donatien | 0:3b2f052c333b | 421 | m_state = SMS_IDLE; |
donatien | 0:3b2f052c333b | 422 | |
donatien | 0:3b2f052c333b | 423 | return OK; |
donatien | 0:3b2f052c333b | 424 | } |
donatien | 0:3b2f052c333b | 425 | |
donatien | 0:3b2f052c333b | 426 |