Michael Baker / FONA_CellPhone

Update to work with latest mBed

Dependencies:   mbed-dev

Fork of FONA_CellPhone by Dream Team

Adafruit_FONA.cpp@0:851248a56628, 2016-03-10 (annotated)

Committer:
gtzintzarov3
Date:
Thu Mar 10 05:25:28 2016 +0000
Revision:
0:851248a56628
Child:
2:aaef20ac9044
Init push

Who changed what in which revision?

UserRevisionLine numberNew contents of line
gtzintzarov3 0:851248a56628 1 /***************************************************
gtzintzarov3 0:851248a56628 2 This is a library for our Adafruit FONA Cellular Module
gtzintzarov3 0:851248a56628 3
gtzintzarov3 0:851248a56628 4 Designed specifically to work with the Adafruit FONA
gtzintzarov3 0:851248a56628 5 ----> http://www.adafruit.com/products/1946
gtzintzarov3 0:851248a56628 6 ----> http://www.adafruit.com/products/1963
gtzintzarov3 0:851248a56628 7
gtzintzarov3 0:851248a56628 8 These displays use TTL Serial to communicate, 2 pins are required to
gtzintzarov3 0:851248a56628 9 interface
gtzintzarov3 0:851248a56628 10 Adafruit invests time and resources providing this open source code,
gtzintzarov3 0:851248a56628 11 please support Adafruit and open-source hardware by purchasing
gtzintzarov3 0:851248a56628 12 products from Adafruit!
gtzintzarov3 0:851248a56628 13
gtzintzarov3 0:851248a56628 14 Written by Limor Fried/Ladyada for Adafruit Industries.
gtzintzarov3 0:851248a56628 15 BSD license, all text above must be included in any redistribution
gtzintzarov3 0:851248a56628 16 ****************************************************/
gtzintzarov3 0:851248a56628 17
gtzintzarov3 0:851248a56628 18 /*
gtzintzarov3 0:851248a56628 19 * Modified by Marc PLOUHINEC 27/06/2015 for use in mbed
gtzintzarov3 0:851248a56628 20 */
gtzintzarov3 0:851248a56628 21 #include <algorithm>
gtzintzarov3 0:851248a56628 22 #include "Adafruit_FONA.h"
gtzintzarov3 0:851248a56628 23
gtzintzarov3 0:851248a56628 24 #define HIGH 1
gtzintzarov3 0:851248a56628 25 #define LOW 0
gtzintzarov3 0:851248a56628 26
gtzintzarov3 0:851248a56628 27 bool Adafruit_FONA::begin(int baudrate) {
gtzintzarov3 0:851248a56628 28 mySerial.baud(baudrate);
gtzintzarov3 0:851248a56628 29 mySerial.attach(this, &Adafruit_FONA::onSerialDataReceived, Serial::RxIrq);
gtzintzarov3 0:851248a56628 30
gtzintzarov3 0:851248a56628 31 _rstpin = HIGH;
gtzintzarov3 0:851248a56628 32 wait_ms(10);
gtzintzarov3 0:851248a56628 33 _rstpin = LOW;
gtzintzarov3 0:851248a56628 34 wait_ms(100);
gtzintzarov3 0:851248a56628 35 _rstpin = HIGH;
gtzintzarov3 0:851248a56628 36
gtzintzarov3 0:851248a56628 37 // give 3 seconds to reboot
gtzintzarov3 0:851248a56628 38 wait_ms(3000);
gtzintzarov3 0:851248a56628 39
gtzintzarov3 0:851248a56628 40 while (readable()) getc();
gtzintzarov3 0:851248a56628 41
gtzintzarov3 0:851248a56628 42 sendCheckReply("AT", "OK");
gtzintzarov3 0:851248a56628 43 wait_ms(100);
gtzintzarov3 0:851248a56628 44 sendCheckReply("AT", "OK");
gtzintzarov3 0:851248a56628 45 wait_ms(100);
gtzintzarov3 0:851248a56628 46 sendCheckReply("AT", "OK");
gtzintzarov3 0:851248a56628 47 wait_ms(100);
gtzintzarov3 0:851248a56628 48
gtzintzarov3 0:851248a56628 49 // turn off Echo!
gtzintzarov3 0:851248a56628 50 sendCheckReply("ATE0", "OK");
gtzintzarov3 0:851248a56628 51 wait_ms(100);
gtzintzarov3 0:851248a56628 52
gtzintzarov3 0:851248a56628 53 if (! sendCheckReply("ATE0", "OK")) {
gtzintzarov3 0:851248a56628 54 return false;
gtzintzarov3 0:851248a56628 55 }
gtzintzarov3 0:851248a56628 56
gtzintzarov3 0:851248a56628 57 return true;
gtzintzarov3 0:851248a56628 58 }
gtzintzarov3 0:851248a56628 59
gtzintzarov3 0:851248a56628 60 void Adafruit_FONA::setEventListener(EventListener *eventListener) {
gtzintzarov3 0:851248a56628 61 this->eventListener = eventListener;
gtzintzarov3 0:851248a56628 62 }
gtzintzarov3 0:851248a56628 63
gtzintzarov3 0:851248a56628 64 /********* Stream ********************************************/
gtzintzarov3 0:851248a56628 65
gtzintzarov3 0:851248a56628 66 int Adafruit_FONA::_putc(int value) {
gtzintzarov3 0:851248a56628 67 return mySerial.putc(value);
gtzintzarov3 0:851248a56628 68 }
gtzintzarov3 0:851248a56628 69
gtzintzarov3 0:851248a56628 70 int Adafruit_FONA::_getc() {
gtzintzarov3 0:851248a56628 71 __disable_irq(); // Start Critical Section - don't interrupt while changing global buffer variables
gtzintzarov3 0:851248a56628 72
gtzintzarov3 0:851248a56628 73 // Wait for data if the buffer is empty
gtzintzarov3 0:851248a56628 74 if (isRxBufferEmpty()) {
gtzintzarov3 0:851248a56628 75 __enable_irq(); // End Critical Section - need to allow rx interrupt to get new characters for buffer
gtzintzarov3 0:851248a56628 76
gtzintzarov3 0:851248a56628 77 while(isRxBufferEmpty());
gtzintzarov3 0:851248a56628 78
gtzintzarov3 0:851248a56628 79 __disable_irq(); // Start Critical Section - don't interrupt while changing global buffer variables
gtzintzarov3 0:851248a56628 80 }
gtzintzarov3 0:851248a56628 81
gtzintzarov3 0:851248a56628 82 int data = rxBuffer[rxBufferOutIndex];
gtzintzarov3 0:851248a56628 83 incrementRxBufferOutIndex();
gtzintzarov3 0:851248a56628 84
gtzintzarov3 0:851248a56628 85 __enable_irq(); // End Critical Section
gtzintzarov3 0:851248a56628 86
gtzintzarov3 0:851248a56628 87 return data;
gtzintzarov3 0:851248a56628 88 }
gtzintzarov3 0:851248a56628 89
gtzintzarov3 0:851248a56628 90 int Adafruit_FONA::readable() {
gtzintzarov3 0:851248a56628 91 return !isRxBufferEmpty();
gtzintzarov3 0:851248a56628 92 }
gtzintzarov3 0:851248a56628 93
gtzintzarov3 0:851248a56628 94 void Adafruit_FONA::onSerialDataReceived() {
gtzintzarov3 0:851248a56628 95 while (mySerial.readable() && !isRxBufferFull()) {
gtzintzarov3 0:851248a56628 96 int data = mySerial.getc();
gtzintzarov3 0:851248a56628 97 rxBuffer[rxBufferInIndex] = data;
gtzintzarov3 0:851248a56628 98
gtzintzarov3 0:851248a56628 99 //
gtzintzarov3 0:851248a56628 100 // Analyze the received data in order to detect events like RING or NO CARRIER
gtzintzarov3 0:851248a56628 101 //
gtzintzarov3 0:851248a56628 102
gtzintzarov3 0:851248a56628 103 // Copy the data in the current line
gtzintzarov3 0:851248a56628 104 if (currentReceivedLineSize < RX_BUFFER_SIZE && data != '\r' && data != '\n') {
gtzintzarov3 0:851248a56628 105 currentReceivedLine[currentReceivedLineSize] = (char) data;
gtzintzarov3 0:851248a56628 106 currentReceivedLineSize++;
gtzintzarov3 0:851248a56628 107 }
gtzintzarov3 0:851248a56628 108
gtzintzarov3 0:851248a56628 109 // Check if the line is complete
gtzintzarov3 0:851248a56628 110 if (data == '\n') {
gtzintzarov3 0:851248a56628 111 currentReceivedLine[currentReceivedLineSize] = 0;
gtzintzarov3 0:851248a56628 112
gtzintzarov3 0:851248a56628 113 if (eventListener != NULL) {
gtzintzarov3 0:851248a56628 114 // Check if we have a special event
gtzintzarov3 0:851248a56628 115 if (strcmp(currentReceivedLine, "RING") == 0) {
gtzintzarov3 0:851248a56628 116 eventListener->onRing();
gtzintzarov3 0:851248a56628 117 } else if (strcmp(currentReceivedLine, "NO CARRIER") == 0) {
gtzintzarov3 0:851248a56628 118 eventListener->onNoCarrier();
gtzintzarov3 0:851248a56628 119 }
gtzintzarov3 0:851248a56628 120 }
gtzintzarov3 0:851248a56628 121
gtzintzarov3 0:851248a56628 122 currentReceivedLineSize = 0;
gtzintzarov3 0:851248a56628 123 }
gtzintzarov3 0:851248a56628 124
gtzintzarov3 0:851248a56628 125 incrementRxBufferInIndex();
gtzintzarov3 0:851248a56628 126 }
gtzintzarov3 0:851248a56628 127 }
gtzintzarov3 0:851248a56628 128
gtzintzarov3 0:851248a56628 129 /********* Real Time Clock ********************************************/
gtzintzarov3 0:851248a56628 130
gtzintzarov3 0:851248a56628 131 bool Adafruit_FONA::enableRTC(uint8_t i) {
gtzintzarov3 0:851248a56628 132 if (! sendCheckReply("AT+CLTS=", i, "OK"))
gtzintzarov3 0:851248a56628 133 return false;
gtzintzarov3 0:851248a56628 134 return sendCheckReply("AT&W", "OK");
gtzintzarov3 0:851248a56628 135 }
gtzintzarov3 0:851248a56628 136
gtzintzarov3 0:851248a56628 137 /********* BATTERY & ADC ********************************************/
gtzintzarov3 0:851248a56628 138
gtzintzarov3 0:851248a56628 139 /* returns value in mV (uint16_t) */
gtzintzarov3 0:851248a56628 140 bool Adafruit_FONA::getBattVoltage(uint16_t *v) {
gtzintzarov3 0:851248a56628 141 return sendParseReply("AT+CBC", "+CBC: ", v, ',', 2);
gtzintzarov3 0:851248a56628 142 }
gtzintzarov3 0:851248a56628 143
gtzintzarov3 0:851248a56628 144 /* returns the percentage charge of battery as reported by sim800 */
gtzintzarov3 0:851248a56628 145 bool Adafruit_FONA::getBattPercent(uint16_t *p) {
gtzintzarov3 0:851248a56628 146 return sendParseReply("AT+CBC", "+CBC: ", p, ',', 1);
gtzintzarov3 0:851248a56628 147 }
gtzintzarov3 0:851248a56628 148
gtzintzarov3 0:851248a56628 149 bool Adafruit_FONA::getADCVoltage(uint16_t *v) {
gtzintzarov3 0:851248a56628 150 return sendParseReply("AT+CADC?", "+CADC: 1,", v);
gtzintzarov3 0:851248a56628 151 }
gtzintzarov3 0:851248a56628 152
gtzintzarov3 0:851248a56628 153 /********* SIM ***********************************************************/
gtzintzarov3 0:851248a56628 154
gtzintzarov3 0:851248a56628 155 bool Adafruit_FONA::unlockSIM(char *pin)
gtzintzarov3 0:851248a56628 156 {
gtzintzarov3 0:851248a56628 157 char sendbuff[14] = "AT+CPIN=";
gtzintzarov3 0:851248a56628 158 sendbuff[8] = pin[0];
gtzintzarov3 0:851248a56628 159 sendbuff[9] = pin[1];
gtzintzarov3 0:851248a56628 160 sendbuff[10] = pin[2];
gtzintzarov3 0:851248a56628 161 sendbuff[11] = pin[3];
gtzintzarov3 0:851248a56628 162 sendbuff[12] = NULL;
gtzintzarov3 0:851248a56628 163
gtzintzarov3 0:851248a56628 164 return sendCheckReply(sendbuff, "OK");
gtzintzarov3 0:851248a56628 165 }
gtzintzarov3 0:851248a56628 166
gtzintzarov3 0:851248a56628 167 uint8_t Adafruit_FONA::getSIMCCID(char *ccid) {
gtzintzarov3 0:851248a56628 168 getReply("AT+CCID");
gtzintzarov3 0:851248a56628 169 // up to 20 chars
gtzintzarov3 0:851248a56628 170 strncpy(ccid, replybuffer, 20);
gtzintzarov3 0:851248a56628 171 ccid[20] = 0;
gtzintzarov3 0:851248a56628 172
gtzintzarov3 0:851248a56628 173 readline(); // eat 'OK'
gtzintzarov3 0:851248a56628 174
gtzintzarov3 0:851248a56628 175 return strlen(ccid);
gtzintzarov3 0:851248a56628 176 }
gtzintzarov3 0:851248a56628 177
gtzintzarov3 0:851248a56628 178 /********* IMEI **********************************************************/
gtzintzarov3 0:851248a56628 179
gtzintzarov3 0:851248a56628 180 uint8_t Adafruit_FONA::getIMEI(char *imei) {
gtzintzarov3 0:851248a56628 181 getReply("AT+GSN");
gtzintzarov3 0:851248a56628 182
gtzintzarov3 0:851248a56628 183 // up to 15 chars
gtzintzarov3 0:851248a56628 184 strncpy(imei, replybuffer, 15);
gtzintzarov3 0:851248a56628 185 imei[15] = 0;
gtzintzarov3 0:851248a56628 186
gtzintzarov3 0:851248a56628 187 readline(); // eat 'OK'
gtzintzarov3 0:851248a56628 188
gtzintzarov3 0:851248a56628 189 return strlen(imei);
gtzintzarov3 0:851248a56628 190 }
gtzintzarov3 0:851248a56628 191
gtzintzarov3 0:851248a56628 192 /********* NETWORK *******************************************************/
gtzintzarov3 0:851248a56628 193
gtzintzarov3 0:851248a56628 194 uint8_t Adafruit_FONA::getNetworkStatus(void) {
gtzintzarov3 0:851248a56628 195 uint16_t status;
gtzintzarov3 0:851248a56628 196
gtzintzarov3 0:851248a56628 197 if (! sendParseReply("AT+CREG?", "+CREG: ", &status, ',', 1)) return 0;
gtzintzarov3 0:851248a56628 198
gtzintzarov3 0:851248a56628 199 return status;
gtzintzarov3 0:851248a56628 200 }
gtzintzarov3 0:851248a56628 201
gtzintzarov3 0:851248a56628 202
gtzintzarov3 0:851248a56628 203 uint8_t Adafruit_FONA::getRSSI(void) {
gtzintzarov3 0:851248a56628 204 uint16_t reply;
gtzintzarov3 0:851248a56628 205
gtzintzarov3 0:851248a56628 206 if (! sendParseReply("AT+CSQ", "+CSQ: ", &reply) ) return 0;
gtzintzarov3 0:851248a56628 207
gtzintzarov3 0:851248a56628 208 return reply;
gtzintzarov3 0:851248a56628 209 }
gtzintzarov3 0:851248a56628 210
gtzintzarov3 0:851248a56628 211 /********* AUDIO *******************************************************/
gtzintzarov3 0:851248a56628 212
gtzintzarov3 0:851248a56628 213 bool Adafruit_FONA::setAudio(uint8_t a) {
gtzintzarov3 0:851248a56628 214 // 0 is headset, 1 is external audio
gtzintzarov3 0:851248a56628 215 if (a > 1) return false;
gtzintzarov3 0:851248a56628 216
gtzintzarov3 0:851248a56628 217 return sendCheckReply("AT+CHFA=", a, "OK");
gtzintzarov3 0:851248a56628 218 }
gtzintzarov3 0:851248a56628 219
gtzintzarov3 0:851248a56628 220 uint8_t Adafruit_FONA::getVolume(void) {
gtzintzarov3 0:851248a56628 221 uint16_t reply;
gtzintzarov3 0:851248a56628 222
gtzintzarov3 0:851248a56628 223 if (! sendParseReply("AT+CLVL?", "+CLVL: ", &reply) ) return 0;
gtzintzarov3 0:851248a56628 224
gtzintzarov3 0:851248a56628 225 return reply;
gtzintzarov3 0:851248a56628 226 }
gtzintzarov3 0:851248a56628 227
gtzintzarov3 0:851248a56628 228 bool Adafruit_FONA::setVolume(uint8_t i) {
gtzintzarov3 0:851248a56628 229 return sendCheckReply("AT+CLVL=", i, "OK");
gtzintzarov3 0:851248a56628 230 }
gtzintzarov3 0:851248a56628 231
gtzintzarov3 0:851248a56628 232
gtzintzarov3 0:851248a56628 233 bool Adafruit_FONA::playDTMF(char dtmf) {
gtzintzarov3 0:851248a56628 234 char str[4];
gtzintzarov3 0:851248a56628 235 str[0] = '\"';
gtzintzarov3 0:851248a56628 236 str[1] = dtmf;
gtzintzarov3 0:851248a56628 237 str[2] = '\"';
gtzintzarov3 0:851248a56628 238 str[3] = 0;
gtzintzarov3 0:851248a56628 239 return sendCheckReply("AT+CLDTMF=3,", str, "OK");
gtzintzarov3 0:851248a56628 240 }
gtzintzarov3 0:851248a56628 241
gtzintzarov3 0:851248a56628 242 bool Adafruit_FONA::playToolkitTone(uint8_t t, uint16_t len) {
gtzintzarov3 0:851248a56628 243 return sendCheckReply("AT+STTONE=1,", t, len, "OK");
gtzintzarov3 0:851248a56628 244 }
gtzintzarov3 0:851248a56628 245
gtzintzarov3 0:851248a56628 246 bool Adafruit_FONA::setMicVolume(uint8_t a, uint8_t level) {
gtzintzarov3 0:851248a56628 247 // 0 is headset, 1 is external audio
gtzintzarov3 0:851248a56628 248 if (a > 1) return false;
gtzintzarov3 0:851248a56628 249
gtzintzarov3 0:851248a56628 250 return sendCheckReply("AT+CMIC=", a, level, "OK");
gtzintzarov3 0:851248a56628 251 }
gtzintzarov3 0:851248a56628 252
gtzintzarov3 0:851248a56628 253 /********* FM RADIO *******************************************************/
gtzintzarov3 0:851248a56628 254
gtzintzarov3 0:851248a56628 255
gtzintzarov3 0:851248a56628 256 bool Adafruit_FONA::FMradio(bool onoff, uint8_t a) {
gtzintzarov3 0:851248a56628 257 if (! onoff) {
gtzintzarov3 0:851248a56628 258 return sendCheckReply("AT+FMCLOSE", "OK");
gtzintzarov3 0:851248a56628 259 }
gtzintzarov3 0:851248a56628 260
gtzintzarov3 0:851248a56628 261 // 0 is headset, 1 is external audio
gtzintzarov3 0:851248a56628 262 if (a > 1) return false;
gtzintzarov3 0:851248a56628 263
gtzintzarov3 0:851248a56628 264 return sendCheckReply("AT+FMOPEN=", a, "OK");
gtzintzarov3 0:851248a56628 265 }
gtzintzarov3 0:851248a56628 266
gtzintzarov3 0:851248a56628 267 bool Adafruit_FONA::tuneFMradio(uint16_t station) {
gtzintzarov3 0:851248a56628 268 // Fail if FM station is outside allowed range.
gtzintzarov3 0:851248a56628 269 if ((station < 870) || (station > 1090))
gtzintzarov3 0:851248a56628 270 return false;
gtzintzarov3 0:851248a56628 271
gtzintzarov3 0:851248a56628 272 return sendCheckReply("AT+FMFREQ=", station, "OK");
gtzintzarov3 0:851248a56628 273 }
gtzintzarov3 0:851248a56628 274
gtzintzarov3 0:851248a56628 275 bool Adafruit_FONA::setFMVolume(uint8_t i) {
gtzintzarov3 0:851248a56628 276 // Fail if volume is outside allowed range (0-6).
gtzintzarov3 0:851248a56628 277 if (i > 6) {
gtzintzarov3 0:851248a56628 278 return false;
gtzintzarov3 0:851248a56628 279 }
gtzintzarov3 0:851248a56628 280 // Send FM volume command and verify response.
gtzintzarov3 0:851248a56628 281 return sendCheckReply("AT+FMVOLUME=", i, "OK");
gtzintzarov3 0:851248a56628 282 }
gtzintzarov3 0:851248a56628 283
gtzintzarov3 0:851248a56628 284 int8_t Adafruit_FONA::getFMVolume() {
gtzintzarov3 0:851248a56628 285 uint16_t level;
gtzintzarov3 0:851248a56628 286
gtzintzarov3 0:851248a56628 287 if (! sendParseReply("AT+FMVOLUME?", "+FMVOLUME: ", &level) ) return 0;
gtzintzarov3 0:851248a56628 288
gtzintzarov3 0:851248a56628 289 return level;
gtzintzarov3 0:851248a56628 290 }
gtzintzarov3 0:851248a56628 291
gtzintzarov3 0:851248a56628 292 int8_t Adafruit_FONA::getFMSignalLevel(uint16_t station) {
gtzintzarov3 0:851248a56628 293 // Fail if FM station is outside allowed range.
gtzintzarov3 0:851248a56628 294 if ((station < 875) || (station > 1080)) {
gtzintzarov3 0:851248a56628 295 return -1;
gtzintzarov3 0:851248a56628 296 }
gtzintzarov3 0:851248a56628 297
gtzintzarov3 0:851248a56628 298 // Send FM signal level query command.
gtzintzarov3 0:851248a56628 299 // Note, need to explicitly send timeout so right overload is chosen.
gtzintzarov3 0:851248a56628 300 getReply("AT+FMSIGNAL=", station, FONA_DEFAULT_TIMEOUT_MS);
gtzintzarov3 0:851248a56628 301 // Check response starts with expected value.
gtzintzarov3 0:851248a56628 302 char *p = strstr(replybuffer, "+FMSIGNAL: ");
gtzintzarov3 0:851248a56628 303 if (p == 0) return -1;
gtzintzarov3 0:851248a56628 304 p+=11;
gtzintzarov3 0:851248a56628 305 // Find second colon to get start of signal quality.
gtzintzarov3 0:851248a56628 306 p = strchr(p, ':');
gtzintzarov3 0:851248a56628 307 if (p == 0) return -1;
gtzintzarov3 0:851248a56628 308 p+=1;
gtzintzarov3 0:851248a56628 309 // Parse signal quality.
gtzintzarov3 0:851248a56628 310 int8_t level = atoi(p);
gtzintzarov3 0:851248a56628 311 readline(); // eat the "OK"
gtzintzarov3 0:851248a56628 312 return level;
gtzintzarov3 0:851248a56628 313 }
gtzintzarov3 0:851248a56628 314
gtzintzarov3 0:851248a56628 315 /********* PWM/BUZZER **************************************************/
gtzintzarov3 0:851248a56628 316
gtzintzarov3 0:851248a56628 317 bool Adafruit_FONA::setPWM(uint16_t period, uint8_t duty) {
gtzintzarov3 0:851248a56628 318 if (period > 2000) return false;
gtzintzarov3 0:851248a56628 319 if (duty > 100) return false;
gtzintzarov3 0:851248a56628 320
gtzintzarov3 0:851248a56628 321 return sendCheckReply("AT+SPWM=0,", period, duty, "OK");
gtzintzarov3 0:851248a56628 322 }
gtzintzarov3 0:851248a56628 323
gtzintzarov3 0:851248a56628 324 /********* CALL PHONES **************************************************/
gtzintzarov3 0:851248a56628 325 bool Adafruit_FONA::callPhone(char *number) {
gtzintzarov3 0:851248a56628 326 char sendbuff[35] = "ATD";
gtzintzarov3 0:851248a56628 327 strncpy(sendbuff+3, number, min((int)30, (int)strlen(number)));
gtzintzarov3 0:851248a56628 328 uint8_t x = strlen(sendbuff);
gtzintzarov3 0:851248a56628 329 sendbuff[x] = ';';
gtzintzarov3 0:851248a56628 330 sendbuff[x+1] = 0;
gtzintzarov3 0:851248a56628 331
gtzintzarov3 0:851248a56628 332 return sendCheckReply(sendbuff, "OK");
gtzintzarov3 0:851248a56628 333 }
gtzintzarov3 0:851248a56628 334
gtzintzarov3 0:851248a56628 335 bool Adafruit_FONA::hangUp(void) {
gtzintzarov3 0:851248a56628 336 return sendCheckReply("ATH0", "OK");
gtzintzarov3 0:851248a56628 337 }
gtzintzarov3 0:851248a56628 338
gtzintzarov3 0:851248a56628 339 bool Adafruit_FONA::pickUp(void) {
gtzintzarov3 0:851248a56628 340 return sendCheckReply("ATA", "OK");
gtzintzarov3 0:851248a56628 341 }
gtzintzarov3 0:851248a56628 342
gtzintzarov3 0:851248a56628 343 void Adafruit_FONA::onIncomingCall() {
gtzintzarov3 0:851248a56628 344 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 345 printf("> Incoming call...\r\n");
gtzintzarov3 0:851248a56628 346 #endif
gtzintzarov3 0:851248a56628 347 _incomingCall = true;
gtzintzarov3 0:851248a56628 348 }
gtzintzarov3 0:851248a56628 349
gtzintzarov3 0:851248a56628 350 bool Adafruit_FONA::callerIdNotification(bool enable) {
gtzintzarov3 0:851248a56628 351 if(enable){
gtzintzarov3 0:851248a56628 352 _ringIndicatorInterruptIn.fall(this, &Adafruit_FONA::onIncomingCall);
gtzintzarov3 0:851248a56628 353 return sendCheckReply("AT+CLIP=1", "OK");
gtzintzarov3 0:851248a56628 354 }
gtzintzarov3 0:851248a56628 355
gtzintzarov3 0:851248a56628 356 _ringIndicatorInterruptIn.fall(NULL);
gtzintzarov3 0:851248a56628 357 return sendCheckReply("AT+CLIP=0", "OK");
gtzintzarov3 0:851248a56628 358 }
gtzintzarov3 0:851248a56628 359
gtzintzarov3 0:851248a56628 360 bool Adafruit_FONA::incomingCallNumber(char* phonenum) {
gtzintzarov3 0:851248a56628 361 //+CLIP: "<incoming phone number>",145,"",0,"",0
gtzintzarov3 0:851248a56628 362 if(!_incomingCall)
gtzintzarov3 0:851248a56628 363 return false;
gtzintzarov3 0:851248a56628 364
gtzintzarov3 0:851248a56628 365 readline();
gtzintzarov3 0:851248a56628 366 while(!strcmp(replybuffer, "RING") == 0) {
gtzintzarov3 0:851248a56628 367 flushInput();
gtzintzarov3 0:851248a56628 368 readline();
gtzintzarov3 0:851248a56628 369 }
gtzintzarov3 0:851248a56628 370
gtzintzarov3 0:851248a56628 371 readline(); //reads incoming phone number line
gtzintzarov3 0:851248a56628 372
gtzintzarov3 0:851248a56628 373 parseReply("+CLIP: \"", phonenum, '"');
gtzintzarov3 0:851248a56628 374
gtzintzarov3 0:851248a56628 375 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 376 printf("Phone Number: %s\r\n", replybuffer);
gtzintzarov3 0:851248a56628 377 #endif
gtzintzarov3 0:851248a56628 378
gtzintzarov3 0:851248a56628 379 _incomingCall = false;
gtzintzarov3 0:851248a56628 380 return true;
gtzintzarov3 0:851248a56628 381 }
gtzintzarov3 0:851248a56628 382
gtzintzarov3 0:851248a56628 383 /********* SMS **********************************************************/
gtzintzarov3 0:851248a56628 384
gtzintzarov3 0:851248a56628 385 uint8_t Adafruit_FONA::getSMSInterrupt(void) {
gtzintzarov3 0:851248a56628 386 uint16_t reply;
gtzintzarov3 0:851248a56628 387
gtzintzarov3 0:851248a56628 388 if (! sendParseReply("AT+CFGRI?", "+CFGRI: ", &reply) ) return 0;
gtzintzarov3 0:851248a56628 389
gtzintzarov3 0:851248a56628 390 return reply;
gtzintzarov3 0:851248a56628 391 }
gtzintzarov3 0:851248a56628 392
gtzintzarov3 0:851248a56628 393 bool Adafruit_FONA::setSMSInterrupt(uint8_t i) {
gtzintzarov3 0:851248a56628 394 return sendCheckReply("AT+CFGRI=", i, "OK");
gtzintzarov3 0:851248a56628 395 }
gtzintzarov3 0:851248a56628 396
gtzintzarov3 0:851248a56628 397 int8_t Adafruit_FONA::getNumSMS(void) {
gtzintzarov3 0:851248a56628 398 uint16_t numsms;
gtzintzarov3 0:851248a56628 399
gtzintzarov3 0:851248a56628 400 if (! sendCheckReply("AT+CMGF=1", "OK")) return -1;
gtzintzarov3 0:851248a56628 401 // ask how many sms are stored
gtzintzarov3 0:851248a56628 402
gtzintzarov3 0:851248a56628 403 if (! sendParseReply("AT+CPMS?", "+CPMS: \"SM_P\",", &numsms) ) return -1;
gtzintzarov3 0:851248a56628 404
gtzintzarov3 0:851248a56628 405 return numsms;
gtzintzarov3 0:851248a56628 406 }
gtzintzarov3 0:851248a56628 407
gtzintzarov3 0:851248a56628 408 // Reading SMS's is a bit involved so we don't use helpers that may cause delays or debug
gtzintzarov3 0:851248a56628 409 // printouts!
gtzintzarov3 0:851248a56628 410 bool Adafruit_FONA::readSMS(uint8_t i, char *smsbuff, uint16_t maxlen, uint16_t *readlen) {
gtzintzarov3 0:851248a56628 411 // text mode
gtzintzarov3 0:851248a56628 412 if (! sendCheckReply("AT+CMGF=1", "OK")) return false;
gtzintzarov3 0:851248a56628 413
gtzintzarov3 0:851248a56628 414 // show all text mode parameters
gtzintzarov3 0:851248a56628 415 if (! sendCheckReply("AT+CSDH=1", "OK")) return false;
gtzintzarov3 0:851248a56628 416
gtzintzarov3 0:851248a56628 417 // parse out the SMS len
gtzintzarov3 0:851248a56628 418 uint16_t thesmslen = 0;
gtzintzarov3 0:851248a56628 419
gtzintzarov3 0:851248a56628 420 //getReply(F("AT+CMGR="), i, 1000); // do not print debug!
gtzintzarov3 0:851248a56628 421 mySerial.printf("AT+CMGR=%d\r\n", i);
gtzintzarov3 0:851248a56628 422 readline(1000); // timeout
gtzintzarov3 0:851248a56628 423
gtzintzarov3 0:851248a56628 424 // parse it out...
gtzintzarov3 0:851248a56628 425 if (! parseReply("+CMGR:", &thesmslen, ',', 11)) {
gtzintzarov3 0:851248a56628 426 *readlen = 0;
gtzintzarov3 0:851248a56628 427 return false;
gtzintzarov3 0:851248a56628 428 }
gtzintzarov3 0:851248a56628 429
gtzintzarov3 0:851248a56628 430 readRaw(thesmslen);
gtzintzarov3 0:851248a56628 431
gtzintzarov3 0:851248a56628 432 flushInput();
gtzintzarov3 0:851248a56628 433
gtzintzarov3 0:851248a56628 434 uint16_t thelen = min(maxlen, (uint16_t)strlen(replybuffer));
gtzintzarov3 0:851248a56628 435 strncpy(smsbuff, replybuffer, thelen);
gtzintzarov3 0:851248a56628 436 smsbuff[thelen] = 0; // end the string
gtzintzarov3 0:851248a56628 437
gtzintzarov3 0:851248a56628 438 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 439 printf("%s\r\n", replybuffer);
gtzintzarov3 0:851248a56628 440 #endif
gtzintzarov3 0:851248a56628 441 *readlen = thelen;
gtzintzarov3 0:851248a56628 442 return true;
gtzintzarov3 0:851248a56628 443 }
gtzintzarov3 0:851248a56628 444
gtzintzarov3 0:851248a56628 445 // Retrieve the sender of the specified SMS message and copy it as a string to
gtzintzarov3 0:851248a56628 446 // the sender buffer. Up to senderlen characters of the sender will be copied
gtzintzarov3 0:851248a56628 447 // and a null terminator will be added if less than senderlen charactesr are
gtzintzarov3 0:851248a56628 448 // copied to the result. Returns true if a result was successfully retrieved,
gtzintzarov3 0:851248a56628 449 // otherwise false.
gtzintzarov3 0:851248a56628 450 bool Adafruit_FONA::getSMSSender(uint8_t i, char *sender, int senderlen) {
gtzintzarov3 0:851248a56628 451 // Ensure text mode and all text mode parameters are sent.
gtzintzarov3 0:851248a56628 452 if (! sendCheckReply("AT+CMGF=1", "OK")) return false;
gtzintzarov3 0:851248a56628 453 if (! sendCheckReply("AT+CSDH=1", "OK")) return false;
gtzintzarov3 0:851248a56628 454 // Send command to retrieve SMS message and parse a line of response.
gtzintzarov3 0:851248a56628 455 mySerial.printf("AT+CMGR=%d\r\n", i);
gtzintzarov3 0:851248a56628 456 readline(1000);
gtzintzarov3 0:851248a56628 457 // Parse the second field in the response.
gtzintzarov3 0:851248a56628 458 bool result = parseReplyQuoted("+CMGR:", sender, senderlen, ',', 1);
gtzintzarov3 0:851248a56628 459 // Drop any remaining data from the response.
gtzintzarov3 0:851248a56628 460 flushInput();
gtzintzarov3 0:851248a56628 461 return result;
gtzintzarov3 0:851248a56628 462 }
gtzintzarov3 0:851248a56628 463
gtzintzarov3 0:851248a56628 464 bool Adafruit_FONA::sendSMS(char *smsaddr, char *smsmsg) {
gtzintzarov3 0:851248a56628 465 if (! sendCheckReply("AT+CMGF=1", "OK")) return -1;
gtzintzarov3 0:851248a56628 466
gtzintzarov3 0:851248a56628 467 char sendcmd[30] = "AT+CMGS=\"";
gtzintzarov3 0:851248a56628 468 strncpy(sendcmd+9, smsaddr, 30-9-2); // 9 bytes beginning, 2 bytes for close quote + null
gtzintzarov3 0:851248a56628 469 sendcmd[strlen(sendcmd)] = '\"';
gtzintzarov3 0:851248a56628 470
gtzintzarov3 0:851248a56628 471 if (! sendCheckReply(sendcmd, "> ")) return false;
gtzintzarov3 0:851248a56628 472 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 473 printf("> %s\r\n", smsmsg);
gtzintzarov3 0:851248a56628 474 #endif
gtzintzarov3 0:851248a56628 475 mySerial.printf("%s\r\n\r\n", smsmsg);
gtzintzarov3 0:851248a56628 476 mySerial.putc(0x1A);
gtzintzarov3 0:851248a56628 477 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 478 printf("^Z\r\n");
gtzintzarov3 0:851248a56628 479 #endif
gtzintzarov3 0:851248a56628 480 readline(10000); // read the +CMGS reply, wait up to 10 seconds!!!
gtzintzarov3 0:851248a56628 481 //Serial.print("* "); Serial.println(replybuffer);
gtzintzarov3 0:851248a56628 482 if (strstr(replybuffer, "+CMGS") == 0) {
gtzintzarov3 0:851248a56628 483 return false;
gtzintzarov3 0:851248a56628 484 }
gtzintzarov3 0:851248a56628 485 readline(1000); // read OK
gtzintzarov3 0:851248a56628 486 //Serial.print("* "); Serial.println(replybuffer);
gtzintzarov3 0:851248a56628 487
gtzintzarov3 0:851248a56628 488 if (strcmp(replybuffer, "OK") != 0) {
gtzintzarov3 0:851248a56628 489 return false;
gtzintzarov3 0:851248a56628 490 }
gtzintzarov3 0:851248a56628 491
gtzintzarov3 0:851248a56628 492 return true;
gtzintzarov3 0:851248a56628 493 }
gtzintzarov3 0:851248a56628 494
gtzintzarov3 0:851248a56628 495
gtzintzarov3 0:851248a56628 496 bool Adafruit_FONA::deleteSMS(uint8_t i) {
gtzintzarov3 0:851248a56628 497 if (! sendCheckReply("AT+CMGF=1", "OK")) return -1;
gtzintzarov3 0:851248a56628 498 // read an sms
gtzintzarov3 0:851248a56628 499 char sendbuff[12] = "AT+CMGD=000";
gtzintzarov3 0:851248a56628 500 sendbuff[8] = (i / 100) + '0';
gtzintzarov3 0:851248a56628 501 i %= 100;
gtzintzarov3 0:851248a56628 502 sendbuff[9] = (i / 10) + '0';
gtzintzarov3 0:851248a56628 503 i %= 10;
gtzintzarov3 0:851248a56628 504 sendbuff[10] = i + '0';
gtzintzarov3 0:851248a56628 505
gtzintzarov3 0:851248a56628 506 return sendCheckReply(sendbuff, "OK", 2000);
gtzintzarov3 0:851248a56628 507 }
gtzintzarov3 0:851248a56628 508
gtzintzarov3 0:851248a56628 509 /********* TIME **********************************************************/
gtzintzarov3 0:851248a56628 510
gtzintzarov3 0:851248a56628 511 bool Adafruit_FONA::enableNetworkTimeSync(bool onoff) {
gtzintzarov3 0:851248a56628 512 if (onoff) {
gtzintzarov3 0:851248a56628 513 if (! sendCheckReply("AT+CLTS=1", "OK"))
gtzintzarov3 0:851248a56628 514 return false;
gtzintzarov3 0:851248a56628 515 } else {
gtzintzarov3 0:851248a56628 516 if (! sendCheckReply("AT+CLTS=0", "OK"))
gtzintzarov3 0:851248a56628 517 return false;
gtzintzarov3 0:851248a56628 518 }
gtzintzarov3 0:851248a56628 519
gtzintzarov3 0:851248a56628 520 flushInput(); // eat any 'Unsolicted Result Code'
gtzintzarov3 0:851248a56628 521
gtzintzarov3 0:851248a56628 522 return true;
gtzintzarov3 0:851248a56628 523 }
gtzintzarov3 0:851248a56628 524
gtzintzarov3 0:851248a56628 525 bool Adafruit_FONA::enableNTPTimeSync(bool onoff, const char* ntpserver) {
gtzintzarov3 0:851248a56628 526 if (onoff) {
gtzintzarov3 0:851248a56628 527 if (! sendCheckReply("AT+CNTPCID=1", "OK"))
gtzintzarov3 0:851248a56628 528 return false;
gtzintzarov3 0:851248a56628 529
gtzintzarov3 0:851248a56628 530 mySerial.printf("AT+CNTP=\"");
gtzintzarov3 0:851248a56628 531 if (ntpserver != 0) {
gtzintzarov3 0:851248a56628 532 mySerial.printf(ntpserver);
gtzintzarov3 0:851248a56628 533 } else {
gtzintzarov3 0:851248a56628 534 mySerial.printf("pool.ntp.org");
gtzintzarov3 0:851248a56628 535 }
gtzintzarov3 0:851248a56628 536 mySerial.printf("\",0\r\n");
gtzintzarov3 0:851248a56628 537 readline(FONA_DEFAULT_TIMEOUT_MS);
gtzintzarov3 0:851248a56628 538 if (strcmp(replybuffer, "OK") != 0)
gtzintzarov3 0:851248a56628 539 return false;
gtzintzarov3 0:851248a56628 540
gtzintzarov3 0:851248a56628 541 if (! sendCheckReply("AT+CNTP", "OK", 10000))
gtzintzarov3 0:851248a56628 542 return false;
gtzintzarov3 0:851248a56628 543
gtzintzarov3 0:851248a56628 544 uint16_t status;
gtzintzarov3 0:851248a56628 545 readline(10000);
gtzintzarov3 0:851248a56628 546 if (! parseReply("+CNTP:", &status))
gtzintzarov3 0:851248a56628 547 return false;
gtzintzarov3 0:851248a56628 548 } else {
gtzintzarov3 0:851248a56628 549 if (! sendCheckReply("AT+CNTPCID=0", "OK"))
gtzintzarov3 0:851248a56628 550 return false;
gtzintzarov3 0:851248a56628 551 }
gtzintzarov3 0:851248a56628 552
gtzintzarov3 0:851248a56628 553 return true;
gtzintzarov3 0:851248a56628 554 }
gtzintzarov3 0:851248a56628 555
gtzintzarov3 0:851248a56628 556 bool Adafruit_FONA::getTime(char* buff, uint16_t maxlen) {
gtzintzarov3 0:851248a56628 557 getReply("AT+CCLK?", (uint16_t) 10000);
gtzintzarov3 0:851248a56628 558 if (strncmp(replybuffer, "+CCLK: ", 7) != 0)
gtzintzarov3 0:851248a56628 559 return false;
gtzintzarov3 0:851248a56628 560
gtzintzarov3 0:851248a56628 561 char *p = replybuffer+7;
gtzintzarov3 0:851248a56628 562 uint16_t lentocopy = min((uint16_t)(maxlen-1), (uint16_t)strlen(p));
gtzintzarov3 0:851248a56628 563 strncpy(buff, p, lentocopy+1);
gtzintzarov3 0:851248a56628 564 buff[lentocopy] = 0;
gtzintzarov3 0:851248a56628 565
gtzintzarov3 0:851248a56628 566 readline(); // eat OK
gtzintzarov3 0:851248a56628 567
gtzintzarov3 0:851248a56628 568 return true;
gtzintzarov3 0:851248a56628 569 }
gtzintzarov3 0:851248a56628 570
gtzintzarov3 0:851248a56628 571 /********* GPS **********************************************************/
gtzintzarov3 0:851248a56628 572
gtzintzarov3 0:851248a56628 573
gtzintzarov3 0:851248a56628 574 bool Adafruit_FONA::enableGPS(bool onoff) {
gtzintzarov3 0:851248a56628 575 uint16_t state;
gtzintzarov3 0:851248a56628 576
gtzintzarov3 0:851248a56628 577 // first check if its already on or off
gtzintzarov3 0:851248a56628 578 if (! sendParseReply("AT+CGPSPWR?", "+CGPSPWR: ", &state) )
gtzintzarov3 0:851248a56628 579 return false;
gtzintzarov3 0:851248a56628 580
gtzintzarov3 0:851248a56628 581 if (onoff && !state) {
gtzintzarov3 0:851248a56628 582 if (! sendCheckReply("AT+CGPSPWR=1", "OK"))
gtzintzarov3 0:851248a56628 583 return false;
gtzintzarov3 0:851248a56628 584 } else if (!onoff && state) {
gtzintzarov3 0:851248a56628 585 if (! sendCheckReply("AT+CGPSPWR=0", "OK"))
gtzintzarov3 0:851248a56628 586 return false;
gtzintzarov3 0:851248a56628 587 }
gtzintzarov3 0:851248a56628 588 return true;
gtzintzarov3 0:851248a56628 589 }
gtzintzarov3 0:851248a56628 590
gtzintzarov3 0:851248a56628 591 int8_t Adafruit_FONA::GPSstatus(void) {
gtzintzarov3 0:851248a56628 592 getReply("AT+CGPSSTATUS?");
gtzintzarov3 0:851248a56628 593
gtzintzarov3 0:851248a56628 594 char *p = strstr(replybuffer, "+CGPSSTATUS: Location ");
gtzintzarov3 0:851248a56628 595 if (p == 0) return -1;
gtzintzarov3 0:851248a56628 596
gtzintzarov3 0:851248a56628 597 p+=22;
gtzintzarov3 0:851248a56628 598
gtzintzarov3 0:851248a56628 599 readline(); // eat 'OK'
gtzintzarov3 0:851248a56628 600
gtzintzarov3 0:851248a56628 601
gtzintzarov3 0:851248a56628 602 if (p[0] == 'U') return 0;
gtzintzarov3 0:851248a56628 603 if (p[0] == 'N') return 1;
gtzintzarov3 0:851248a56628 604 if (p[0] == '2') return 2;
gtzintzarov3 0:851248a56628 605 if (p[0] == '3') return 3;
gtzintzarov3 0:851248a56628 606
gtzintzarov3 0:851248a56628 607 // else
gtzintzarov3 0:851248a56628 608 return 0;
gtzintzarov3 0:851248a56628 609 }
gtzintzarov3 0:851248a56628 610
gtzintzarov3 0:851248a56628 611 uint8_t Adafruit_FONA::getGPS(uint8_t arg, char *buffer, uint8_t maxbuff) {
gtzintzarov3 0:851248a56628 612 int32_t x = arg;
gtzintzarov3 0:851248a56628 613
gtzintzarov3 0:851248a56628 614 getReply("AT+CGPSINF=", x);
gtzintzarov3 0:851248a56628 615
gtzintzarov3 0:851248a56628 616 char *p = strstr(replybuffer, "CGPSINF: ");
gtzintzarov3 0:851248a56628 617 if (p == 0){
gtzintzarov3 0:851248a56628 618 buffer[0] = 0;
gtzintzarov3 0:851248a56628 619 return 0;
gtzintzarov3 0:851248a56628 620 }
gtzintzarov3 0:851248a56628 621 p+=9;
gtzintzarov3 0:851248a56628 622 uint8_t len = max((uint8_t)(maxbuff-1), (uint8_t)strlen(p));
gtzintzarov3 0:851248a56628 623 strncpy(buffer, p, len);
gtzintzarov3 0:851248a56628 624 buffer[len] = 0;
gtzintzarov3 0:851248a56628 625
gtzintzarov3 0:851248a56628 626 readline(); // eat 'OK'
gtzintzarov3 0:851248a56628 627 return len;
gtzintzarov3 0:851248a56628 628 }
gtzintzarov3 0:851248a56628 629
gtzintzarov3 0:851248a56628 630 bool Adafruit_FONA::getGPS(float *lat, float *lon, float *speed_kph, float *heading, float *altitude) {
gtzintzarov3 0:851248a56628 631 char gpsbuffer[120];
gtzintzarov3 0:851248a56628 632
gtzintzarov3 0:851248a56628 633 // we need at least a 2D fix
gtzintzarov3 0:851248a56628 634 if (GPSstatus() < 2)
gtzintzarov3 0:851248a56628 635 return false;
gtzintzarov3 0:851248a56628 636
gtzintzarov3 0:851248a56628 637 // grab the mode 2^5 gps csv from the sim808
gtzintzarov3 0:851248a56628 638 uint8_t res_len = getGPS(32, gpsbuffer, 120);
gtzintzarov3 0:851248a56628 639
gtzintzarov3 0:851248a56628 640 // make sure we have a response
gtzintzarov3 0:851248a56628 641 if (res_len == 0)
gtzintzarov3 0:851248a56628 642 return false;
gtzintzarov3 0:851248a56628 643
gtzintzarov3 0:851248a56628 644 // skip mode
gtzintzarov3 0:851248a56628 645 char *tok = strtok(gpsbuffer, ",");
gtzintzarov3 0:851248a56628 646 if (! tok) return false;
gtzintzarov3 0:851248a56628 647
gtzintzarov3 0:851248a56628 648 // skip date
gtzintzarov3 0:851248a56628 649 tok = strtok(NULL, ",");
gtzintzarov3 0:851248a56628 650 if (! tok) return false;
gtzintzarov3 0:851248a56628 651
gtzintzarov3 0:851248a56628 652 // skip fix
gtzintzarov3 0:851248a56628 653 tok = strtok(NULL, ",");
gtzintzarov3 0:851248a56628 654 if (! tok) return false;
gtzintzarov3 0:851248a56628 655
gtzintzarov3 0:851248a56628 656 // grab the latitude
gtzintzarov3 0:851248a56628 657 char *latp = strtok(NULL, ",");
gtzintzarov3 0:851248a56628 658 if (! latp) return false;
gtzintzarov3 0:851248a56628 659
gtzintzarov3 0:851248a56628 660 // grab latitude direction
gtzintzarov3 0:851248a56628 661 char *latdir = strtok(NULL, ",");
gtzintzarov3 0:851248a56628 662 if (! latdir) return false;
gtzintzarov3 0:851248a56628 663
gtzintzarov3 0:851248a56628 664 // grab longitude
gtzintzarov3 0:851248a56628 665 char *longp = strtok(NULL, ",");
gtzintzarov3 0:851248a56628 666 if (! longp) return false;
gtzintzarov3 0:851248a56628 667
gtzintzarov3 0:851248a56628 668 // grab longitude direction
gtzintzarov3 0:851248a56628 669 char *longdir = strtok(NULL, ",");
gtzintzarov3 0:851248a56628 670 if (! longdir) return false;
gtzintzarov3 0:851248a56628 671
gtzintzarov3 0:851248a56628 672 double latitude = atof(latp);
gtzintzarov3 0:851248a56628 673 double longitude = atof(longp);
gtzintzarov3 0:851248a56628 674
gtzintzarov3 0:851248a56628 675 // convert latitude from minutes to decimal
gtzintzarov3 0:851248a56628 676 float degrees = floor(latitude / 100);
gtzintzarov3 0:851248a56628 677 double minutes = latitude - (100 * degrees);
gtzintzarov3 0:851248a56628 678 minutes /= 60;
gtzintzarov3 0:851248a56628 679 degrees += minutes;
gtzintzarov3 0:851248a56628 680
gtzintzarov3 0:851248a56628 681 // turn direction into + or -
gtzintzarov3 0:851248a56628 682 if (latdir[0] == 'S') degrees *= -1;
gtzintzarov3 0:851248a56628 683
gtzintzarov3 0:851248a56628 684 *lat = degrees;
gtzintzarov3 0:851248a56628 685
gtzintzarov3 0:851248a56628 686 // convert longitude from minutes to decimal
gtzintzarov3 0:851248a56628 687 degrees = floor(longitude / 100);
gtzintzarov3 0:851248a56628 688 minutes = longitude - (100 * degrees);
gtzintzarov3 0:851248a56628 689 minutes /= 60;
gtzintzarov3 0:851248a56628 690 degrees += minutes;
gtzintzarov3 0:851248a56628 691
gtzintzarov3 0:851248a56628 692 // turn direction into + or -
gtzintzarov3 0:851248a56628 693 if (longdir[0] == 'W') degrees *= -1;
gtzintzarov3 0:851248a56628 694
gtzintzarov3 0:851248a56628 695 *lon = degrees;
gtzintzarov3 0:851248a56628 696
gtzintzarov3 0:851248a56628 697 // only grab speed if needed
gtzintzarov3 0:851248a56628 698 if (speed_kph != NULL) {
gtzintzarov3 0:851248a56628 699
gtzintzarov3 0:851248a56628 700 // grab the speed in knots
gtzintzarov3 0:851248a56628 701 char *speedp = strtok(NULL, ",");
gtzintzarov3 0:851248a56628 702 if (! speedp) return false;
gtzintzarov3 0:851248a56628 703
gtzintzarov3 0:851248a56628 704 // convert to kph
gtzintzarov3 0:851248a56628 705 *speed_kph = atof(speedp) * 1.852;
gtzintzarov3 0:851248a56628 706
gtzintzarov3 0:851248a56628 707 }
gtzintzarov3 0:851248a56628 708
gtzintzarov3 0:851248a56628 709 // only grab heading if needed
gtzintzarov3 0:851248a56628 710 if (heading != NULL) {
gtzintzarov3 0:851248a56628 711
gtzintzarov3 0:851248a56628 712 // grab the speed in knots
gtzintzarov3 0:851248a56628 713 char *coursep = strtok(NULL, ",");
gtzintzarov3 0:851248a56628 714 if (! coursep) return false;
gtzintzarov3 0:851248a56628 715
gtzintzarov3 0:851248a56628 716 *heading = atof(coursep);
gtzintzarov3 0:851248a56628 717
gtzintzarov3 0:851248a56628 718 }
gtzintzarov3 0:851248a56628 719
gtzintzarov3 0:851248a56628 720 // no need to continue
gtzintzarov3 0:851248a56628 721 if (altitude == NULL)
gtzintzarov3 0:851248a56628 722 return true;
gtzintzarov3 0:851248a56628 723
gtzintzarov3 0:851248a56628 724 // we need at least a 3D fix for altitude
gtzintzarov3 0:851248a56628 725 if (GPSstatus() < 3)
gtzintzarov3 0:851248a56628 726 return false;
gtzintzarov3 0:851248a56628 727
gtzintzarov3 0:851248a56628 728 // grab the mode 0 gps csv from the sim808
gtzintzarov3 0:851248a56628 729 res_len = getGPS(0, gpsbuffer, 120);
gtzintzarov3 0:851248a56628 730
gtzintzarov3 0:851248a56628 731 // make sure we have a response
gtzintzarov3 0:851248a56628 732 if (res_len == 0)
gtzintzarov3 0:851248a56628 733 return false;
gtzintzarov3 0:851248a56628 734
gtzintzarov3 0:851248a56628 735 // skip mode
gtzintzarov3 0:851248a56628 736 tok = strtok(gpsbuffer, ",");
gtzintzarov3 0:851248a56628 737 if (! tok) return false;
gtzintzarov3 0:851248a56628 738
gtzintzarov3 0:851248a56628 739 // skip lat
gtzintzarov3 0:851248a56628 740 tok = strtok(NULL, ",");
gtzintzarov3 0:851248a56628 741 if (! tok) return false;
gtzintzarov3 0:851248a56628 742
gtzintzarov3 0:851248a56628 743 // skip long
gtzintzarov3 0:851248a56628 744 tok = strtok(NULL, ",");
gtzintzarov3 0:851248a56628 745 if (! tok) return false;
gtzintzarov3 0:851248a56628 746
gtzintzarov3 0:851248a56628 747 // grab altitude
gtzintzarov3 0:851248a56628 748 char *altp = strtok(NULL, ",");
gtzintzarov3 0:851248a56628 749 if (! altp) return false;
gtzintzarov3 0:851248a56628 750
gtzintzarov3 0:851248a56628 751 *altitude = atof(altp);
gtzintzarov3 0:851248a56628 752
gtzintzarov3 0:851248a56628 753 return true;
gtzintzarov3 0:851248a56628 754 }
gtzintzarov3 0:851248a56628 755
gtzintzarov3 0:851248a56628 756 bool Adafruit_FONA::enableGPSNMEA(uint8_t i) {
gtzintzarov3 0:851248a56628 757 char sendbuff[15] = "AT+CGPSOUT=000";
gtzintzarov3 0:851248a56628 758 sendbuff[11] = (i / 100) + '0';
gtzintzarov3 0:851248a56628 759 i %= 100;
gtzintzarov3 0:851248a56628 760 sendbuff[12] = (i / 10) + '0';
gtzintzarov3 0:851248a56628 761 i %= 10;
gtzintzarov3 0:851248a56628 762 sendbuff[13] = i + '0';
gtzintzarov3 0:851248a56628 763
gtzintzarov3 0:851248a56628 764 return sendCheckReply(sendbuff, "OK", 2000);
gtzintzarov3 0:851248a56628 765 }
gtzintzarov3 0:851248a56628 766
gtzintzarov3 0:851248a56628 767
gtzintzarov3 0:851248a56628 768 /********* GPRS **********************************************************/
gtzintzarov3 0:851248a56628 769
gtzintzarov3 0:851248a56628 770
gtzintzarov3 0:851248a56628 771 bool Adafruit_FONA::enableGPRS(bool onoff) {
gtzintzarov3 0:851248a56628 772 if (onoff) {
gtzintzarov3 0:851248a56628 773 // disconnect all sockets
gtzintzarov3 0:851248a56628 774 sendCheckReply("AT+CIPSHUT", "SHUT OK", 5000);
gtzintzarov3 0:851248a56628 775
gtzintzarov3 0:851248a56628 776 if (! sendCheckReply("AT+CGATT=1", "OK", 10000))
gtzintzarov3 0:851248a56628 777 return false;
gtzintzarov3 0:851248a56628 778
gtzintzarov3 0:851248a56628 779 // set bearer profile! connection type GPRS
gtzintzarov3 0:851248a56628 780 if (! sendCheckReply("AT+SAPBR=3,1,\"CONTYPE\",\"GPRS\"", "OK", 10000))
gtzintzarov3 0:851248a56628 781 return false;
gtzintzarov3 0:851248a56628 782
gtzintzarov3 0:851248a56628 783 // set bearer profile access point name
gtzintzarov3 0:851248a56628 784 if (apn) {
gtzintzarov3 0:851248a56628 785 // Send command AT+SAPBR=3,1,"APN","<apn value>" where <apn value> is the configured APN value.
gtzintzarov3 0:851248a56628 786 if (! sendCheckReplyQuoted("AT+SAPBR=3,1,\"APN\",", apn, "OK", 10000))
gtzintzarov3 0:851248a56628 787 return false;
gtzintzarov3 0:851248a56628 788
gtzintzarov3 0:851248a56628 789 // set username/password
gtzintzarov3 0:851248a56628 790 if (apnusername) {
gtzintzarov3 0:851248a56628 791 // Send command AT+SAPBR=3,1,"USER","<user>" where <user> is the configured APN username.
gtzintzarov3 0:851248a56628 792 if (! sendCheckReplyQuoted("AT+SAPBR=3,1,\"USER\",", apnusername, "OK", 10000))
gtzintzarov3 0:851248a56628 793 return false;
gtzintzarov3 0:851248a56628 794 }
gtzintzarov3 0:851248a56628 795 if (apnpassword) {
gtzintzarov3 0:851248a56628 796 // Send command AT+SAPBR=3,1,"PWD","<password>" where <password> is the configured APN password.
gtzintzarov3 0:851248a56628 797 if (! sendCheckReplyQuoted("AT+SAPBR=3,1,\"PWD\",", apnpassword, "OK", 10000))
gtzintzarov3 0:851248a56628 798 return false;
gtzintzarov3 0:851248a56628 799 }
gtzintzarov3 0:851248a56628 800 }
gtzintzarov3 0:851248a56628 801
gtzintzarov3 0:851248a56628 802 // open GPRS context
gtzintzarov3 0:851248a56628 803 if (! sendCheckReply("AT+SAPBR=1,1", "OK", 10000))
gtzintzarov3 0:851248a56628 804 return false;
gtzintzarov3 0:851248a56628 805 } else {
gtzintzarov3 0:851248a56628 806 // disconnect all sockets
gtzintzarov3 0:851248a56628 807 if (! sendCheckReply("AT+CIPSHUT", "SHUT OK", 5000))
gtzintzarov3 0:851248a56628 808 return false;
gtzintzarov3 0:851248a56628 809
gtzintzarov3 0:851248a56628 810 // close GPRS context
gtzintzarov3 0:851248a56628 811 if (! sendCheckReply("AT+SAPBR=0,1", "OK", 10000))
gtzintzarov3 0:851248a56628 812 return false;
gtzintzarov3 0:851248a56628 813
gtzintzarov3 0:851248a56628 814 if (! sendCheckReply("AT+CGATT=0", "OK", 10000))
gtzintzarov3 0:851248a56628 815 return false;
gtzintzarov3 0:851248a56628 816 }
gtzintzarov3 0:851248a56628 817 return true;
gtzintzarov3 0:851248a56628 818 }
gtzintzarov3 0:851248a56628 819
gtzintzarov3 0:851248a56628 820 uint8_t Adafruit_FONA::GPRSstate(void) {
gtzintzarov3 0:851248a56628 821 uint16_t state;
gtzintzarov3 0:851248a56628 822
gtzintzarov3 0:851248a56628 823 if (! sendParseReply("AT+CGATT?", "+CGATT: ", &state) )
gtzintzarov3 0:851248a56628 824 return -1;
gtzintzarov3 0:851248a56628 825
gtzintzarov3 0:851248a56628 826 return state;
gtzintzarov3 0:851248a56628 827 }
gtzintzarov3 0:851248a56628 828
gtzintzarov3 0:851248a56628 829 void Adafruit_FONA::setGPRSNetworkSettings(const char* apn, const char* ausername, const char* apassword) {
gtzintzarov3 0:851248a56628 830 this->apn = (char*) apn;
gtzintzarov3 0:851248a56628 831 this->apnusername = (char*) ausername;
gtzintzarov3 0:851248a56628 832 this->apnpassword = (char*) apassword;
gtzintzarov3 0:851248a56628 833 }
gtzintzarov3 0:851248a56628 834
gtzintzarov3 0:851248a56628 835 bool Adafruit_FONA::getGSMLoc(uint16_t *errorcode, char *buff, uint16_t maxlen) {
gtzintzarov3 0:851248a56628 836 getReply("AT+CIPGSMLOC=1,1", (uint16_t)10000);
gtzintzarov3 0:851248a56628 837
gtzintzarov3 0:851248a56628 838 if (! parseReply("+CIPGSMLOC: ", errorcode))
gtzintzarov3 0:851248a56628 839 return false;
gtzintzarov3 0:851248a56628 840
gtzintzarov3 0:851248a56628 841 char *p = replybuffer+14;
gtzintzarov3 0:851248a56628 842 uint16_t lentocopy = min((uint16_t)(maxlen-1), (uint16_t)strlen(p));
gtzintzarov3 0:851248a56628 843 strncpy(buff, p, lentocopy+1);
gtzintzarov3 0:851248a56628 844
gtzintzarov3 0:851248a56628 845 readline(); // eat OK
gtzintzarov3 0:851248a56628 846
gtzintzarov3 0:851248a56628 847 return true;
gtzintzarov3 0:851248a56628 848 }
gtzintzarov3 0:851248a56628 849
gtzintzarov3 0:851248a56628 850 bool Adafruit_FONA::getGSMLoc(float *lat, float *lon) {
gtzintzarov3 0:851248a56628 851 uint16_t returncode;
gtzintzarov3 0:851248a56628 852 char gpsbuffer[120];
gtzintzarov3 0:851248a56628 853
gtzintzarov3 0:851248a56628 854 // make sure we could get a response
gtzintzarov3 0:851248a56628 855 if (! getGSMLoc(&returncode, gpsbuffer, 120))
gtzintzarov3 0:851248a56628 856 return false;
gtzintzarov3 0:851248a56628 857
gtzintzarov3 0:851248a56628 858 // make sure we have a valid return code
gtzintzarov3 0:851248a56628 859 if (returncode != 0)
gtzintzarov3 0:851248a56628 860 return false;
gtzintzarov3 0:851248a56628 861
gtzintzarov3 0:851248a56628 862 // tokenize the gps buffer to locate the lat & long
gtzintzarov3 0:851248a56628 863 char *latp = strtok(gpsbuffer, ",");
gtzintzarov3 0:851248a56628 864 if (! latp) return false;
gtzintzarov3 0:851248a56628 865
gtzintzarov3 0:851248a56628 866 char *longp = strtok(NULL, ",");
gtzintzarov3 0:851248a56628 867 if (! longp) return false;
gtzintzarov3 0:851248a56628 868
gtzintzarov3 0:851248a56628 869 *lat = atof(latp);
gtzintzarov3 0:851248a56628 870 *lon = atof(longp);
gtzintzarov3 0:851248a56628 871
gtzintzarov3 0:851248a56628 872 return true;
gtzintzarov3 0:851248a56628 873 }
gtzintzarov3 0:851248a56628 874
gtzintzarov3 0:851248a56628 875 /********* TCP FUNCTIONS ************************************/
gtzintzarov3 0:851248a56628 876
gtzintzarov3 0:851248a56628 877
gtzintzarov3 0:851248a56628 878 bool Adafruit_FONA::TCPconnect(char *server, uint16_t port) {
gtzintzarov3 0:851248a56628 879 flushInput();
gtzintzarov3 0:851248a56628 880
gtzintzarov3 0:851248a56628 881 // close all old connections
gtzintzarov3 0:851248a56628 882 if (! sendCheckReply("AT+CIPSHUT", "SHUT OK", 5000) ) return false;
gtzintzarov3 0:851248a56628 883
gtzintzarov3 0:851248a56628 884 // single connection at a time
gtzintzarov3 0:851248a56628 885 if (! sendCheckReply("AT+CIPMUX=0", "OK") ) return false;
gtzintzarov3 0:851248a56628 886
gtzintzarov3 0:851248a56628 887 // manually read data
gtzintzarov3 0:851248a56628 888 if (! sendCheckReply("AT+CIPRXGET=1", "OK") ) return false;
gtzintzarov3 0:851248a56628 889
gtzintzarov3 0:851248a56628 890 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 891 printf("AT+CIPSTART=\"TCP\",\"%s\",\"%d\"\r\n", server, port);
gtzintzarov3 0:851248a56628 892 #endif
gtzintzarov3 0:851248a56628 893
gtzintzarov3 0:851248a56628 894 mySerial.printf("AT+CIPSTART=\"TCP\",\"%s\",\"%d\"\r\n", server, port);
gtzintzarov3 0:851248a56628 895
gtzintzarov3 0:851248a56628 896 if (! expectReply("OK")) return false;
gtzintzarov3 0:851248a56628 897 if (! expectReply("CONNECT OK")) return false;
gtzintzarov3 0:851248a56628 898 return true;
gtzintzarov3 0:851248a56628 899 }
gtzintzarov3 0:851248a56628 900
gtzintzarov3 0:851248a56628 901 bool Adafruit_FONA::TCPclose(void) {
gtzintzarov3 0:851248a56628 902 return sendCheckReply("AT+CIPCLOSE", "OK");
gtzintzarov3 0:851248a56628 903 }
gtzintzarov3 0:851248a56628 904
gtzintzarov3 0:851248a56628 905 bool Adafruit_FONA::TCPconnected(void) {
gtzintzarov3 0:851248a56628 906 if (! sendCheckReply("AT+CIPSTATUS", "OK", 100) ) return false;
gtzintzarov3 0:851248a56628 907 readline(100);
gtzintzarov3 0:851248a56628 908 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 909 printf("\t<--- %s\r\n", replybuffer);
gtzintzarov3 0:851248a56628 910 #endif
gtzintzarov3 0:851248a56628 911 return (strcmp(replybuffer, "STATE: CONNECT OK") == 0);
gtzintzarov3 0:851248a56628 912 }
gtzintzarov3 0:851248a56628 913
gtzintzarov3 0:851248a56628 914 bool Adafruit_FONA::TCPsend(char *packet, uint8_t len) {
gtzintzarov3 0:851248a56628 915 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 916 printf("AT+CIPSEND=%d\r\n", len);
gtzintzarov3 0:851248a56628 917
gtzintzarov3 0:851248a56628 918 for (uint16_t i=0; i<len; i++) {
gtzintzarov3 0:851248a56628 919 printf(" 0x%#02x", packet[i]);
gtzintzarov3 0:851248a56628 920 }
gtzintzarov3 0:851248a56628 921 printf("\r\n");
gtzintzarov3 0:851248a56628 922 #endif
gtzintzarov3 0:851248a56628 923
gtzintzarov3 0:851248a56628 924
gtzintzarov3 0:851248a56628 925 mySerial.printf("AT+CIPSEND=%d\r\n", len);
gtzintzarov3 0:851248a56628 926 readline();
gtzintzarov3 0:851248a56628 927 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 928 printf("\t<--- %s\r\n", replybuffer);
gtzintzarov3 0:851248a56628 929 #endif
gtzintzarov3 0:851248a56628 930 if (replybuffer[0] != '>') return false;
gtzintzarov3 0:851248a56628 931
gtzintzarov3 0:851248a56628 932 for (uint16_t i=0; i<len; i++) {
gtzintzarov3 0:851248a56628 933 mySerial.putc(packet[i]);
gtzintzarov3 0:851248a56628 934 }
gtzintzarov3 0:851248a56628 935 readline(3000); // wait up to 3 seconds to send the data
gtzintzarov3 0:851248a56628 936 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 937 printf("\t<--- %s\r\n", replybuffer);
gtzintzarov3 0:851248a56628 938 #endif
gtzintzarov3 0:851248a56628 939
gtzintzarov3 0:851248a56628 940 return (strcmp(replybuffer, "SEND OK") == 0);
gtzintzarov3 0:851248a56628 941 }
gtzintzarov3 0:851248a56628 942
gtzintzarov3 0:851248a56628 943 uint16_t Adafruit_FONA::TCPavailable(void) {
gtzintzarov3 0:851248a56628 944 uint16_t avail;
gtzintzarov3 0:851248a56628 945
gtzintzarov3 0:851248a56628 946 if (! sendParseReply("AT+CIPRXGET=4", "+CIPRXGET: 4,", &avail, ',', 0) ) return false;
gtzintzarov3 0:851248a56628 947
gtzintzarov3 0:851248a56628 948 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 949 printf("%d bytes available\r\n", avail);
gtzintzarov3 0:851248a56628 950 #endif
gtzintzarov3 0:851248a56628 951
gtzintzarov3 0:851248a56628 952 return avail;
gtzintzarov3 0:851248a56628 953 }
gtzintzarov3 0:851248a56628 954
gtzintzarov3 0:851248a56628 955
gtzintzarov3 0:851248a56628 956 uint16_t Adafruit_FONA::TCPread(uint8_t *buff, uint8_t len) {
gtzintzarov3 0:851248a56628 957 uint16_t avail;
gtzintzarov3 0:851248a56628 958
gtzintzarov3 0:851248a56628 959 mySerial.printf("AT+CIPRXGET=2,%d\r\n", len);
gtzintzarov3 0:851248a56628 960 readline();
gtzintzarov3 0:851248a56628 961 if (! parseReply("+CIPRXGET: 2,", &avail, ',', 0)) return false;
gtzintzarov3 0:851248a56628 962
gtzintzarov3 0:851248a56628 963 readRaw(avail);
gtzintzarov3 0:851248a56628 964
gtzintzarov3 0:851248a56628 965 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 966 printf("%d bytes read\r\n", avail);
gtzintzarov3 0:851248a56628 967 for (uint8_t i=0;i<avail;i++) {
gtzintzarov3 0:851248a56628 968 printf(" 0x%#02x", replybuffer[i]);
gtzintzarov3 0:851248a56628 969 }
gtzintzarov3 0:851248a56628 970 printf("\r\n");
gtzintzarov3 0:851248a56628 971 #endif
gtzintzarov3 0:851248a56628 972
gtzintzarov3 0:851248a56628 973 memcpy(buff, replybuffer, avail);
gtzintzarov3 0:851248a56628 974
gtzintzarov3 0:851248a56628 975 return avail;
gtzintzarov3 0:851248a56628 976 }
gtzintzarov3 0:851248a56628 977
gtzintzarov3 0:851248a56628 978 /********* HTTP LOW LEVEL FUNCTIONS ************************************/
gtzintzarov3 0:851248a56628 979
gtzintzarov3 0:851248a56628 980 bool Adafruit_FONA::HTTP_init() {
gtzintzarov3 0:851248a56628 981 return sendCheckReply("AT+HTTPINIT", "OK");
gtzintzarov3 0:851248a56628 982 }
gtzintzarov3 0:851248a56628 983
gtzintzarov3 0:851248a56628 984 bool Adafruit_FONA::HTTP_term() {
gtzintzarov3 0:851248a56628 985 return sendCheckReply("AT+HTTPTERM", "OK");
gtzintzarov3 0:851248a56628 986 }
gtzintzarov3 0:851248a56628 987
gtzintzarov3 0:851248a56628 988 void Adafruit_FONA::HTTP_para_start(const char* parameter, bool quoted) {
gtzintzarov3 0:851248a56628 989 flushInput();
gtzintzarov3 0:851248a56628 990
gtzintzarov3 0:851248a56628 991 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 992 printf("\t---> AT+HTTPPARA=\"%s\"\r\n", parameter);
gtzintzarov3 0:851248a56628 993 #endif
gtzintzarov3 0:851248a56628 994
gtzintzarov3 0:851248a56628 995 mySerial.printf("AT+HTTPPARA=\"%s", parameter);
gtzintzarov3 0:851248a56628 996 if (quoted)
gtzintzarov3 0:851248a56628 997 mySerial.printf("\",\"");
gtzintzarov3 0:851248a56628 998 else
gtzintzarov3 0:851248a56628 999 mySerial.printf("\",");
gtzintzarov3 0:851248a56628 1000 }
gtzintzarov3 0:851248a56628 1001
gtzintzarov3 0:851248a56628 1002 bool Adafruit_FONA::HTTP_para_end(bool quoted) {
gtzintzarov3 0:851248a56628 1003 if (quoted)
gtzintzarov3 0:851248a56628 1004 mySerial.printf("\"\r\n");
gtzintzarov3 0:851248a56628 1005 else
gtzintzarov3 0:851248a56628 1006 mySerial.printf("\r\n");
gtzintzarov3 0:851248a56628 1007
gtzintzarov3 0:851248a56628 1008 return expectReply("OK");
gtzintzarov3 0:851248a56628 1009 }
gtzintzarov3 0:851248a56628 1010
gtzintzarov3 0:851248a56628 1011 bool Adafruit_FONA::HTTP_para(const char* parameter, const char* value) {
gtzintzarov3 0:851248a56628 1012 HTTP_para_start(parameter, true);
gtzintzarov3 0:851248a56628 1013 mySerial.printf(value);
gtzintzarov3 0:851248a56628 1014 return HTTP_para_end(true);
gtzintzarov3 0:851248a56628 1015 }
gtzintzarov3 0:851248a56628 1016
gtzintzarov3 0:851248a56628 1017 bool Adafruit_FONA::HTTP_para(const char* parameter, int32_t value) {
gtzintzarov3 0:851248a56628 1018 HTTP_para_start(parameter, false);
gtzintzarov3 0:851248a56628 1019 mySerial.printf("%d", value);
gtzintzarov3 0:851248a56628 1020 return HTTP_para_end(false);
gtzintzarov3 0:851248a56628 1021 }
gtzintzarov3 0:851248a56628 1022
gtzintzarov3 0:851248a56628 1023 bool Adafruit_FONA::HTTP_data(uint32_t size, uint32_t maxTime) {
gtzintzarov3 0:851248a56628 1024 flushInput();
gtzintzarov3 0:851248a56628 1025
gtzintzarov3 0:851248a56628 1026 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1027 printf("\t---> AT+HTTPDATA=%d,%d\r\n", size, maxTime);
gtzintzarov3 0:851248a56628 1028 #endif
gtzintzarov3 0:851248a56628 1029
gtzintzarov3 0:851248a56628 1030 mySerial.printf("AT+HTTPDATA=%d,%d\r\n", size, maxTime);
gtzintzarov3 0:851248a56628 1031
gtzintzarov3 0:851248a56628 1032 return expectReply("DOWNLOAD");
gtzintzarov3 0:851248a56628 1033 }
gtzintzarov3 0:851248a56628 1034
gtzintzarov3 0:851248a56628 1035 bool Adafruit_FONA::HTTP_action(uint8_t method, uint16_t *status, uint16_t *datalen, int32_t timeout) {
gtzintzarov3 0:851248a56628 1036 // Send request.
gtzintzarov3 0:851248a56628 1037 if (! sendCheckReply("AT+HTTPACTION=", method, "OK"))
gtzintzarov3 0:851248a56628 1038 return false;
gtzintzarov3 0:851248a56628 1039
gtzintzarov3 0:851248a56628 1040 // Parse response status and size.
gtzintzarov3 0:851248a56628 1041 readline(timeout);
gtzintzarov3 0:851248a56628 1042 if (! parseReply("+HTTPACTION:", status, ',', 1))
gtzintzarov3 0:851248a56628 1043 return false;
gtzintzarov3 0:851248a56628 1044 if (! parseReply("+HTTPACTION:", datalen, ',', 2))
gtzintzarov3 0:851248a56628 1045 return false;
gtzintzarov3 0:851248a56628 1046
gtzintzarov3 0:851248a56628 1047 return true;
gtzintzarov3 0:851248a56628 1048 }
gtzintzarov3 0:851248a56628 1049
gtzintzarov3 0:851248a56628 1050 bool Adafruit_FONA::HTTP_readall(uint16_t *datalen) {
gtzintzarov3 0:851248a56628 1051 getReply("AT+HTTPREAD");
gtzintzarov3 0:851248a56628 1052 if (! parseReply("+HTTPREAD:", datalen, ',', 0))
gtzintzarov3 0:851248a56628 1053 return false;
gtzintzarov3 0:851248a56628 1054
gtzintzarov3 0:851248a56628 1055 return true;
gtzintzarov3 0:851248a56628 1056 }
gtzintzarov3 0:851248a56628 1057
gtzintzarov3 0:851248a56628 1058 bool Adafruit_FONA::HTTP_ssl(bool onoff) {
gtzintzarov3 0:851248a56628 1059 return sendCheckReply("AT+HTTPSSL=", onoff ? 1 : 0, "OK");
gtzintzarov3 0:851248a56628 1060 }
gtzintzarov3 0:851248a56628 1061
gtzintzarov3 0:851248a56628 1062 /********* HTTP HIGH LEVEL FUNCTIONS ***************************/
gtzintzarov3 0:851248a56628 1063
gtzintzarov3 0:851248a56628 1064 bool Adafruit_FONA::HTTP_GET_start(char *url, uint16_t *status, uint16_t *datalen){
gtzintzarov3 0:851248a56628 1065 if (! HTTP_setup(url))
gtzintzarov3 0:851248a56628 1066 return false;
gtzintzarov3 0:851248a56628 1067
gtzintzarov3 0:851248a56628 1068 // HTTP GET
gtzintzarov3 0:851248a56628 1069 if (! HTTP_action(FONA_HTTP_GET, status, datalen))
gtzintzarov3 0:851248a56628 1070 return false;
gtzintzarov3 0:851248a56628 1071
gtzintzarov3 0:851248a56628 1072 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1073 printf("Status: %d\r\n", *status);
gtzintzarov3 0:851248a56628 1074 printf("Len: %d\r\n", *datalen);
gtzintzarov3 0:851248a56628 1075 #endif
gtzintzarov3 0:851248a56628 1076
gtzintzarov3 0:851248a56628 1077 // HTTP response data
gtzintzarov3 0:851248a56628 1078 if (! HTTP_readall(datalen))
gtzintzarov3 0:851248a56628 1079 return false;
gtzintzarov3 0:851248a56628 1080
gtzintzarov3 0:851248a56628 1081 return true;
gtzintzarov3 0:851248a56628 1082 }
gtzintzarov3 0:851248a56628 1083
gtzintzarov3 0:851248a56628 1084 void Adafruit_FONA::HTTP_GET_end(void) {
gtzintzarov3 0:851248a56628 1085 HTTP_term();
gtzintzarov3 0:851248a56628 1086 }
gtzintzarov3 0:851248a56628 1087
gtzintzarov3 0:851248a56628 1088 bool Adafruit_FONA::HTTP_POST_start(char *url, const char* contenttype, const uint8_t *postdata, uint16_t postdatalen, uint16_t *status, uint16_t *datalen) {
gtzintzarov3 0:851248a56628 1089 if (! HTTP_setup(url))
gtzintzarov3 0:851248a56628 1090 return false;
gtzintzarov3 0:851248a56628 1091
gtzintzarov3 0:851248a56628 1092 if (! HTTP_para("CONTENT", contenttype)) {
gtzintzarov3 0:851248a56628 1093 return false;
gtzintzarov3 0:851248a56628 1094 }
gtzintzarov3 0:851248a56628 1095
gtzintzarov3 0:851248a56628 1096 // HTTP POST data
gtzintzarov3 0:851248a56628 1097 if (! HTTP_data(postdatalen, 10000))
gtzintzarov3 0:851248a56628 1098 return false;
gtzintzarov3 0:851248a56628 1099 for (uint16_t i = 0; i < postdatalen; i++) {
gtzintzarov3 0:851248a56628 1100 mySerial.putc(postdata[i]);
gtzintzarov3 0:851248a56628 1101 }
gtzintzarov3 0:851248a56628 1102 if (! expectReply("OK"))
gtzintzarov3 0:851248a56628 1103 return false;
gtzintzarov3 0:851248a56628 1104
gtzintzarov3 0:851248a56628 1105 // HTTP POST
gtzintzarov3 0:851248a56628 1106 if (! HTTP_action(FONA_HTTP_POST, status, datalen))
gtzintzarov3 0:851248a56628 1107 return false;
gtzintzarov3 0:851248a56628 1108
gtzintzarov3 0:851248a56628 1109 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1110 printf("Status: %d\r\n", *status);
gtzintzarov3 0:851248a56628 1111 printf("Len: %d\r\n", *datalen);
gtzintzarov3 0:851248a56628 1112 #endif
gtzintzarov3 0:851248a56628 1113
gtzintzarov3 0:851248a56628 1114 // HTTP response data
gtzintzarov3 0:851248a56628 1115 if (! HTTP_readall(datalen))
gtzintzarov3 0:851248a56628 1116 return false;
gtzintzarov3 0:851248a56628 1117
gtzintzarov3 0:851248a56628 1118 return true;
gtzintzarov3 0:851248a56628 1119 }
gtzintzarov3 0:851248a56628 1120
gtzintzarov3 0:851248a56628 1121 void Adafruit_FONA::HTTP_POST_end(void) {
gtzintzarov3 0:851248a56628 1122 HTTP_term();
gtzintzarov3 0:851248a56628 1123 }
gtzintzarov3 0:851248a56628 1124
gtzintzarov3 0:851248a56628 1125 void Adafruit_FONA::setUserAgent(const char* useragent) {
gtzintzarov3 0:851248a56628 1126 this->useragent = (char*) useragent;
gtzintzarov3 0:851248a56628 1127 }
gtzintzarov3 0:851248a56628 1128
gtzintzarov3 0:851248a56628 1129 void Adafruit_FONA::setHTTPSRedirect(bool onoff) {
gtzintzarov3 0:851248a56628 1130 httpsredirect = onoff;
gtzintzarov3 0:851248a56628 1131 }
gtzintzarov3 0:851248a56628 1132
gtzintzarov3 0:851248a56628 1133 /********* HTTP HELPERS ****************************************/
gtzintzarov3 0:851248a56628 1134
gtzintzarov3 0:851248a56628 1135 bool Adafruit_FONA::HTTP_setup(char *url) {
gtzintzarov3 0:851248a56628 1136 // Handle any pending
gtzintzarov3 0:851248a56628 1137 HTTP_term();
gtzintzarov3 0:851248a56628 1138
gtzintzarov3 0:851248a56628 1139 // Initialize and set parameters
gtzintzarov3 0:851248a56628 1140 if (! HTTP_init())
gtzintzarov3 0:851248a56628 1141 return false;
gtzintzarov3 0:851248a56628 1142 if (! HTTP_para("CID", 1))
gtzintzarov3 0:851248a56628 1143 return false;
gtzintzarov3 0:851248a56628 1144 if (! HTTP_para("UA", useragent))
gtzintzarov3 0:851248a56628 1145 return false;
gtzintzarov3 0:851248a56628 1146 if (! HTTP_para("URL", url))
gtzintzarov3 0:851248a56628 1147 return false;
gtzintzarov3 0:851248a56628 1148
gtzintzarov3 0:851248a56628 1149 // HTTPS redirect
gtzintzarov3 0:851248a56628 1150 if (httpsredirect) {
gtzintzarov3 0:851248a56628 1151 if (! HTTP_para("REDIR",1))
gtzintzarov3 0:851248a56628 1152 return false;
gtzintzarov3 0:851248a56628 1153
gtzintzarov3 0:851248a56628 1154 if (! HTTP_ssl(true))
gtzintzarov3 0:851248a56628 1155 return false;
gtzintzarov3 0:851248a56628 1156 }
gtzintzarov3 0:851248a56628 1157
gtzintzarov3 0:851248a56628 1158 return true;
gtzintzarov3 0:851248a56628 1159 }
gtzintzarov3 0:851248a56628 1160
gtzintzarov3 0:851248a56628 1161
gtzintzarov3 0:851248a56628 1162 /********* HELPERS *********************************************/
gtzintzarov3 0:851248a56628 1163
gtzintzarov3 0:851248a56628 1164 bool Adafruit_FONA::expectReply(const char* reply, uint16_t timeout) {
gtzintzarov3 0:851248a56628 1165 readline(timeout);
gtzintzarov3 0:851248a56628 1166 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1167 printf("\t<--- %s\r\n", replybuffer);
gtzintzarov3 0:851248a56628 1168 #endif
gtzintzarov3 0:851248a56628 1169 return (strcmp(replybuffer, reply) == 0);
gtzintzarov3 0:851248a56628 1170 }
gtzintzarov3 0:851248a56628 1171
gtzintzarov3 0:851248a56628 1172 /********* LOW LEVEL *******************************************/
gtzintzarov3 0:851248a56628 1173
gtzintzarov3 0:851248a56628 1174 void Adafruit_FONA::flushInput() {
gtzintzarov3 0:851248a56628 1175 // Read all available serial input to flush pending data.
gtzintzarov3 0:851248a56628 1176 uint16_t timeoutloop = 0;
gtzintzarov3 0:851248a56628 1177 while (timeoutloop++ < 40) {
gtzintzarov3 0:851248a56628 1178 while(readable()) {
gtzintzarov3 0:851248a56628 1179 getc();
gtzintzarov3 0:851248a56628 1180 timeoutloop = 0; // If char was received reset the timer
gtzintzarov3 0:851248a56628 1181 }
gtzintzarov3 0:851248a56628 1182 wait_ms(1);
gtzintzarov3 0:851248a56628 1183 }
gtzintzarov3 0:851248a56628 1184 }
gtzintzarov3 0:851248a56628 1185
gtzintzarov3 0:851248a56628 1186 uint16_t Adafruit_FONA::readRaw(uint16_t b) {
gtzintzarov3 0:851248a56628 1187 uint16_t idx = 0;
gtzintzarov3 0:851248a56628 1188
gtzintzarov3 0:851248a56628 1189 while (b && (idx < sizeof(replybuffer)-1)) {
gtzintzarov3 0:851248a56628 1190 if (readable()) {
gtzintzarov3 0:851248a56628 1191 replybuffer[idx] = getc();
gtzintzarov3 0:851248a56628 1192 idx++;
gtzintzarov3 0:851248a56628 1193 b--;
gtzintzarov3 0:851248a56628 1194 }
gtzintzarov3 0:851248a56628 1195 }
gtzintzarov3 0:851248a56628 1196 replybuffer[idx] = 0;
gtzintzarov3 0:851248a56628 1197
gtzintzarov3 0:851248a56628 1198 return idx;
gtzintzarov3 0:851248a56628 1199 }
gtzintzarov3 0:851248a56628 1200
gtzintzarov3 0:851248a56628 1201 uint8_t Adafruit_FONA::readline(uint16_t timeout, bool multiline) {
gtzintzarov3 0:851248a56628 1202 uint16_t replyidx = 0;
gtzintzarov3 0:851248a56628 1203
gtzintzarov3 0:851248a56628 1204 while (timeout--) {
gtzintzarov3 0:851248a56628 1205 if (replyidx >= 254) {
gtzintzarov3 0:851248a56628 1206 break;
gtzintzarov3 0:851248a56628 1207 }
gtzintzarov3 0:851248a56628 1208
gtzintzarov3 0:851248a56628 1209 while(readable()) {
gtzintzarov3 0:851248a56628 1210 char c = getc();
gtzintzarov3 0:851248a56628 1211 if (c == '\r') continue;
gtzintzarov3 0:851248a56628 1212 if (c == 0xA) {
gtzintzarov3 0:851248a56628 1213 if (replyidx == 0) // the first 0x0A is ignored
gtzintzarov3 0:851248a56628 1214 continue;
gtzintzarov3 0:851248a56628 1215
gtzintzarov3 0:851248a56628 1216 if (!multiline) {
gtzintzarov3 0:851248a56628 1217 timeout = 0; // the second 0x0A is the end of the line
gtzintzarov3 0:851248a56628 1218 break;
gtzintzarov3 0:851248a56628 1219 }
gtzintzarov3 0:851248a56628 1220 }
gtzintzarov3 0:851248a56628 1221 replybuffer[replyidx] = c;
gtzintzarov3 0:851248a56628 1222 replyidx++;
gtzintzarov3 0:851248a56628 1223 }
gtzintzarov3 0:851248a56628 1224
gtzintzarov3 0:851248a56628 1225 if (timeout == 0) {
gtzintzarov3 0:851248a56628 1226 break;
gtzintzarov3 0:851248a56628 1227 }
gtzintzarov3 0:851248a56628 1228 wait_ms(1);
gtzintzarov3 0:851248a56628 1229 }
gtzintzarov3 0:851248a56628 1230 replybuffer[replyidx] = 0; // null term
gtzintzarov3 0:851248a56628 1231 return replyidx;
gtzintzarov3 0:851248a56628 1232 }
gtzintzarov3 0:851248a56628 1233
gtzintzarov3 0:851248a56628 1234 uint8_t Adafruit_FONA::getReply(const char* send, uint16_t timeout) {
gtzintzarov3 0:851248a56628 1235 flushInput();
gtzintzarov3 0:851248a56628 1236
gtzintzarov3 0:851248a56628 1237 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1238 printf("\t---> %s\r\n", send);
gtzintzarov3 0:851248a56628 1239 #endif
gtzintzarov3 0:851248a56628 1240
gtzintzarov3 0:851248a56628 1241 mySerial.printf("%s\r\n",send);
gtzintzarov3 0:851248a56628 1242
gtzintzarov3 0:851248a56628 1243 uint8_t l = readline(timeout);
gtzintzarov3 0:851248a56628 1244 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1245 printf("\t<--- %s\r\n", replybuffer);
gtzintzarov3 0:851248a56628 1246 #endif
gtzintzarov3 0:851248a56628 1247 return l;
gtzintzarov3 0:851248a56628 1248 }
gtzintzarov3 0:851248a56628 1249
gtzintzarov3 0:851248a56628 1250 // Send prefix, suffix, and newline. Return response (and also set replybuffer with response).
gtzintzarov3 0:851248a56628 1251 uint8_t Adafruit_FONA::getReply(const char* prefix, char* suffix, uint16_t timeout) {
gtzintzarov3 0:851248a56628 1252 flushInput();
gtzintzarov3 0:851248a56628 1253
gtzintzarov3 0:851248a56628 1254 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1255 printf("\t---> %s%s\r\n", prefix, suffix);
gtzintzarov3 0:851248a56628 1256 #endif
gtzintzarov3 0:851248a56628 1257
gtzintzarov3 0:851248a56628 1258 mySerial.printf("%s%s\r\n", prefix, suffix);
gtzintzarov3 0:851248a56628 1259
gtzintzarov3 0:851248a56628 1260 uint8_t l = readline(timeout);
gtzintzarov3 0:851248a56628 1261 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1262 printf("\t<--- %s\r\n", replybuffer);
gtzintzarov3 0:851248a56628 1263 #endif
gtzintzarov3 0:851248a56628 1264 return l;
gtzintzarov3 0:851248a56628 1265 }
gtzintzarov3 0:851248a56628 1266
gtzintzarov3 0:851248a56628 1267 // Send prefix, suffix, and newline. Return response (and also set replybuffer with response).
gtzintzarov3 0:851248a56628 1268 uint8_t Adafruit_FONA::getReply(const char* prefix, int32_t suffix, uint16_t timeout) {
gtzintzarov3 0:851248a56628 1269 flushInput();
gtzintzarov3 0:851248a56628 1270
gtzintzarov3 0:851248a56628 1271 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1272 printf("\t---> %s%d\r\n", prefix, suffix);
gtzintzarov3 0:851248a56628 1273 #endif
gtzintzarov3 0:851248a56628 1274
gtzintzarov3 0:851248a56628 1275 mySerial.printf("%s%d\r\n", prefix, suffix);
gtzintzarov3 0:851248a56628 1276
gtzintzarov3 0:851248a56628 1277 uint8_t l = readline(timeout);
gtzintzarov3 0:851248a56628 1278 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1279 printf("\t<--- %s\r\n", replybuffer);
gtzintzarov3 0:851248a56628 1280 #endif
gtzintzarov3 0:851248a56628 1281 return l;
gtzintzarov3 0:851248a56628 1282 }
gtzintzarov3 0:851248a56628 1283
gtzintzarov3 0:851248a56628 1284 // Send prefix, suffix, suffix2, and newline. Return response (and also set replybuffer with response).
gtzintzarov3 0:851248a56628 1285 uint8_t Adafruit_FONA::getReply(const char* prefix, int32_t suffix1, int32_t suffix2, uint16_t timeout) {
gtzintzarov3 0:851248a56628 1286 flushInput();
gtzintzarov3 0:851248a56628 1287
gtzintzarov3 0:851248a56628 1288 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1289 printf("\t---> %s%d,%d\r\n", prefix, suffix1, suffix2);
gtzintzarov3 0:851248a56628 1290 #endif
gtzintzarov3 0:851248a56628 1291
gtzintzarov3 0:851248a56628 1292 mySerial.printf("%s%d,%d\r\n", prefix, suffix1, suffix2);
gtzintzarov3 0:851248a56628 1293
gtzintzarov3 0:851248a56628 1294 uint8_t l = readline(timeout);
gtzintzarov3 0:851248a56628 1295 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1296 printf("\t<--- %s\r\n", replybuffer);
gtzintzarov3 0:851248a56628 1297 #endif
gtzintzarov3 0:851248a56628 1298 return l;
gtzintzarov3 0:851248a56628 1299 }
gtzintzarov3 0:851248a56628 1300
gtzintzarov3 0:851248a56628 1301 // Send prefix, ", suffix, ", and newline. Return response (and also set replybuffer with response).
gtzintzarov3 0:851248a56628 1302 uint8_t Adafruit_FONA::getReplyQuoted(const char* prefix, const char* suffix, uint16_t timeout) {
gtzintzarov3 0:851248a56628 1303 flushInput();
gtzintzarov3 0:851248a56628 1304
gtzintzarov3 0:851248a56628 1305 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1306 printf("\t---> %s\"%s\"\r\n", prefix, suffix);
gtzintzarov3 0:851248a56628 1307 #endif
gtzintzarov3 0:851248a56628 1308
gtzintzarov3 0:851248a56628 1309 mySerial.printf("%s\"%s\"\r\n", prefix, suffix);
gtzintzarov3 0:851248a56628 1310
gtzintzarov3 0:851248a56628 1311 uint8_t l = readline(timeout);
gtzintzarov3 0:851248a56628 1312 #ifdef ADAFRUIT_FONA_DEBUG
gtzintzarov3 0:851248a56628 1313 printf("\t<--- %s\r\n", replybuffer);
gtzintzarov3 0:851248a56628 1314 #endif
gtzintzarov3 0:851248a56628 1315 return l;
gtzintzarov3 0:851248a56628 1316 }
gtzintzarov3 0:851248a56628 1317
gtzintzarov3 0:851248a56628 1318
gtzintzarov3 0:851248a56628 1319 bool Adafruit_FONA::sendCheckReply(const char *send, const char *reply, uint16_t timeout) {
gtzintzarov3 0:851248a56628 1320 getReply(send, timeout);
gtzintzarov3 0:851248a56628 1321
gtzintzarov3 0:851248a56628 1322 return (strcmp(replybuffer, reply) == 0);
gtzintzarov3 0:851248a56628 1323 }
gtzintzarov3 0:851248a56628 1324
gtzintzarov3 0:851248a56628 1325 // Send prefix, suffix, and newline. Verify FONA response matches reply parameter.
gtzintzarov3 0:851248a56628 1326 bool Adafruit_FONA::sendCheckReply(const char* prefix, char *suffix, const char* reply, uint16_t timeout) {
gtzintzarov3 0:851248a56628 1327 getReply(prefix, suffix, timeout);
gtzintzarov3 0:851248a56628 1328 return (strcmp(replybuffer, reply) == 0);
gtzintzarov3 0:851248a56628 1329 }
gtzintzarov3 0:851248a56628 1330
gtzintzarov3 0:851248a56628 1331 // Send prefix, suffix, and newline. Verify FONA response matches reply parameter.
gtzintzarov3 0:851248a56628 1332 bool Adafruit_FONA::sendCheckReply(const char* prefix, int32_t suffix, const char* reply, uint16_t timeout) {
gtzintzarov3 0:851248a56628 1333 getReply(prefix, suffix, timeout);
gtzintzarov3 0:851248a56628 1334 return (strcmp(replybuffer, reply) == 0);
gtzintzarov3 0:851248a56628 1335 }
gtzintzarov3 0:851248a56628 1336
gtzintzarov3 0:851248a56628 1337 // Send prefix, suffix, suffix2, and newline. Verify FONA response matches reply parameter.
gtzintzarov3 0:851248a56628 1338 bool Adafruit_FONA::sendCheckReply(const char* prefix, int32_t suffix1, int32_t suffix2, const char* reply, uint16_t timeout) {
gtzintzarov3 0:851248a56628 1339 getReply(prefix, suffix1, suffix2, timeout);
gtzintzarov3 0:851248a56628 1340 return (strcmp(replybuffer, reply) == 0);
gtzintzarov3 0:851248a56628 1341 }
gtzintzarov3 0:851248a56628 1342
gtzintzarov3 0:851248a56628 1343 // Send prefix, ", suffix, ", and newline. Verify FONA response matches reply parameter.
gtzintzarov3 0:851248a56628 1344 bool Adafruit_FONA::sendCheckReplyQuoted(const char* prefix, const char* suffix, const char* reply, uint16_t timeout) {
gtzintzarov3 0:851248a56628 1345 getReplyQuoted(prefix, suffix, timeout);
gtzintzarov3 0:851248a56628 1346 return (strcmp(replybuffer, reply) == 0);
gtzintzarov3 0:851248a56628 1347 }
gtzintzarov3 0:851248a56628 1348
gtzintzarov3 0:851248a56628 1349 bool Adafruit_FONA::parseReply(const char* toreply, uint16_t *v, char divider, uint8_t index) {
gtzintzarov3 0:851248a56628 1350 char *p = strstr(replybuffer, toreply); // get the pointer to the voltage
gtzintzarov3 0:851248a56628 1351 if (p == 0) return false;
gtzintzarov3 0:851248a56628 1352 p += strlen(toreply);
gtzintzarov3 0:851248a56628 1353
gtzintzarov3 0:851248a56628 1354 for (uint8_t i=0; i<index;i++) {
gtzintzarov3 0:851248a56628 1355 // increment dividers
gtzintzarov3 0:851248a56628 1356 p = strchr(p, divider);
gtzintzarov3 0:851248a56628 1357 if (!p) return false;
gtzintzarov3 0:851248a56628 1358 p++;
gtzintzarov3 0:851248a56628 1359 }
gtzintzarov3 0:851248a56628 1360
gtzintzarov3 0:851248a56628 1361 *v = atoi(p);
gtzintzarov3 0:851248a56628 1362
gtzintzarov3 0:851248a56628 1363 return true;
gtzintzarov3 0:851248a56628 1364 }
gtzintzarov3 0:851248a56628 1365
gtzintzarov3 0:851248a56628 1366 bool Adafruit_FONA::parseReply(const char* toreply, char *v, char divider, uint8_t index) {
gtzintzarov3 0:851248a56628 1367 uint8_t i=0;
gtzintzarov3 0:851248a56628 1368 char *p = strstr(replybuffer, toreply);
gtzintzarov3 0:851248a56628 1369 if (p == 0) return false;
gtzintzarov3 0:851248a56628 1370 p+=strlen(toreply);
gtzintzarov3 0:851248a56628 1371
gtzintzarov3 0:851248a56628 1372 for (i=0; i<index;i++) {
gtzintzarov3 0:851248a56628 1373 // increment dividers
gtzintzarov3 0:851248a56628 1374 p = strchr(p, divider);
gtzintzarov3 0:851248a56628 1375 if (!p) return false;
gtzintzarov3 0:851248a56628 1376 p++;
gtzintzarov3 0:851248a56628 1377 }
gtzintzarov3 0:851248a56628 1378
gtzintzarov3 0:851248a56628 1379 for(i=0; i<strlen(p);i++) {
gtzintzarov3 0:851248a56628 1380 if(p[i] == divider)
gtzintzarov3 0:851248a56628 1381 break;
gtzintzarov3 0:851248a56628 1382 v[i] = p[i];
gtzintzarov3 0:851248a56628 1383 }
gtzintzarov3 0:851248a56628 1384
gtzintzarov3 0:851248a56628 1385 v[i] = '\0';
gtzintzarov3 0:851248a56628 1386
gtzintzarov3 0:851248a56628 1387 return true;
gtzintzarov3 0:851248a56628 1388 }
gtzintzarov3 0:851248a56628 1389
gtzintzarov3 0:851248a56628 1390 // Parse a quoted string in the response fields and copy its value (without quotes)
gtzintzarov3 0:851248a56628 1391 // to the specified character array (v). Only up to maxlen characters are copied
gtzintzarov3 0:851248a56628 1392 // into the result buffer, so make sure to pass a large enough buffer to handle the
gtzintzarov3 0:851248a56628 1393 // response.
gtzintzarov3 0:851248a56628 1394 bool Adafruit_FONA::parseReplyQuoted(const char* toreply, char* v, int maxlen, char divider, uint8_t index) {
gtzintzarov3 0:851248a56628 1395 uint8_t i=0, j;
gtzintzarov3 0:851248a56628 1396 // Verify response starts with toreply.
gtzintzarov3 0:851248a56628 1397 char *p = strstr(replybuffer, toreply);
gtzintzarov3 0:851248a56628 1398 if (p == 0) return false;
gtzintzarov3 0:851248a56628 1399 p+=strlen(toreply);
gtzintzarov3 0:851248a56628 1400
gtzintzarov3 0:851248a56628 1401 // Find location of desired response field.
gtzintzarov3 0:851248a56628 1402 for (i=0; i<index;i++) {
gtzintzarov3 0:851248a56628 1403 // increment dividers
gtzintzarov3 0:851248a56628 1404 p = strchr(p, divider);
gtzintzarov3 0:851248a56628 1405 if (!p) return false;
gtzintzarov3 0:851248a56628 1406 p++;
gtzintzarov3 0:851248a56628 1407 }
gtzintzarov3 0:851248a56628 1408
gtzintzarov3 0:851248a56628 1409 // Copy characters from response field into result string.
gtzintzarov3 0:851248a56628 1410 for(i=0, j=0; j<maxlen && i<strlen(p); ++i) {
gtzintzarov3 0:851248a56628 1411 // Stop if a divier is found.
gtzintzarov3 0:851248a56628 1412 if(p[i] == divider)
gtzintzarov3 0:851248a56628 1413 break;
gtzintzarov3 0:851248a56628 1414 // Skip any quotation marks.
gtzintzarov3 0:851248a56628 1415 else if(p[i] == '"')
gtzintzarov3 0:851248a56628 1416 continue;
gtzintzarov3 0:851248a56628 1417 v[j++] = p[i];
gtzintzarov3 0:851248a56628 1418 }
gtzintzarov3 0:851248a56628 1419
gtzintzarov3 0:851248a56628 1420 // Add a null terminator if result string buffer was not filled.
gtzintzarov3 0:851248a56628 1421 if (j < maxlen)
gtzintzarov3 0:851248a56628 1422 v[j] = '\0';
gtzintzarov3 0:851248a56628 1423
gtzintzarov3 0:851248a56628 1424 return true;
gtzintzarov3 0:851248a56628 1425 }
gtzintzarov3 0:851248a56628 1426
gtzintzarov3 0:851248a56628 1427 bool Adafruit_FONA::sendParseReply(const char* tosend, const char* toreply, uint16_t *v, char divider, uint8_t index) {
gtzintzarov3 0:851248a56628 1428 getReply(tosend);
gtzintzarov3 0:851248a56628 1429
gtzintzarov3 0:851248a56628 1430 if (! parseReply(toreply, v, divider, index)) return false;
gtzintzarov3 0:851248a56628 1431
gtzintzarov3 0:851248a56628 1432 readline(); // eat 'OK'
gtzintzarov3 0:851248a56628 1433
gtzintzarov3 0:851248a56628 1434 return true;
gtzintzarov3 0:851248a56628 1435 }