Commit 8a134107 authored by Leigh Stoller's avatar Leigh Stoller

Run image setup in the foreground so we can see progress in the log.

parent 30cf1918
#!/usr/bin/perl -wT
#
# Copyright (c) 2008-2018 University of Utah and the Flux Group.
# Copyright (c) 2008-2019 University of Utah and the Flux Group.
#
# {{{GENIPUBLIC-LICENSE
#
......@@ -1119,6 +1119,7 @@ sub ActionStart($$;$)
my @restarts = ();
my @failed = ();
my $sliver;
my $output;
foreach $sliver (@slivers) {
if (ref($sliver) ne "GeniSliver::Node") {
......@@ -1208,10 +1209,7 @@ sub ActionStart($$;$)
# real user, and the current user will not have write permission
# on it.
#
my $output =
GeniUtil::ExecuteQuietAsGeniUser("$IMAGE_SETUP ".
"-d -g -p GeniSlices $pid,$eid");
print STDERR $output;
GeniUtil::ExecuteAsGeniUser("$IMAGE_SETUP -d -g -p GeniSlices $pid,$eid");
if ($?) {
$msg = "Could not setup images";
goto bad;
......@@ -1757,6 +1755,7 @@ sub Action($$$;$)
# For reload.
my $osload_object;
my @reload_children = ();
my $output;
#
# Download the images. If this fails, we have wasted our time,
......@@ -1770,10 +1769,7 @@ sub Action($$$;$)
# real user, and the current user will not have write permission
# on it.
#
my $output =
GeniUtil::ExecuteQuietAsGeniUser("$IMAGE_SETUP ".
"-d -g -p GeniSlices $pid,$eid");
print STDERR $output;
GeniUtil::ExecuteAsGeniUser("$IMAGE_SETUP -d -g -p GeniSlices $pid,$eid");
if ($?) {
$msg = "Could not setup images";
goto bad;
......
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