All new accounts created on Gitlab now require administrator approval. If you invite any collaborators, please let Flux staff know so they can approve the accounts.

Commit 30728b3b authored by Leigh B. Stoller's avatar Leigh B. Stoller

Use geniswap program for experiments that are geni.

parent 96fc6962
#!/usr/bin/perl -wT
# Copyright (c) 2000-2007 University of Utah and the Flux Group.
# Copyright (c) 2000-2008 University of Utah and the Flux Group.
# All rights reserved.
use strict;
......@@ -32,6 +32,7 @@ my $TBLOGS = "@TBLOGSEMAIL@";
my $swapexp = "$TB/bin/swapexp";
my $template_swapout = "$TB/bin/template_swapout";
my $cleanupslice = "$TB/sbin/cleanupslice";
# Testbed Support libraries
use lib "@prefix@/lib";
......@@ -115,6 +116,12 @@ if ($experiment->IsInstance()) {
exec "$template_swapout -e $eid $guid/$vers";
die("Failed to exec $template_swapout!");
elsif ($experiment->geniflags()) {
my $uuid = $experiment->uuid();
exec "$cleanupslice $uuid";
die("Failed to exec $cleanupslice!");
else {
my $arg = "";
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