Fix asu handling of exotic characters

Exotic characters that may be interpreted by shell
are now quoted to prevent any interpolation.
This commit is contained in:
jjohnson2 2015-03-26 15:52:44 -04:00
parent 39bc1e21a6
commit 3cc5e0cdf4

View File

@ -225,7 +225,7 @@ sub asunode {
} else {
foreach my $a (@_) { $args .= ' ' . xCAT::Utils->quote($a); }
}
my $cmd = "$::asucmd $args --host $bmc --user $username --password $passwd 2>&1 |";
my $cmd = "$::asucmd $args --host '$bmc' --user '$username' --password '$passwd' 2>&1 |";
if ($::VERBOSE) { print "forking $cmd\n"; }
my $pid = open($$out, $cmd);
$pids{$pid} = $node;