make the power-relay work

this is a hack: use powercycle with 0 power_on_ms and a long enough
power_off_ms as substitution for powerup/powerdown. This can't be
activated via the gui but only with the rsbs2 perl script.

more firmware reverse engineering is needed to get the commands
powerup and powerdown to work, too.

diff --git a/rsbs2 b/rsbs2
index 91027590ee2a4fba3a822df41c61e5d7ccf9fd6a..2ad767e6768984f5441007698cfa9d7681012530 100755 (executable)
--- a/rsbs2
+++ b/rsbs2
@@ -280,11 +280,11 @@ printf("byte 22: 0x%x\n", ord($board[22]));
 #showprop("SERVER_POWER_ON_PULSE_MS");
 #showprop("SERVER_POWER_OFF_MODE");
 #showprop("SERVER_POWER_OFF_PULSE_MS");
-#showprop("AGENT_VERSION");
+#showprop("FP_COMREDIRECT");
 
 board_properties();
 
-show_all_vars();
+#show_all_vars();
 
 #server_power_on modes: (com/agilent/rmc/mgui/panels/PowerMgmtConf.class)
 #0: l_pmconf_option_disabled
@@ -301,13 +301,16 @@ setprop("FP_REMOTE_POWER", "TRUE");
 #PM Mode
 setprop("SERVER_POWER_ON_MODE", sprintf("0x%x", $pmode));
 setprop("SERVER_POWER_OFF_MODE", sprintf("0x%x", $pmode));
+#Hack: Abuse powercycloe for powerup and down...
+setprop("SERVER_POWER_ON_PULSE_MS", "0x0");
 
 #$reqstr='<?xml version="1.0"?><?RMCXML version="1.0"?><RMCSEQ><REQ CMD="boardpropset"><BPROP NAME="BOARD_DESCRIPTION"><VAL>'.$boarddesc_new.'</VAL></BPROP></REQ></RMCSEQ>';
 #print $reqstr."\n";
 #print Dumper(_req($reqstr));
 
-#serveraction("hardreset");
-serveraction("powerup");
-serveraction("powerdown");
+serveraction("hardreset");
+#serveraction("powerup");
+#serveraction("powerdown");
+serveraction("powercycle");
 
 logout();