int networkJoin(char *ssid) {
int retval=0;
strcpy(networkSSID, ssid);
radio.discard();
radio.printf("\r\nATE0\r\nAT+WA=%s\r\n",ssid);
while (!radio.gotLine()); // and some timeout.
while (!(retval=isErrorOrOK(radio.line()))){
//console.puts(radio.line());
while (!radio.gotLine()) { // timeout?
;
}
}
radio.printf("\r\nAT+ndhcp=1\r\n");
delay(1000); // this should be an idle.
while (!radio.gotLine()); // and some timeout.
while (!(isErrorOrOK(radio.line()))){
console.printf("DBG: %s",radio.line());
while (!radio.gotLine()) {
;
}
}
//console.printf("\r\nDBG: join %s (%d)\r\n",networkSSID,retval=networkStatus());
return(networkStatus());
}
int networkStatus() {
int retval=0;
if (!hasWifiModule) return retval;
radio.discard();
radio.printf("\r\n");
radio.discard();
radio.printf("\r\nAT+WSTATUS\r\n");
while (!radio.gotLine()); // and some timeout.
while (!(retval=isErrorOrOK(radio.line()))){
if ((radio.line()[0]=='N') && (radio.line()[1] == 'O') && (radio.line()[2] == 'T')) {
//if (strncmp("NOT ASSOCIATED",radio.line(),10) ==0){ //wtf????
//console.debug("NOT ASSOCIATED\r\n");
return(0);
} else {
// console.debug("%s",radio.line());
}
while (!radio.gotLine()) {
// and some timeout!!!
;
}
}
//console.puts(radio.line());
return(retval>=1);
}
int networkJoin(char *ssid) {
int retval=0;
if (!hasWifiModule) return retval;
strcpy(networkSSID, ssid);
console.debug("joining: %s\r\n",networkSSID);
Watchdog_Reset();
radio.discard();
radio.printf("\r\nATE0\r\nAT+WA=%s\r\n",ssid);
while (!radio.gotLine()); // and some timeout.
while (!(retval=isErrorOrOK(radio.line()))){
//console.puts(radio.line());
while (!radio.gotLine()) { // timeout?
;
}
}
Watchdog_Reset();
radio.printf("\r\nAT+ndhcp=1\r\n");
delay(1000); // this should be an idle.
while (!radio.gotLine()); // and some timeout.
while (!(isErrorOrOK(radio.line()))){
console.debug("%s",radio.line());
while (!radio.gotLine()) {
;
}
}
//console.debug("join %s (%d)\r\n",networkSSID,retval=networkStatus());
return(networkStatus());
}
void handleDeviceInput() {
bool throttle = false;
bool dataSent = false;
if ((millis()-throttleMark<1500)) {
throttle=true;
}
switch (device.keyValue()) {
case _LOG_:
logData(device.arguments());
break;
case _TS1_:
if (!throttle) {
dataSent=true;
toPachube(0, device.arguments());
} break;
case _TS2_:
if (!throttle) {
dataSent=true;
toPachube(1, device.arguments());
} break;
case _TS3_:
if (!throttle) {
dataSent=true;
toPachube(2, device.arguments());
} break;
case _TS4_:
if (!throttle) {
dataSent=true;
toPachube(3, device.arguments());
} break;
case _TS5_:
if (!throttle) {
dataSent=true;
toPachube(4, device.arguments());
} break;
case _FAN_:
if (!throttle) {
dataSent=true;
toPachube(5, device.arguments());
} break;
case _CHL_:
if (!throttle) {
dataSent=true;
toPachube(6, device.arguments());
} break;
case _STC_:
char * finger;
if ((finger=strchr(device.arguments(),' ')) != NULL) {
finger[0]='\0';
toPachube(8, finger+1);
}
toPachube(7, device.arguments()); break;
case _FTL_: toPachube(7, device.arguments()); break;
break;
default:
console.printf("%s",device.line());
break;
}
if (dataSent) throttleMark=millis();
}
/*------------------------------------------------------------setupRadioModule()
*
*----------------------------------------------------------------------------*/
void setupRadioModule(void) {
long int mark=millis();
radio.printf("\r\n");
radio.discard();
//radio.printf("ATE0\r\nAT&K0\r\nAT&R0\r\nAT+WD\r\nAT+NCLOSEALL\r\n");
radio.printf("ATE0\r\nATH\r\n");
while (!radio.gotLine());
while ((millis()-mark<1000)&&(!(hasWifiModule=isErrorOrOK(radio.line())))){
console.printf("DBG: %s\r\n",radio.line());
while (!radio.gotLine()) {
;
}
}
radio.discard();
networkSetPassword(networkPassword);
Watchdog_Reset();
networkJoin(networkSSID);
}
time_t radioDate() {
time_t retTime=0L;
if (!hasWifiModule) return retTime;
radio.discard();
radio.printf("\r\nAT+GETTIME=?\r\n");
while (!radio.gotLine());
while (!(isErrorOrOK(radio.line()))){
//012345678901234567890q123456789012
if (!strncmp("Current Time in msec since epoch=",radio.line(),32)) {
console.printf("DBG: epoch as a string=%s\r\n",radio.line()+33);
retTime=(time_t)(atoll(radio.line()+33)/1000L);
console.printf("DBG: Epoch=%lu \r\n",retTime);
}
while (!radio.gotLine());
}
radio.discard();
return(retTime);
}
bool setRadioDate(char * datebuffer) {
bool retval;
radio.printf("AT+SETTIME=%s\r\n",datebuffer);
while (!(retval=isErrorOrOK(radio.line()))){
while (!radio.gotLine()) {
;
}
}
delay(100);
radioDate();
}
/*------------------------------------------------------------setupRadioModule()
*
*----------------------------------------------------------------------------*/
void setupRadioModule(void) {
long int mark=millis();
console.printf("DBG: >>SetupRadioModule()\r\n");
radio.printf("\r\n");
radio.discard();
//radio.printf("ATE0\r\nAT&K0\r\nAT&R0\r\nAT+WD\r\nAT+NCLOSEALL\r\n");
radio.printf("ATE0\r\nATH\r\n");
while (!radio.gotLine());
while ((millis()-mark<1000)&&(!(hasWifiModule=isErrorOrOK(radio.line())))){
//console.debug("%s\r\n",radio.line());
while ((millis()-mark<1000)&&!radio.gotLine()) {
;
}
}
radio.discard();
console.printf("DBG: >>SetupRadioModule()\r\n");
}
int networkSetPassword(char *pwd) {
int retval=0;
// strncpy(networkPassword, pwd, MAX_NETWORK_PASSWORD_LENGTH-1);
strcpy(networkPassword, pwd);
radio.discard();
radio.printf("\r\nAT+WWPA=%s\r\n",pwd);
while (!radio.gotLine()); // and some timeout.
while (!(retval=isErrorOrOK(radio.line()))){
//console.puts(radio.line());
while (!radio.gotLine()) {
;
}
}
//console.debug("Password should be: %s (%d)\r\n",networkPassword,retval);
return(retval>=1);
}
/*-----------------------------------------------------------------pachubeDate()
* pull date from pachube server
*----------------------------------------------------------------------------*/
int pachubeDate() {
uint8_t n,index=0;
int retval=0;
char databuffer[36];
char cid[4]="0";
bool gotResponse=false;
enum {CONNECT, ERROR, DISASSOCIATED} status=ERROR;//statii;
uint8_t ch='0';
if (!hasWifiModule) return retval;
radio.discard();
radio.printf("\r\n");
radio.discard();
radio.printf("\r\nAT+NCTCP=216.52.233.122,80\r\n");
while (!radio.available()); // and some timeout.
// ERROR
// CONNECT <CID>
// DISASSOCIATED
digitalWrite(ORN_LED,LOW);
while (!gotResponse){ // this needs to catch errors.
while (radio.available()) {
databuffer[index]=ch=(char) radio.read();
if (index<36) index++;
//console.putChar(ch);
if ((ch=='\n')||(ch=='\r')) {
databuffer[index]='\0';
if (strncmp("CONNECT", databuffer,6)==0) {
if (index>7) {
for (index=0, n=8; index<3 && databuffer[n];) {
cid[index++]=databuffer[n++]; // if isdigit????
}
cid[index]='\0';
}
status=CONNECT;
gotResponse=true;
console.debug("Connect CID=%s\r\n",cid);
} else if (strncmp("ERROR", databuffer,5)==0) {
gotResponse=true;
status=ERROR;
} else if (strncmp("DISASSOCIATED",databuffer,index)==0) {
gotResponse=true;
status=DISASSOCIATED;
}
index=0;
}
}
}
digitalWrite(ORN_LED,HIGH);
if (status!=CONNECT) {
console.debug("toPachube NOT CONNECTED! (%d) Exiting\r\n", status);
radio.discard();
return(0);
}
//snprintf(databuffer, 36, "%d,%s",key,value);
radio.printf("\033S%dHEAD / HTTP/1.1\r\n",atoi(cid),pachubeFeed);
radio.printf("User-Agent: SuspectDevices/Baco-matic5000 OpenSSL/0.9.8g zlib/1.2.3.3 libidn/1.15\r\n");
radio.printf("Host: api.pachube.com\r\nAccept: */*\r\nConnection: close\r\n");
radio.printf("X-PachubeApiKey: %s\r\n",pachubeKey);
radio.printf("Content-Length: 0\r\n\r\n\r\n\033E",strlen(databuffer),databuffer);
//console.debug("Sending Head / request\r\n");
//
// sent data then wait for an OK
//
while (!radio.gotLine());
while (!(retval=isErrorOrOK(radio.line()))){
//console.debug("%s\r\n",radio.line());
while (!radio.gotLine()) {
;
}
}
if (retval<1) {
console.debug("NOT OK! %s\r\n",radio.line());
radio.discard();
return(0);
}
//
// should get an escaped stream followed by a disconnect
//
index=0;
gotResponse=false;
digitalWrite(ORN_LED,LOW);
while (!radio.gotLine());
sprintf(databuffer,"%c%c%c%c%cS%dHTTP",0x1b,0x4f,0x1b,0x4f,0x1b,atoi(cid));
if(!strncmp(databuffer, radio.line(),strlen(databuffer)) ) {
databuffer[0]=radio.line()[16];
databuffer[1]=radio.line()[17];
databuffer[2]=radio.line()[18];
databuffer[3]='\0';
console.debug("[%d] %s\r\n",retval=atoi(databuffer),radio.line()+7);
}
while (!radio.gotLine());
if(!strncmp("Date:",radio.line(),5)) {
//Date: Sun, 03 Jun 2012 01:22:34 GMT
//AT+SETTIME=<dd/mm/yyyy>,<HH:MM:SS>
parseDate(radio.line(),databuffer);
retval=setRadioDate(databuffer);
}
digitalWrite(ORN_LED,HIGH);
return(retval);
}
void handleConsoleInput() {
uint8_t retval;
uint8_t index=0;
uint8_t ch='0';
SdFile finger;
switch (console.keyValue()) {
case _DIR_:
console.printf("SOD:\r\n");
root.ls(LS_DATE | LS_SIZE);
console.printf("EOD:\r\n");
break;
case _LSV_:
console.printf("LSV:" BOM_VERSION "\r\n");
break;
case _TYP_:
typeFile(console.arguments());
break;
case _NSC_:
console.printf("SOD:\r\n");
retval=networkScan();
console.printf("EOD:\r\n");
console.printf("\nDBG: found=%d\r\n",retval);
break;
case _NJN_:
//console.printf("SOD:\r\n");
retval=networkJoin(console.arguments());
//console.printf("EOD:\r\n");
console.printf("\nDBG: joined=%s\r\n",retval?"TRUE":"FALSE");
break;
case _NPW_:
//console.printf("SOD:\r\n");
retval=networkSetPassword(console.arguments());
//console.printf("EOD:\r\n");
console.printf("\nDBG: pwd set=%s\r\n",retval?"TRUE":"FALSE");
break;
case _NST_:
retval=networkStatus();
console.printf("NST: %s\r\n",retval?"CONNECTED":"NOT CONNECTED");
break;
case _FMT_: // there really should be some REALLY do you mean this here but.....
root.openRoot(&volume);
if (finger.open(&root, ".", O_WRITE|O_READ)) {
console.printf("\nDBG: Opened / \r\n");
finger.rmRfStar();
} else {
console.printf("\nDBG: FAIL \r\n");
}
break;
case _TPT_:
toPachube(1, console.arguments());
break;
case _TX2_:
radio.printf("%s",console.arguments());
index=0;
// delay(1000);
while (radio.available()) {
inBuffer[index++]=ch=radio.read();
if( index>= 99 || ((ch== '\n') || ch !='\r')) {
inBuffer[index]='\0';
console.puts(inBuffer);
index=0;
delay(100);
}
}
inBuffer[index]='\0';
console.puts(inBuffer);
console.puts((char *) "\r\n");
break;
// set to one to test output for.
#if 1
case _TS1_: toPachube(0, console.arguments()); break;
case _TS2_: toPachube(1, console.arguments()); break;
case _TS3_: toPachube(2, console.arguments()); break;
case _TS4_: toPachube(3, console.arguments()); break;
case _TS5_: toPachube(4, console.arguments()); break;
case _FAN_: toPachube(5, console.arguments()); break;
case _CHL_: toPachube(6, console.arguments()); break;
case _STC_: toPachube(7, console.arguments()); break;
#endif
case _PKY_:
strncpy(pachubeKey, console.arguments(), MAX_PATCHUBE_KEY_LENGHT-1);
stripcrlf(pachubeKey);
break;
case _PFD_:
strncpy(pachubeFeed, console.arguments(), MAX_PATCHUBE_FEED_LENGHT-1);
stripcrlf(pachubeFeed);
break;
case _SGT_ :
readSettings();
break;
case _SSV_ :
writeSettings();
break;
default:
console.printf("DBG: forwarding (%s) to device\r\n",console.key());
device.puts(console.line());
//device.puts("\r\n");
break;
}
}
int toTheEthers(int key, char * value) {
uint8_t n,index=0;
int retval=0;
char databuffer[36];
char cid[4]="0";
bool gotResponse=false;
enum {CONNECT, ERROR, DISASSOCIATED} status=ERROR;//statii;
uint8_t ch='0';
if (!hasWifiModule) return retval;
radio.discard();
radio.printf("\r\n");
radio.discard();
radio.printf("\r\nAT+NCTCP=198.202.31.182,80\r\n");
while (!radio.available()); // and some timeout.
// ERROR
// CONNECT <CID>
// DISASSOCIATED
digitalWrite(ORN_LED,LOW);
while (!gotResponse){ // this needs to catch errors.
while (radio.available()) {
databuffer[index]=ch=(char) radio.read();
if (index<36) index++;
//console.putChar(ch);
if ((ch=='\n')||(ch=='\r')) {
databuffer[index]='\0';
if (strncmp("CONNECT", databuffer,6)==0) {
if (index>7) {
for (index=0, n=8; index<3 && databuffer[n];) {
cid[index++]=databuffer[n++]; // if isdigit????
}
cid[index]='\0';
}
status=CONNECT;
gotResponse=true;
//console.printf("DBG: Connect CID=%s\r\n",cid);
} else if (strncmp("ERROR", databuffer,5)==0) {
gotResponse=true;
status=ERROR;
} else if (strncmp("NOT ASSOCIATED",databuffer,13)==0) {
gotResponse=true;
status=DISASSOCIATED;
} else if (strncmp("DISASSOCIATED",databuffer,13)==0) {
gotResponse=true;
status=DISASSOCIATED;
}
index=0;
}
}
}
digitalWrite(ORN_LED,HIGH);
if (status!=CONNECT) {
console.printf("DBG: toPachube() NOT CONNECTED! (%d) Exiting\r\n", status);
radio.discard();
return(0);
}
//snprintf(databuffer, 36, "%d,%s",key,value);
radio.printf("\033S%dGET /art2013/swls/&state=%s HTTP/1.1\r\n",atoi(cid),value?"ON" : "OFF");
//radio.printf("\033S%dPUT /art2013/swls/%s.csv HTTP/1.1\r\n",atoi(cid));
radio.printf("User-Agent: SuspectDevices/Baco-matic5000 OpenSSL/0.9.8g zlib/1.2.3.3 libidn/1.15\r\n");
radio.printf("Host: suspectdevices.com\r\nAccept: */*\r\nConnection: close\r\n");
radio.printf("X-PachubeApiKey: %s\r\n\r\n",pachubeKey);
//radio.printf("Content-Length: %d\r\n\r\n%s\r\n\033E",strlen(databuffer),databuffer);
//console.printf("DBG: Sending to feed %s: (%d)%s \r\n",pachubeFeed,strlen(databuffer),databuffer);
//
// sent data, wait for an OK
//
while (!radio.gotLine());
while (!(retval=isErrorOrOK(radio.line()))){
//console.printf("DBG: %s\r\n",radio.line());
while (!radio.gotLine()) {
;
}
}
if (retval<1) {
console.printf("DBG: NOT OK! %s\r\n",radio.line());
radio.discard();
return(0);
}
//
// should get an escaped stream followed by a disconnect
//
index=0;
gotResponse=false;
digitalWrite(ORN_LED,LOW);
while (!radio.gotLine());
sprintf(databuffer,"%c%c%c%c%cS%dHTTP",0x1b,0x4f,0x1b,0x4f,0x1b,atoi(cid)); // the double escapeing I dont get.
if(!strncmp(databuffer, radio.line(),strlen(databuffer)) ) {
databuffer[0]=radio.line()[16];
databuffer[1]=radio.line()[17];
databuffer[2]=radio.line()[18];
databuffer[3]='\0';
//console.printf("DBG:[%d] %s\r\n",retval=atoi(databuffer),radio.line()+7);
}
while (!radio.gotLine());
radio.discard();
delay(500); // this is not so good.
digitalWrite(ORN_LED,HIGH);
return(retval);
}
