ECE420 Project

Dependencies:   mbed

Fork of FONA_CellPhone by Dream Team

Committer:
nakita94
Date:
Wed Jun 22 01:33:03 2016 +0000
Revision:
18:a4f1b2947109
Parent:
9:06eca688f2a3
6/21/2106 changes

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