Add astrium chopper field 'master' to driver

This commit is contained in:
Douglas Clowes
2014-05-30 17:17:14 +10:00
parent bd0c0b5556
commit a1572f3152
2 changed files with 46 additions and 2 deletions

View File

@@ -9,6 +9,7 @@ driver astrium_chopper = {
read_command = '1'; fetch_function = fetchState; read_function = readState;
property 'my_state' = 'idle';
}
var master = { type = text; }
var rspeed = { type = float; }
var aspeed = { type = float; mutable = true; }
var rphase = { type = float; }
@@ -21,6 +22,7 @@ driver astrium_chopper = {
read_command = '2'; fetch_function = fetchState; read_function = readState;
property 'my_state' = 'idle';
}
var master = { type = text; }
var rspeed = { type = float; }
var aspeed = { type = float; mutable = true; }
var rphase = { type = float; }
@@ -33,6 +35,7 @@ driver astrium_chopper = {
read_command = '3'; fetch_function = fetchState; read_function = readState;
property 'my_state' = 'idle';
}
var master = { type = text; }
var rspeed = { type = float; }
var aspeed = { type = float; mutable = true; }
var rphase = { type = float; }
@@ -45,6 +48,7 @@ driver astrium_chopper = {
read_command = '4'; fetch_function = fetchState; read_function = readState;
property 'my_state' = 'idle';
}
var master = { type = text; }
var rspeed = { type = float; }
var aspeed = { type = float; mutable = true; }
var rphase = { type = float; }
@@ -84,7 +88,7 @@ driver astrium_chopper = {
set rhs "[string trim [lindex ${lst} 1]]"
sct "attr_${lhs}" "${rhs}"
set base [pathname [sct]]
foreach node [list ASPEED RSPEED APHASE RPHASE] {
foreach node [list ASPEED RSPEED APHASE RPHASE MASTER] {
if { [string equal -nocase "${lhs}" "${node}"] } {
if { "[hval ${base}/${node}]" != "${rhs}" } {
hset ${base}/${node} "${rhs}"