From 2c9d34032f3f9abdb58d90b14a4d42bde8f52ba2 Mon Sep 17 00:00:00 2001 From: lissav Date: Tue, 18 Jan 2011 19:04:44 +0000 Subject: [PATCH] rsync postscript support hierarchical fixes git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@8700 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT/xCAT/DSHCLI.pm | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/perl-xCAT/xCAT/DSHCLI.pm b/perl-xCAT/xCAT/DSHCLI.pm index 5332fbbb1..07d8edeb3 100644 --- a/perl-xCAT/xCAT/DSHCLI.pm +++ b/perl-xCAT/xCAT/DSHCLI.pm @@ -4761,17 +4761,27 @@ sub run_rsync_postscripts my @newoutput= (); my $dshparms; my $firstpass=1; + my $rsp = {}; foreach my $postsfile (@::postscripts) { my $tmppostfile = $postsfile ; + #my $rsp = {}; + #$rsp->{data}->[0] = " postscripts = $postsfile"; + #xCAT::MsgUtils->message("I", $rsp, $::CALLBACK); # remove first character, we have to do this because the # return from rsync is tmp/file1 not /tmp/file1 + # if service node need to add the SNsyncfiledir to the path + if (xCAT::Utils->isServiceNode()) { + my $tmpp=$syncdir . $tmppostfile; + $tmppostfile = $tmpp; + } substr($tmppostfile,0,1)=""; + #$rsp->{data}->[0] = " postscripts = $tmppostfile"; + #xCAT::MsgUtils->message("I", $rsp, $::CALLBACK); # now remove .post from the postscript file for the compare # with the returned file name my($tp,$post) = split(/.post/,$tmppostfile); - $tmppostfile = $tp; foreach my $line (@rsync_output) { my($hostname,$ps) = split(/: /, $line);