Add packing_strategy to the experiments table.

sql/database-create.sql

@@ -1648,6 +1648,7 @@ CREATE TABLE `experiments` (
   `uselinkdelays` tinyint(4) NOT NULL default '0',
   `forcelinkdelays` tinyint(4) NOT NULL default '0',
   `multiplex_factor` smallint(5) default NULL,
+  `packing_strategy` enum('pack','balance') default NULL,
   `uselatestwadata` tinyint(4) NOT NULL default '0',
   `usewatunnels` tinyint(4) NOT NULL default '1',
   `wa_delay_solverweight` float default '0',

sql/database-fill.sql

@@ -975,6 +975,7 @@ REPLACE INTO table_regex VALUES ('experiments','ipassign_args','text','regex','^
 REPLACE INTO table_regex VALUES ('experiments','expt_name','text','redirect','default:fulltext',1,255,NULL);
 REPLACE INTO table_regex VALUES ('experiments','dpdb','int','redirect','default:tinyint',0,1,NULL);
 REPLACE INTO table_regex VALUES ('experiments','nonfsmounts','int','redirect','default:tinyint',0,1,NULL);
+REPLACE INTO table_regex VALUES ('experiments','packing_strategy','text','regex','^(pack|balance)$',0,0,NULL);
 
 REPLACE INTO table_regex VALUES ('experiments','description','text','redirect','default:fulltext',1,256,NULL);
 REPLACE INTO table_regex VALUES ('experiments','idle_ignore','int','redirect','default:boolean',0,0,NULL);

sql/updates/4/498

+#
+# Add packing strategy to experiments table.
+#
+use strict;
+use libdb;
+
+sub DoUpdate($$$)
+{
+    my ($dbhandle, $dbname, $version) = @_;
+
+    if (!DBSlotExists("experiments", "packing_strategy")) {
+	DBQueryFatal("alter table experiments add ".
+		     " `packing_strategy` enum('pack','balance') default NULL ".
+		     "    after multiplex_factor");
+    }
+    DBQueryFatal("REPLACE INTO table_regex VALUES ".
+		 " ('experiments','packing_strategy','text','regex',".
+		 "  '^(pack|balance)\$', ".
+		 "  0,0,NULL)");    
+    return 0;
+}
+
+1;
+
+# Local Variables:
+# mode:perl
+# End: