/install is hard coded in gangliamon.pm and rmcmon.pm
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@7645 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
30f0909982
commit
edaba6aae6
@ -1156,7 +1156,8 @@ sub addNodes {
|
||||
|
||||
#let updatenode command to handle the normal nodes as a bulk
|
||||
if (@normal_nodes>0) {
|
||||
my $nr=join(',',@normal_nodes);
|
||||
my $nr=join(',',@normal_nodes);
|
||||
my $install_root = xCAT::Utils->getInstallDir();
|
||||
|
||||
#get the fanout value
|
||||
my %settings=xCAT_monitoring::monitorctrl->getPluginSettings("rmcmon");
|
||||
@ -1182,12 +1183,12 @@ sub addNodes {
|
||||
my $nr = join(',', @{$servernodes{$snkey}});
|
||||
my $cmd;
|
||||
if (xCAT::Utils->isLinux()) {
|
||||
$cmd="XCATBYPASS=Y $fanout_string $::XCATROOT/bin/xdsh $nr -s -e /install/postscripts/xcatdsklspost 2 -m $snkey configrmcnode 2>&1";
|
||||
$cmd="XCATBYPASS=Y $fanout_string $::XCATROOT/bin/xdsh $nr -s -e $install_root/postscripts/xcatdsklspost 2 -m $snkey configrmcnode 2>&1";
|
||||
print "$cmd\n";
|
||||
}
|
||||
else {
|
||||
#use -c 2 here to tell xcataixpost that there is only one postscript, download only it. It applies to AIX only
|
||||
$cmd="XCATBYPASS=Y $fanout_string $::XCATROOT/bin/xdsh $nr -s -e /install/postscripts/xcataixpost -m $snkey -c 2 configrmcnode 2>&1";
|
||||
$cmd="XCATBYPASS=Y $fanout_string $::XCATROOT/bin/xdsh $nr -s -e $install_root/postscripts/xcataixpost -m $snkey -c 2 configrmcnode 2>&1";
|
||||
}
|
||||
if (! open (CMD, "$cmd |")) {
|
||||
reportError("Cannot run command $cmd", $callback);
|
||||
|
@ -243,6 +243,7 @@ sub confGmond
|
||||
if ($noderef =~ /xCAT_monitoring::gangliamon/) {
|
||||
$noderef=shift;
|
||||
}
|
||||
|
||||
my $scope=shift;
|
||||
my $callback=shift;
|
||||
my $configure_file = '';
|
||||
@ -345,6 +346,7 @@ sub confGmond
|
||||
if ($scope)
|
||||
{#opening if scope of confGmond
|
||||
my @children;
|
||||
my $install_root = xCAT::Utils->getInstallDir();
|
||||
foreach my $key (keys (%$pPairHash)) { #opening for each
|
||||
my @key_a=split(':', $key);
|
||||
if (! $iphash{$key_a[0]}) { next; }
|
||||
@ -362,7 +364,7 @@ sub confGmond
|
||||
} #closing foreach2
|
||||
|
||||
my $node = join(',',@children);
|
||||
my $res_cp = `XCATBYPASS=Y $::XCATROOT/bin/xdcp $node /install/postscripts/confGang /tmp 2>&1`;
|
||||
my $res_cp = `XCATBYPASS=Y $::XCATROOT/bin/xdcp $node $install_root/postscripts/confGang /tmp 2>&1`;
|
||||
if($?)
|
||||
{ #openinf if ?
|
||||
if($callback) {
|
||||
|
Loading…
Reference in New Issue
Block a user