From e6c2bc2e5a73ae89bae38b1c47f2429650430dff Mon Sep 17 00:00:00 2001 From: lissav Date: Tue, 18 Jan 2011 19:35:32 +0000 Subject: [PATCH] more rsync hier fixes git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@8701 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT/xCAT/DSHCLI.pm | 21 ++++++++++++--------- 1 file changed, 12 insertions(+), 9 deletions(-) diff --git a/perl-xCAT/xCAT/DSHCLI.pm b/perl-xCAT/xCAT/DSHCLI.pm index 07d8edeb3..ef925b805 100644 --- a/perl-xCAT/xCAT/DSHCLI.pm +++ b/perl-xCAT/xCAT/DSHCLI.pm @@ -4796,13 +4796,7 @@ sub run_rsync_postscripts next; } if ($tmppostfile eq $ps) { - # build xdsh commands - # if on the service node need to add the $syncdir directory - # to the path - if (xCAT::Utils->isServiceNode()) { - my $tmpp=$syncdir . $postsfile; - $postsfile=$tmpp; - } + # build xdsh queue # build host and all scripts to execute push (@{$dshparms->{'postscripts'} {$postsfile}}, $hostname); } @@ -4811,8 +4805,17 @@ sub run_rsync_postscripts # now if we have postscripts to run, run xdsh my $out; foreach my $ps ( keys %{$$dshparms{'postscripts'}}) { - my @nodes; - push (@nodes, @{$$dshparms{'postscripts'}{$ps}}); + my @nodes; + push (@nodes, @{$$dshparms{'postscripts'}{$ps}}); + # if on the service node need to add the $syncdir directory + # to the path + if (xCAT::Utils->isServiceNode()) { + my $tmpp=$syncdir . $ps; + $ps=$tmpp; + } + # my $rsp = {}; + # $rsp->{data}->[0] = " postscripts = $ps"; + # xCAT::MsgUtils->message("I", $rsp, $::CALLBACK); $out=xCAT::Utils->runxcmd( { command => ['xdsh'], node => \@nodes,