// SERVER <serverip> <serverpassword> <paranoidmode> BOOL net_sms_handle_server(char *caller, char *command, char *arguments) { BOOL serverq_result; par_set(PARAM_SERVERIP, arguments); arguments = net_sms_nextarg(arguments); if (arguments != NULL) { par_set(PARAM_SERVERPASS, arguments); arguments = net_sms_nextarg(arguments); if (arguments != NULL) { par_set(PARAM_PARANOID, arguments); } } serverq_result = net_sms_handle_serverq(caller, command, arguments); if (net_state != NET_STATE_DIAGMODE) { net_state_vint = NET_GPRS_RETRIES; net_state_enter(NET_STATE_NETINITP); } return serverq_result; }
// MODULE <vehicleid> <units> <notifications> BOOL net_sms_handle_module(char *caller, char *command, char *arguments) { BOOL moduleq_result; par_set(PARAM_VEHICLEID, arguments); arguments = net_sms_nextarg(arguments); if (arguments != NULL) { par_set(PARAM_MILESKM, arguments); arguments = net_sms_nextarg(arguments); if (arguments != NULL) { par_set(PARAM_NOTIFIES, arguments); arguments = net_sms_nextarg(arguments); if (arguments != NULL) { par_set(PARAM_VEHICLETYPE, arguments); } } } moduleq_result = net_sms_handle_moduleq(caller, command, arguments); vehicle_initialise(); if (net_state != NET_STATE_DIAGMODE) { net_state_vint = NET_GPRS_RETRIES; net_state_enter(NET_STATE_NETINITP); } return moduleq_result; }
// GPRS <APN> <username> <password> BOOL net_sms_handle_gprs(char *caller, char *command, char *arguments) { BOOL gprsq_result; par_set(PARAM_GPRSAPN, arguments); arguments = net_sms_nextarg(arguments); if (arguments != NULL) { if ((arguments[0]=='-')&&(arguments[1]==0)) par_set(PARAM_GPRSUSER, arguments+1); else par_set(PARAM_GPRSUSER, arguments); arguments = net_sms_nextarg(arguments); if (arguments != NULL) { if ((arguments[0]=='-')&&(arguments[1]==0)) par_set(PARAM_GPRSPASS, arguments+1); else par_set(PARAM_GPRSPASS, arguments); } } gprsq_result = net_sms_handle_gprsq(caller, command, arguments); if (net_state != NET_STATE_DIAGMODE) { net_state_vint = NET_GPRS_RETRIES; net_state_enter(NET_STATE_NETINITP); } return gprsq_result; }
BOOL net_sms_handle_pass(char *caller, char *command, char *arguments) { par_set(PARAM_MODULEPASS, arguments); if (sys_features[FEATURE_CARBITS]&FEATURE_CB_SOUT_SMS) return FALSE; net_send_sms_start(caller); net_puts_rom(NET_MSG_PASSWORD); return TRUE; }
BOOL net_sms_handle_ap(char *caller, char *command, char *arguments) { unsigned char d = 0; char *p = par_get(PARAM_MODULEPASS); while ((d < PARAM_MAX)&&(arguments != NULL)) { if ((arguments[0]=='-')&&(arguments[1]==0)) par_set(d++, arguments+1); else par_set(d++, arguments); arguments = net_sms_nextarg(arguments); } if (net_state != NET_STATE_DIAGMODE) net_state_enter(NET_STATE_FIRSTRUN); return FALSE; }
BOOL net_sms_handle_register(char *caller, char *command, char *arguments) { par_set(PARAM_REGPHONE, caller); if (sys_features[FEATURE_CARBITS]&FEATURE_CB_SOUT_SMS) return FALSE; net_send_sms_start(caller); net_puts_rom(NET_MSG_REGISTERED); return TRUE; }
// GSMLOCK <provider> BOOL net_sms_handle_gsmlock(char *caller, char *command, char *arguments) { BOOL gsmlockq_result; if (arguments == NULL) { char e[1] = ""; par_set(PARAM_GSMLOCK, e); } else { par_set(PARAM_GSMLOCK, arguments); } gsmlockq_result = net_sms_handle_gsmlockq(caller, command, arguments); if (net_state != NET_STATE_DIAGMODE) net_state_enter(NET_STATE_DONETINIT); return gsmlockq_result; }
BOOL net_sms_handle_params(char *caller, char *command, char *arguments) { unsigned char d = PARAM_MILESKM; while ((d < PARAM_MAX)&&(arguments != NULL)) { if ((arguments[0]=='-')&&(arguments[1]==0)) par_set(d++, arguments+1); else par_set(d++, arguments); arguments = net_sms_nextarg(arguments); } net_send_sms_start(caller); net_puts_rom(NET_MSG_PARAMS); net_send_sms_finish(); vehicle_initialise(); if (net_state != NET_STATE_DIAGMODE) net_state_enter(NET_STATE_DONETINIT); return FALSE; }
// VEHICLE <vehicletype> BOOL net_sms_handle_vehicle(char *caller, char *command, char *arguments) { BOOL vehicleq_result; if (arguments[0]=='-') arguments[0]=0; par_set(PARAM_VEHICLETYPE, arguments); vehicleq_result = net_sms_handle_vehicleq(caller, command, arguments); vehicle_initialise(); if (net_state != NET_STATE_DIAGMODE) net_state_enter(NET_STATE_DONETINIT); return vehicleq_result; }
BOOL net_sms_handle_feature(char *caller, char *command, char *arguments) { unsigned char f; if (arguments == NULL) return FALSE; f = atoi(arguments); arguments = net_sms_nextarg(arguments); if ((f>=0)&&(f<FEATURES_MAX)&&(arguments != NULL)) { sys_features[f] = atoi(arguments); if (f>=FEATURES_MAP_PARAM) // Top N features are persistent par_set(PARAM_FEATURE_S+(f-FEATURES_MAP_PARAM), arguments); if (f == FEATURE_CANWRITE) vehicle_initialise(); net_send_sms_start(caller); net_puts_rom(NET_MSG_FEATURE); return TRUE; } return FALSE; }
BOOL net_msg_cmd_exec(void) { int k; char *p, *s; delay100(2); CHECKPOINT(0x43) switch (net_msg_cmd_code) { case 1: // Request feature list (params unused) for (k=0;k<FEATURES_MAX;k++) { s = stp_i(net_scratchpad, "MP-0 c1,0,", k); s = stp_i(s, ",", FEATURES_MAX); s = stp_i(s, ",", sys_features[k]); net_msg_encode_puts(); } break; case 2: // Set feature (params: feature number, value) for (p=net_msg_cmd_msg;(*p != 0)&&(*p != ',');p++) ; // check if a value exists and is separated by a comma if (*p == ',') { *p++ = 0; // At this point, <net_msg_cmd_msg> points to the command, and <p> to the param value k = atoi(net_msg_cmd_msg); if ((k>=0)&&(k<FEATURES_MAX)) { sys_features[k] = atoi(p); if (k>=FEATURES_MAP_PARAM) // Top N features are persistent par_set(PARAM_FEATURE_S+(k-FEATURES_MAP_PARAM), p); if (k == FEATURE_CANWRITE) vehicle_initialise(); STP_OK(net_scratchpad, net_msg_cmd_code); } else { STP_INVALIDRANGE(net_scratchpad, net_msg_cmd_code); } } else { STP_INVALIDSYNTAX(net_scratchpad, net_msg_cmd_code); } net_msg_encode_puts(); break; case 3: // Request parameter list (params unused) for (k=0;k<PARAM_MAX;k++) { p = par_get(k); if (k==PARAM_SERVERPASS) *p=0; // Don't show netpass1 s = stp_i(net_scratchpad, "MP-0 c3,0,", k); s = stp_i(s, ",", PARAM_MAX); s = stp_s(s, ",", p); net_msg_encode_puts(); } break; case 4: // Set parameter (params: param number, value) for (p=net_msg_cmd_msg;(*p != 0)&&(*p != ',');p++) ; // check if a value exists and is separated by a comma if (*p == ',') { *p++ = 0; // At this point, <net_msg_cmd_msg> points to the command, and <p> to the param value k = atoi(net_msg_cmd_msg); if ((k>=0)&&(k<PARAM_FEATURE_S)) { par_set(k, p); STP_OK(net_scratchpad, net_msg_cmd_code); if ((k==PARAM_MILESKM) || (k==PARAM_VEHICLETYPE)) vehicle_initialise(); } else { STP_INVALIDRANGE(net_scratchpad, net_msg_cmd_code); } } else { STP_INVALIDSYNTAX(net_scratchpad, net_msg_cmd_code); } net_msg_encode_puts(); break; case 5: // Reboot (params unused) STP_OK(net_scratchpad, net_msg_cmd_code); net_msg_encode_puts(); net_state_enter(NET_STATE_HARDSTOP); break; case 6: // CHARGE ALERT (params unused) net_msg_alert(); net_msg_encode_puts(); break; case 40: // Send SMS (params: phone number, SMS message) for (p=net_msg_cmd_msg;(*p != 0)&&(*p != ',');p++) ; // check if a value exists and is separated by a comma if (*p == ',') { *p++ = 0; // At this point, <net_msg_cmd_msg> points to the phone number, and <p> to the SMS message net_send_sms_start(net_msg_cmd_msg); net_puts_ram(p); net_puts_rom("\x1a"); delay100(5); net_msg_start(); STP_OK(net_scratchpad, net_msg_cmd_code); } else { net_msg_start(); STP_INVALIDSYNTAX(net_scratchpad, net_msg_cmd_code); } net_msg_encode_puts(); delay100(2); break; case 41: // Send MMI/USSD Codes (param: USSD_CODE) net_puts_rom("AT+CUSD=1,\""); net_puts_ram(net_msg_cmd_msg); net_puts_rom("\",15\r"); // cmd reply #1 to acknowledge command: delay100(5); net_msg_start(); STP_OK(net_scratchpad, net_msg_cmd_code); net_msg_encode_puts(); delay100(2); // cmd reply #2 sent on USSD response, see net_msg_reply_ussd() break; case 49: // Send raw AT command (param: raw AT command) net_puts_ram(net_msg_cmd_msg); net_puts_rom("\r"); delay100(5); net_msg_start(); STP_OK(net_scratchpad, net_msg_cmd_code); net_msg_encode_puts(); delay100(2); break; default: return FALSE; } return TRUE; }
void net_sms_in(char *caller, char *buf, unsigned char pos) { // The buf contains an SMS command // and caller contains the caller telephone number char *p; // Convert SMS command (first word) to upper-case for (p=buf; ((*p!=0)&&(*p!=' ')); p++) if ((*p > 0x60) && (*p < 0x7b)) *p=*p-0x20; // Command parsing... if (memcmppgm2ram(buf, (char const rom far*)"REGISTER ", 9) == 0) { // Register phone p = par_get(PARAM_REGPASS); if (strncmp(p,buf+9,strlen(p))==0) { par_set(PARAM_REGPHONE, caller); net_send_sms_rom(caller,NET_MSG_REGISTERED); } else { #ifndef OVMS_SUPPRESS_ACCESSDENIED_SMS net_send_sms_rom(caller,NET_MSG_DENIED); #endif } } else if (memcmppgm2ram(buf, (char const rom far*)"PASS ", 5) == 0) { p = par_get(PARAM_REGPHONE); if (strncmp(p,caller,strlen(p)) == 0) { par_set(PARAM_REGPASS, buf+5); net_send_sms_rom(caller,NET_MSG_PASSWORD); } else { #ifndef OVMS_SUPPRESS_ACCESSDENIED_SMS net_send_sms_rom(caller,NET_MSG_DENIED); #endif } } else if (memcmppgm2ram(buf, (char const rom far*)"GPS ", 4) == 0) { p = par_get(PARAM_REGPASS); if (strncmp(p,buf+4,strlen(p))==0) net_sms_gps(caller); else { #ifndef OVMS_SUPPRESS_ACCESSDENIED_SMS net_send_sms_rom(caller,NET_MSG_DENIED); #endif } } else if (memcmppgm2ram(buf, (char const rom far*)"GPS", 3) == 0) { p = par_get(PARAM_REGPHONE); if (strncmp(p,caller,strlen(p)) == 0) net_sms_gps(caller); else { #ifndef OVMS_SUPPRESS_ACCESSDENIED_SMS net_send_sms_rom(caller,NET_MSG_DENIED); #endif } } else if (memcmppgm2ram(buf, (char const rom far*)"STAT ", 5) == 0) { p = par_get(PARAM_REGPASS); if (strncmp(p,buf+5,strlen(p))==0) net_sms_stat(caller); else { #ifndef OVMS_SUPPRESS_ACCESSDENIED_SMS net_send_sms_rom(caller,NET_MSG_DENIED); #endif } } else if (memcmppgm2ram(buf, (char const rom far*)"STAT", 4) == 0) { p = par_get(PARAM_REGPHONE); if (strncmp(p,caller,strlen(p)) == 0) net_sms_stat(caller); else { #ifndef OVMS_SUPPRESS_ACCESSDENIED_SMS net_send_sms_rom(caller,NET_MSG_DENIED); #endif } } else if (memcmppgm2ram(buf, (char const rom far*)"PARAMS?", 7) == 0) { p = par_get(PARAM_REGPHONE); if (strncmp(p,caller,strlen(p)) == 0) net_sms_params(caller); else { #ifndef OVMS_SUPPRESS_ACCESSDENIED_SMS net_send_sms_rom(caller,NET_MSG_DENIED); #endif } } else if (memcmppgm2ram(buf, (char const rom far*)"PARAMS ", 7) == 0) { p = par_get(PARAM_REGPHONE); if (strncmp(p,caller,strlen(p)) == 0) { unsigned char d = PARAM_MILESKM; unsigned char x = 7; unsigned char y = x; while ((y<=(pos+1))&&(d < PARAM_MAX)) { if ((buf[y] == ' ')||(buf[y] == '\0')) { buf[y] = '\0'; if ((buf[x]=='-')&&(buf[x+1]=='\0')) buf[x] = '\0'; // Special case '-' is empty value par_set(d++, buf+x); x=++y; } else y++; } net_send_sms_rom(caller,NET_MSG_PARAMS); net_state_enter(NET_STATE_SOFTRESET); } else { #ifndef OVMS_SUPPRESS_ACCESSDENIED_SMS net_send_sms_rom(caller,NET_MSG_DENIED); #endif } } else if (memcmppgm2ram(buf, (char const rom far*)"FEATURE ", 8) == 0) { p = par_get(PARAM_REGPHONE); if (strncmp(p,caller,strlen(p)) == 0) { unsigned char y = 8; unsigned int f; while (y<=(pos+1)) { if ((buf[y] == ' ')||(buf[y] == '\0')) { buf[y] = '\0'; f = atoi(buf+8); if ((f>=0)&&(f<FEATURES_MAX)) sys_features[f] = atoi(buf+y+1); break; // Exit the while loop, as we are done } else y++; } } else { #ifndef OVMS_SUPPRESS_ACCESSDENIED_SMS net_send_sms_rom(caller,NET_MSG_DENIED); #endif } } else if (memcmppgm2ram(buf, (char const rom far*)"RESET", 5) == 0) { p = par_get(PARAM_REGPHONE); if (strncmp(p,caller,strlen(p)) == 0) { net_state_enter(NET_STATE_HARDRESET); } else { #ifndef OVMS_SUPPRESS_ACCESSDENIED_SMS net_send_sms_rom(caller,NET_MSG_DENIED); #endif } } else // SMS didn't match any command pattern, forward to user via net msg { net_msg_forward_sms(caller, buf); } }
void net_sms_in(char *caller, char *buf, unsigned char pos) { // The buf contains an SMS command // and caller contains the caller telephone number char *p; // Convert SMS command (first word) to upper-case for (p=buf; ((*p!=0)&&(*p!=' ')); p++) if ((*p > 0x60) && (*p < 0x7b)) *p=*p-0x20; // Command parsing... if (memcmppgm2ram(buf, (char const rom far*)"REGISTER ", 9) == 0) { // Register phone p = par_get(PARAM_REGPASS); if (strncmp(p,buf+9,strlen(p))==0) { par_set(PARAM_REGPHONE, caller); net_send_sms_rom(caller,NET_MSG_REGISTERED); } else net_send_sms_rom(caller,NET_MSG_DENIED); } else if (memcmppgm2ram(buf, (char const rom far*)"PASS ", 5) == 0) { p = par_get(PARAM_REGPHONE); if (strncmp(p,caller,strlen(p)) == 0) { par_set(PARAM_REGPASS, buf+5); net_send_sms_rom(caller,NET_MSG_PASSWORD); } else net_send_sms_rom(caller,NET_MSG_DENIED); } else if (memcmppgm2ram(buf, (char const rom far*)"GPS ", 4) == 0) { p = par_get(PARAM_REGPASS); if (strncmp(p,buf+4,strlen(p))==0) net_sms_gps(caller); else net_send_sms_rom(caller,NET_MSG_DENIED); } else if (memcmppgm2ram(buf, (char const rom far*)"GPS", 3) == 0) { p = par_get(PARAM_REGPHONE); if (strncmp(p,caller,strlen(p)) == 0) net_sms_gps(caller); else net_send_sms_rom(caller,NET_MSG_DENIED); } else if (memcmppgm2ram(buf, (char const rom far*)"STAT ", 5) == 0) { p = par_get(PARAM_REGPASS); if (strncmp(p,buf+5,strlen(p))==0) net_sms_stat(caller); else net_send_sms_rom(caller,NET_MSG_DENIED); } else if (memcmppgm2ram(buf, (char const rom far*)"STAT", 4) == 0) { p = par_get(PARAM_REGPHONE); if (strncmp(p,caller,strlen(p)) == 0) net_sms_stat(caller); else net_send_sms_rom(caller,NET_MSG_DENIED); } else if (memcmppgm2ram(buf, (char const rom far*)"PARAMS?", 7) == 0) { p = par_get(PARAM_REGPHONE); if (strncmp(p,caller,strlen(p)) == 0) net_sms_params(caller); else net_send_sms_rom(caller,NET_MSG_DENIED); } else if (memcmppgm2ram(buf, (char const rom far*)"PARAMS ", 7) == 0) { p = par_get(PARAM_REGPHONE); if (strncmp(p,caller,strlen(p)) == 0) { unsigned char d = PARAM_MILESKM; unsigned char x = 7; unsigned char y = x; while ((y<=(pos+1))&&(d < PARAM_MAX)) { if ((buf[y] == ' ')||(buf[y] == '\0')) { buf[y] = '\0'; if ((buf[x]=='-')&&(buf[x+1]=='\0')) buf[x] = '\0'; // Special case '-' is empty value par_set(d++, buf+x); x=++y; } else y++; } net_send_sms_rom(caller,NET_MSG_PARAMS); net_state_enter(NET_STATE_SOFTRESET); } else net_send_sms_rom(caller,NET_MSG_DENIED); } }
BOOL net_msg_cmd_exec(void) { int k; char *p, *s; delay100(2); CHECKPOINT(0x43) switch (net_msg_cmd_code) { case 1: // Request feature list (params unused) for (k=0;k<FEATURES_MAX;k++) { s = stp_i(net_scratchpad, "MP-0 c1,0,", k); s = stp_i(s, ",", FEATURES_MAX); s = stp_i(s, ",", sys_features[k]); net_msg_encode_puts(); } break; case 2: // Set feature (params: feature number, value) for (p=net_msg_cmd_msg;(*p != 0)&&(*p != ',');p++) ; // check if a value exists and is separated by a comma if (*p == ',') { *p++ = 0; // At this point, <net_msg_cmd_msg> points to the command, and <p> to the param value k = atoi(net_msg_cmd_msg); if ((k>=0)&&(k<FEATURES_MAX)) { sys_features[k] = atoi(p); if (k>=FEATURES_MAP_PARAM) // Top N features are persistent par_set(PARAM_FEATURE_S+(k-FEATURES_MAP_PARAM), p); if (k == FEATURE_CANWRITE) vehicle_initialise(); STP_OK(net_scratchpad, net_msg_cmd_code); } else { STP_INVALIDRANGE(net_scratchpad, net_msg_cmd_code); } } else { STP_INVALIDSYNTAX(net_scratchpad, net_msg_cmd_code); } net_msg_encode_puts(); break; case 3: // Request parameter list (params unused) for (k=0;k<PARAM_MAX;k++) { p = par_get(k); if (k==PARAM_SERVERPASS) *p=0; // Don't show netpass1 s = stp_i(net_scratchpad, "MP-0 c3,0,", k); s = stp_i(s, ",", PARAM_MAX); s = stp_s(s, ",", p); net_msg_encode_puts(); } break; case 4: // Set parameter (params: param number, value) for (p=net_msg_cmd_msg;(*p != 0)&&(*p != ',');p++) ; // check if a value exists and is separated by a comma if (*p == ',') { *p++ = 0; // At this point, <net_msg_cmd_msg> points to the command, and <p> to the param value k = atoi(net_msg_cmd_msg); if ((k>=0)&&(k<PARAM_FEATURE_S)) { par_set(k, p); STP_OK(net_scratchpad, net_msg_cmd_code); if ((k==PARAM_MILESKM) || (k==PARAM_VEHICLETYPE)) vehicle_initialise(); #ifdef OVMS_ACCMODULE // Reset the ACC state it an ACC parameter is changed if ((k>=PARAM_ACC_S)&&(k<(PARAM_ACC_S+PARAM_ACC_COUNT))) acc_state_enter(ACC_STATE_FIRSTRUN); #endif } else { STP_INVALIDRANGE(net_scratchpad, net_msg_cmd_code); } } else { STP_INVALIDSYNTAX(net_scratchpad, net_msg_cmd_code); } net_msg_encode_puts(); break; case 5: // Reboot (params unused) STP_OK(net_scratchpad, net_msg_cmd_code); net_msg_encode_puts(); net_state_enter(NET_STATE_HARDSTOP); break; case 6: // CHARGE ALERT (params unused) net_msg_alert(); net_msg_encode_puts(); break; case 7: // SMS command wrapper // process command: net_msg_bufpos = net_msg_scratchpad; k = net_sms_in(par_get(PARAM_REGPHONE), net_msg_cmd_msg); net_msg_bufpos = NULL; // output is now in net_msg_scratchpad // create return string: s = stp_i(net_scratchpad, NET_MSG_CMDRESP, net_msg_cmd_code); s = stp_i(s, ",", 1-k); // 0=ok 1=error if (k) { *s++ = ','; for (p = net_msg_scratchpad; *p; p++) { if (*p == '\n') *s++ = '\r'; // translate LF to CR else if (*p == ',') *s++ = ';'; // translate , to ; else *s++ = *p; } *s = 0; } // send return string: net_msg_encode_puts(); break; case 40: // Send SMS (params: phone number, SMS message) for (p=net_msg_cmd_msg;(*p != 0)&&(*p != ',');p++) ; // check if a value exists and is separated by a comma if (*p == ',') { *p++ = 0; // At this point, <net_msg_cmd_msg> points to the phone number, and <p> to the SMS message net_send_sms_start(net_msg_cmd_msg); net_puts_ram(p); net_puts_rom("\x1a"); delay100(5); net_msg_start(); STP_OK(net_scratchpad, net_msg_cmd_code); } else { net_msg_start(); STP_INVALIDSYNTAX(net_scratchpad, net_msg_cmd_code); } net_msg_encode_puts(); delay100(2); break; case 41: // Send MMI/USSD Codes (param: USSD_CODE) net_puts_rom("AT+CUSD=1,\""); net_puts_ram(net_msg_cmd_msg); net_puts_rom("\",15\r"); // cmd reply #1 to acknowledge command: delay100(5); net_msg_start(); STP_OK(net_scratchpad, net_msg_cmd_code); net_msg_encode_puts(); delay100(2); // cmd reply #2 sent on USSD response, see net_msg_reply_ussd() break; case 49: // Send raw AT command (param: raw AT command) net_puts_ram(net_msg_cmd_msg); net_puts_rom("\r"); delay100(5); net_msg_start(); STP_OK(net_scratchpad, net_msg_cmd_code); net_msg_encode_puts(); delay100(2); break; default: return FALSE; } return TRUE; }