Commit f9007f21 authored by Leigh B. Stoller's avatar Leigh B. Stoller

Do not allow firewalled experiments to be modifed. This is a temp

patch to avoid vlan corruption.
parent db6f86e1
......@@ -296,6 +296,12 @@ if ($waitmode) {
$SIG{INT} = 'IGNORE';
}
#
# Temp fix; Disallow swapmod to firewalled experiments. This will come
# out later.
#
my $firewalled = TBExptFirewall($pid, $eid);
#
# We have to protect against trying to end an experiment that is currently
# in the process of being terminated. We use a "wrapper" state (actually
......@@ -450,6 +456,9 @@ else {
$estate ne EXPTSTATE_ACTIVATING) ||
$batchstate ne BATCHSTATE_UNLOCKED());
ExitWithStatus(1, "Cannot modify a firewalled experiment (yet).")
if ($firewalled);
#
# Otherwise, proceed with the modify. The experiment will be
# locked below, and so it cannot be injected or otherwise messed
......@@ -556,6 +565,10 @@ else {
"Experiment $pid/$eid must be ACTIVE or\n".
"SWAPPED to modify!\n");
}
ExitWithStatus(1,
"Cannot modify a firewalled experiment (yet).")
if ($firewalled);
last SWITCH;
};
die("*** $0:\n".
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment