ePowerSocket initial commit

documentation/graph.puml

@@ -0,0 +1,6 @@
+@startuml
+
+
+
+
+@enduml

ePowerSwitch.db

@@ -1,8 +0,0 @@
-record(longout, "$(DEVICE)_command_$(PARAMETER_NAME)_$(PARAMETER_ID)") {
-    field(DTYP, "stream")
-    
-    field(PINI, "NO")
-
-    field(OUT, "@ePowerSwitch.proto command($(PARAMETER_ID)) $(PORT)")
-}
-

ePowerSwitch.proto

@@ -1,5 +0,0 @@
-OutTerminator = "\r\n";
-
-command {
-    out "GET /M0:O\$1=%{OFF|ON|RESTART}";
-}

ePowerSwitch_info.db

@@ -1,4 +0,0 @@
-
-record(longout, "$(DEVICE)_config_$(PARAMETER_NAME)") {
-	field(VAL, "$(VALUE)")
-}

feedback_records.db

@@ -0,0 +1,9 @@
+record(longout, "$(DEVICE)_config_$(PARAMETER_NAME)") {
+	field(VAL, "$(OUTLET_NUMBER)")
+}
+
+record(stringout, "$(DEVICE)_outlet_getter") {
+    field(DTYP, "stream")
+	field(SCAN, "1 second")
+	field(OUT, "@outlet_getter_$(OUTLET_NUMBER).proto get($(DEVICE)_get_$(GETTER_OUTPUT_PARAMETER_NAME)) $(PORT)")
+}

outlet_getter_4.proto

@@ -0,0 +1,5 @@
+get {
+    out "GET /hidden.htm";
+    in "Hidden Page\n%*d%*s%*d %*d:%*d:%*d\nVersion: %*u.%*u.%*u.%*u\nM0:O1=%(\$1_0)s\nM0:O2=%(\$1_1)s\nM0:O3=%(\$1_2)s\nM0:O4=%(\$1_3)s\n";
+    disconnect;
+}

outlet_getter_8.proto

@@ -0,0 +1,5 @@
+get {
+    out "GET /hidden.htm";
+    in "Hidden Page\n%*d%*s%*d %*d:%*d:%*d\nVersion: %*u.%*u.%*u.%*u\nM0:O1=%(\$1_0)s\nM0:O2=%(\$1_1)s\nM0:O3=%(\$1_2)s\nM0:O4=%(\$1_3)s\nM0:O5=%(\$1_4)s\nM0:O6=%(\$1_5)s\nM0:O7=%(\$1_6)s\nM0:O8=%(\$1_7)s\n";
+    disconnect;
+}

outlet_set.proto

@@ -0,0 +1,6 @@
+OutTerminator = "\r\n";
+
+set {
+    out "POST /hidden.htm/M0:O\$1=%s";
+    disconnect;
+}

socket_record.db

@@ -0,0 +1,13 @@
+record(stringout, "$(DEVICE)_set_$(PARAMETER_NAME)_$(PARAMETER_ID)") {
+    field(DTYP, "stream")
+    
+    field(VAL, "Off")
+    field(PINI, "YES")
+
+    field(OUT, "@ePowerSwitch.proto set($(PARAMETER_ID)) $(PORT)")
+}
+    
+record(stringin, "$(DEVICE)_get_$(PARAMETER_NAME)_$(PARAMETER_ID)") {
+    field(PINI, "NO")
+}
+

st.cmd

@@ -4,7 +4,7 @@ epicsEnvSet("ASYN_PORT","myDriverPort")
 
 drvAsynIPPortConfigure("$(ASYN_PORT)","127.0.0.1:55555 http", 0, 0, 0)
 
-dbLoadTemplate("template8.substitutions", "PORT=$(ASYN_PORT)")
+dbLoadTemplate("template4.substitutions", "PORT=$(ASYN_PORT)")
 
 iocInit()
 

template4.substitutions

@@ -1,4 +1,4 @@
-file ePowerSwitch.db
+file socket_record.db
 {
     pattern
     { DEVICE, PARAMETER_NAME, PARAMETER_ID}
@@ -8,9 +8,9 @@ file ePowerSwitch.db
     { "ePowerSwitch", "outlet", 3 }
 }
 
-file ePowerSwitch_info.db
+file feedback_records.db
 {
     pattern
-    {DEVICE, PARAMETER_NAME, VALUE}
-    { "ePowerSwitch", "maxOutlet", 4}
+    {DEVICE, PARAMETER_NAME, OUTLET_NUMBER, GETTER_OUTPUT_PARAMETER_NAME}
+    { "ePowerSwitch", "maxOutlet", 4, "outlet"}
 }

template8.substitutions

@@ -1,4 +1,4 @@
-file ePowerSwitch.db
+file socket_record.db
 {
     pattern
     { DEVICE, PARAMETER_NAME, PARAMETER_ID}
@@ -12,9 +12,9 @@ file ePowerSwitch.db
     { "ePowerSwitch", "outlet", 7 }
 }
 
-file ePowerSwitch_info.db
+file feedback_records.db
 {
     pattern
-    {DEVICE, PARAMETER_NAME, VALUE}
-    { "ePowerSwitch", "maxOutlet", 8}
+    {DEVICE, PARAMETER_NAME, OUTLET_NUMBER, GETTER_OUTPUT_PARAMETER_NAME}
+    { "ePowerSwitch", "maxOutlet", 8, "outlet"}
 }