Add state machine entries for UE devices (mostly for reloading).

db/EmulabConstants.pm.in

@@ -138,6 +138,7 @@ use vars qw(@ISA @EXPORT);
 	 TBDB_NODEOPMODE_UNKNOWNOS TBDB_NODEOPMODE_RELOADING
 	 TBDB_NODEOPMODE_NORMALv1 TBDB_NODEOPMODE_MINIMAL TBDB_NODEOPMODE_PCVM
 	 TBDB_NODEOPMODE_RELOAD TBDB_NODEOPMODE_RELOADMOTE
+         TBDB_NODEOPMODE_RELOADUE
 	 TBDB_NODEOPMODE_RELOADPCVM TBDB_NODEOPMODE_RELOADPUSH
 	 TBDB_NODEOPMODE_SECUREBOOT TBDB_NODEOPMODE_SECURELOAD
 	 TBDB_NODEOPMODE_DELAY
@@ -523,6 +524,7 @@ sub TBDB_NODEOPMODE_MINIMAL	{ "MINIMAL"; }
 sub TBDB_NODEOPMODE_PCVM	{ "PCVM"; }
 sub TBDB_NODEOPMODE_RELOAD	{ "RELOAD"; }
 sub TBDB_NODEOPMODE_RELOADMOTE	{ "RELOAD-MOTE"; }
+sub TBDB_NODEOPMODE_RELOADUE	{ "RELOAD-UE"; }
 sub TBDB_NODEOPMODE_SECUREBOOT  { "SECUREBOOT"; }
 sub TBDB_NODEOPMODE_SECURELOAD  { "SECURELOAD"; }
 sub TBDB_NODEOPMODE_RELOADPCVM	{ "RELOAD-PCVM"; }

sql/database-fill.sql

@@ -352,6 +352,10 @@ REPLACE INTO mode_transitions VALUES ('WIMRELOAD','RELOADDONE','NETBOOT','SHUTDO
 REPLACE INTO mode_transitions VALUES ('WIMRELOAD','RELOADDONE','NORMAL','SHUTDOWN','');
 REPLACE INTO mode_transitions VALUES ('WIMRELOAD','RELOADDONE','NORMALv1','SHUTDOWN','');
 REPLACE INTO mode_transitions VALUES ('WIMRELOAD','RELOADDONE','NORMALv2','SHUTDOWN','');
+REPLACE INTO mode_transitions VALUES ('ALWAYSUP','SHUTDOWN','RELOAD-UE','SHUTDOWN','ReloadStart');
+REPLACE INTO mode_transitions VALUES ('ALWAYSUP','ISUP','RELOAD-UE','SHUTDOWN','ReloadStart');
+REPLACE INTO mode_transitions VALUES ('ALWAYSUP','ISUP','RELOAD-UE','ISUP','ReloadStart');
+REPLACE INTO mode_transitions VALUES ('RELOAD-UE','SHUTDOWN','ALWAYSUP','ISUP','ReloadDone');
 
 --
 -- Dumping data for table `priorities`
@@ -701,6 +705,8 @@ REPLACE INTO state_transitions VALUES ('RELOAD','RELOADFAILED','SHUTDOWN','');
 REPLACE INTO state_transitions VALUES ('RELOAD-PCVM','RELOADSETUP','RELOADFAILED','');
 REPLACE INTO state_transitions VALUES ('RELOAD-PCVM','RELOADING','RELOADFAILED','');
 REPLACE INTO state_transitions VALUES ('RELOAD-PCVM','RELOADFAILED','SHUTDOWN','');
+REPLACE INTO state_transitions VALUES ('RELOAD-UE','RELOADING','RELOADDONE','ReloadDone');
+REPLACE INTO state_transitions VALUES ('RELOAD-UE','SHUTDOWN','RELOADING','Booting');
 
 --
 -- Dumping data for table `state_triggers`
@@ -734,6 +740,7 @@ REPLACE INTO state_triggers VALUES ('*','WIMRELOAD','RELOADDONE','PXERESET, RESE
 REPLACE INTO state_triggers VALUES ('*','WIMRELOAD','PXEBOOTING','REBOOT');
 REPLACE INTO state_triggers VALUES ('*','WIMRELOAD','BOOTING','REBOOT');
 REPLACE INTO state_triggers VALUES ('*','WIMRELOAD','ISUP','REBOOT');
+REPLACE INTO state_triggers VALUES ('*','RELOAD-UE','RELOADDONE','RELOADDONE');
 
 --
 -- Dumping data for table `table_regex`

sql/updates/4/499

+#
+# Stated stuff for UE devices
+#
+use strict;
+use libdb;
+
+sub DoUpdate($$$)
+{
+    my ($dbhandle, $dbname, $version) = @_;
+
+    DBQueryFatal("REPLACE INTO mode_transitions VALUES ".
+		 "('ALWAYSUP','SHUTDOWN','RELOAD-UE','SHUTDOWN',".
+		 " 'ReloadStart')");
+    DBQueryFatal("REPLACE INTO mode_transitions VALUES ".
+		 "('ALWAYSUP','ISUP','RELOAD-UE','SHUTDOWN',".
+		 " 'ReloadStart')");
+    DBQueryFatal("REPLACE INTO mode_transitions VALUES ".
+		 "('ALWAYSUP','ISUP','RELOAD-UE','ISUP',".
+		 " 'ReloadStart')");
+    DBQueryFatal("REPLACE INTO mode_transitions VALUES ".
+		 "('RELOAD-UE','SHUTDOWN','ALWAYSUP','ISUP',".
+		 " 'ReloadDone')");
+
+    DBQueryFatal("REPLACE INTO state_transitions VALUES ".
+		 "('RELOAD-UE','RELOADING','RELOADDONE','ReloadDone')");
+    DBQueryFatal("REPLACE INTO state_transitions VALUES ".
+		 "('RELOAD-UE','SHUTDOWN','RELOADING','Booting')");
+
+    DBQueryFatal("REPLACE INTO state_triggers VALUES " .
+		 "('*','RELOAD-UE','RELOADDONE','RELOADDONE')");
+
+    return 0;
+}
+1;
+
+# Local Variables:
+# mode:perl
+# End: