Nikita Bocharov
/
FONA_CellPhone
ECE420 Project
Fork of FONA_CellPhone by
Adafruit_FONA.cpp@18:a4f1b2947109, 2016-06-22 (annotated)
- 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?
User | Revision | Line number | New 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 | } |