NetModule Router Wiki

User Tools

Site Tools

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revisionPrevious revision
Next revision		Previous revision
sdk:scripts:sms-control [2015/08/27 07:25] – hesssdk:scripts:sms-control [2022/08/26 11:04] (current) – created dodenhoeft
Line 1: Line 1:
-====== SDK Script sms-control.are ====== +====== SMS-Control ====== 
-For further information on how to configure see [[configuration:sms-control|SMS Control]].+
 <code c sms-control.are> <code c sms-control.are>
 +
 /* DESC: This script will execute commands received by SMS. /* DESC: This script will execute commands received by SMS.
  * Copyright (C) 2012 NetModule AG, Switzerland  * Copyright (C) 2012 NetModule AG, Switzerland
 + * 
 + * sms-commands:
 + * <reboot>: reboot netmodule router
 + * <connect>: configure wanlink 0 permanent
 + * <disconnect>: configure wanlink 0 disable 
 + * <status>: get system status summary
 + * <output [1|2] [on|off]> set dio n on or off
  */  */
  
Line 9: Line 17:
 MAXMSG          = 5;                            /* process max. 5 msgs                          */ MAXMSG          = 5;                            /* process max. 5 msgs                          */
 MAXAGE          = 300;                          /* message mustn't be older than 5 mins         */ MAXAGE          = 300;                          /* message mustn't be older than 5 mins         */
-MAXLINES = 32; /* max. number of lines in msg (incl. header)   */+MAXLINES        = 32;                           /* max. number of lines in msg (incl. header)   */
 AUTH            = 1;                            /* perform authentication                       */ AUTH            = 1;                            /* perform authentication                       */
 ADMPWD          = "";                           /* password used for authentication             */ ADMPWD          = "";                           /* password used for authentication             */
Line 34: Line 42:
     }     }
     if (IGNORECASE) ADMPWD = tolower(ADMPWD);     if (IGNORECASE) ADMPWD = tolower(ADMPWD);
 +}
 +
 +/* split a message into an array */
 +array split(string msg) {
 +  args=mkarray();
 +  pos=strchr(msg, "\r");
 +  if(pos==0) msg="";
 +  if(pos>0) msg=left(msg, pos);
 +  pos=strchr(msg, "\n");
 +  if(pos==0) msg="";
 +  if(pos>0) msg=left(msg, pos);
 +  for(n=0;;) {
 +    pos=strchr(msg, " ");
 +    if(is_void(pos)) pos=strchr(msg, "\t");
 +    if(is_void(pos)) pos=strchr(msg, "\f");
 +    if(pos==0) {
 +      msg=trim(msg);
 +    } else if(pos>0) {
 +      args[n++]=trim(left(msg, pos));
 +      msg=trim(substr(msg, pos));
 +    } else {
 +      if(msg!="") args[n++]=trim(msg);
 +      break;
 +    }
 +  }
 +  return args;
 } }
  
 /* parse message */ /* parse message */
-string parse (string msg)+array parse (string msg)
 { {
     /* read by line */     /* read by line */
Line 48: Line 82:
     for (lnr = 0; lnr < MAXLINES && strlen(lp) > 0; lnr++) {     for (lnr = 0; lnr < MAXLINES && strlen(lp) > 0; lnr++) {
         pos = strchr(lp, "\n");         pos = strchr(lp, "\n");
-    if (is_void(pos)) pos = strlen(lp); +        if (is_void(pos)) pos = strlen(lp); 
-     +
         line = left(lp, pos);         line = left(lp, pos);
- lp = substr(lp, pos + 1); +        lp = substr(lp, pos + 1); 
- +        
         if (strlen(line) == 0) {         if (strlen(line) == 0) {
             /* saw header separator */             /* saw header separator */
Line 71: Line 105:
                     nb_syslog("message has been sent %ds ago", age);                     nb_syslog("message has been sent %ds ago", age);
                     if (age > MAXAGE) {                     if (age > MAXAGE) {
-                    nb_syslog("rejecting too old message"); +                        nb_syslog("rejecting too old message"); 
-                        return "";+                        return mkarray();
                     }                     }
                 } else {                 } else {
Line 90: Line 124:
                 if (allowed == 0) {                 if (allowed == 0) {
                     nb_syslog("rejecting message from unknown sender %s", from);                     nb_syslog("rejecting message from unknown sender %s", from);
-                    return "";+                    return mkarray();
                 } else {                 } else {
                     nb_syslog("sender %s can pass", from);                     nb_syslog("sender %s can pass", from);
Line 103: Line 137:
                 if (left(line, strlen(ADMPWD)) != ADMPWD) {                 if (left(line, strlen(ADMPWD)) != ADMPWD) {
                     nb_syslog("authentication failed");                     nb_syslog("authentication failed");
-                    return "";+                    return mkarray();
                 } else {                 } else {
                     nb_syslog("authentication succeeded");                     nb_syslog("authentication succeeded");
Line 109: Line 143:
             } else if ((AUTH && tlnr == 1) || (!AUTH && tlnr == 0)) {             } else if ((AUTH && tlnr == 1) || (!AUTH && tlnr == 0)) {
                 /* this line must contain the command */                 /* this line must contain the command */
-                if (left(line, 6) == "reboot") { +                return split(line);
-                    return "reboot"; +
-                } else if (left(line, 7) == "connect") { +
-                    return "connect"; +
-                } else if (left(line, 10) == "disconnect") { +
-                    return "disconnect"; +
-                } else if (left(line, 6) == "status") { +
-                    return "status"; +
-                } else if (left(line, 6) == "output") { +
-                    return left(line, 13); +
-                }+
             } else {             } else {
                 break;                 break;
Line 129: Line 153:
     nb_syslog("no command detected");     nb_syslog("no command detected");
  
-    return "";+    return mkarray();
 } }
  
-int setdio (string cmd) +int setdio (string port, string newstate) 
 { {
-    newstate = substr(cmd, 9, 3); 
-    port = substr(cmd, 7, 1); 
-     
     if (port != "1" && port != "2") {     if (port != "1" && port != "2") {
         nb_syslog("invalid DIO port %s\n", port);                 nb_syslog("invalid DIO port %s\n", port);        
Line 200: Line 221:
 /* track states */ /* track states */
 reboot = 0; reboot = 0;
-connecting = 0; 
-disconnecting = 0; 
- 
  
 /* only process latest messages */ /* only process latest messages */
Line 215: Line 233:
                i, nr_msgs, msgs[i]);                i, nr_msgs, msgs[i]);
  
-    cmd = parse(msg); +    args = parse(msg); 
-    if (cmd == "reboot") {    +    if ((is_array(args)) && (length(args) > 0)) { 
-        nb_syslog("reboot command received"); +        if (args[0] == "") { 
-        reboot = 1; +            nb_syslog("no command"); 
-    } else if (cmd == "connect") { +        } else if ((args[0] == "reboot") && (length(args) == 1)) {    
-        nb_syslog("connect command received"); +            nb_syslog("reboot command received"); 
-        if (connecting) { +            reboot = 1; 
-            nb_syslog("already connecting"); +        } else if ((args[0] == "connect") && (length(args) == 1)) { 
-        } else { +            nb_syslog("connect command received"); 
-            /* enable first wanlink */ +            if (nb_config_get("wanlink.0.mode") == "1") { 
-            nb_config_set("wanlink.0.mode=1"); +                nb_syslog("already connecting");
-            connecting = 1; +
-        } +
-    } else if (cmd == "disconnect") { +
-        nb_syslog("disconnect command received"); +
-        if (disconnecting) { +
-            nb_syslog("already disconnecting"); +
-        } else { +
-            /* disable first wanlink */ +
-            nb_config_set("wanlink.0.mode=0"); +
-            disconnecting = 1; +
-        } +
-    } else if (cmd == "status") { +
-        nb_syslog("status command received"); +
-        rcpt = nb_sms_header(msgs[i], "From"); +
-        if (rcpt) { +
-            id = nb_sms_send(rcpt, nb_status_summary()); +
-            if (!id) { +
-                nb_syslog("unable to send status message to %s", rcpt);+
             } else {             } else {
-                nb_syslog("successfully queued status message to %s (ID %s)", rcpt, id);+                /* enable first wanlink */ 
 +                nb_config_set("wanlink.0.mode=1");
             }             }
 +        } else if ((args[0] == "disconnect") && (length(args) == 1)) {
 +            nb_syslog("disconnect command received");
 +            if (nb_config_get("wanlink.0.mode") == "0") {
 +                nb_syslog("already disconnecting");
 +            } else {
 +                /* disable first wanlink */
 +                nb_config_set("wanlink.0.mode=0");
 +            }
 +        } else if ((args[0] == "status") && (length(args) == 1)) {
 +            nb_syslog("status command received");
 +            rcpt = nb_sms_header(msgs[i], "From");
 +            if (rcpt) {
 +                id = nb_sms_send(rcpt, nb_status_summary());
 +                if (!id) {
 +                    nb_syslog("unable to send status message to %s", rcpt);
 +                } else {
 +                    nb_syslog("successfully queued status message to %s (ID %s)", rcpt, id);
 +                }
 +            }
 +        } else if ((args[0] == "output") && (length(args) == 3)) {
 +            nb_syslog("dio out command received");
 +            setdio(args[1], args[2]);
 +        } else {
 +            nb_syslog("command <%s> not supported", msg);
         }         }
-    } else if (left(cmd,6) == "output") { 
-        nb_syslog("dio out command received"); 
-        setdio(cmd); 
     } else {     } else {
         nb_syslog("ignoring invalid message");         nb_syslog("ignoring invalid message");
     }     }
  
-    /* delete message  */+    /* delete message */
     ret = nb_sms_delete(msgs[i]);     ret = nb_sms_delete(msgs[i]);
     if (ret == 0) nb_syslog("deleted message %s", msgs[i]);     if (ret == 0) nb_syslog("deleted message %s", msgs[i]);
Line 261: Line 283:
  
 if (reboot == 1) { if (reboot == 1) {
-    /* trigger reboot  */+    /* trigger reboot */
     nb_syslog("rebooting system");     nb_syslog("rebooting system");
     nb_reboot();     nb_reboot();
Line 267: Line 289:
  
 exit(0); exit(0);
- 
 </code> </code>
  

Page Tools

sdk/scripts/sms-control.1440660326.txt.gz · Last modified: 2015/08/27 07:25 by hess