Adafruit_FONA_3G - Library for the Adafruit FONA. This is a port of …

Users » Nels885 » Code » Adafruit_FONA_3G

Library for the Adafruit FONA. This is a port of the original Arduino library available at: https://github.com/adafruit/Adafruit_FONA_Library . - Modified by Marc PLOUHINEC 27/06/2015 for use in mbed - Modified by lionel VOIRIN 05/08/2018 for use Adafruit FONA 3

Dependents: Adafruit_FONA_3G_Library_Test

Adafruit_FONA.cpp@3:addc5ef76145, 2018-08-07 (annotated)

Committer:: Nels885
Date:: Tue Aug 07 14:30:19 2018 +0000
Revision:: 3:addc5ef76145
Parent:: 2:3fc229f5ec3f
Child:: 4:05c32425d2da

Adding TCP initialize TCP connection

Who changed what in which revision?

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

Repository toolbox

Export to desktop IDE

Repository details

Type:	Library
Created:	05 Aug 2018
Imports:	11
Forks:	0
Commits:	13
Dependents:	1
Dependencies:	0
Followers:	1
Issues:	0

Adafruit_FONA.cpp@3:addc5ef76145, 2018-08-07 (annotated)

Who changed what in which revision?

Repository toolbox

Repository details

Important Information for this Arm website

Access Warning