arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

rsync postscript support hierarchical fixes

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@8700 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2011-01-18 19:04:44 +00:00
parent b79f2db323
commit 2c9d34032f
1 changed files with 11 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
perl-xCAT/xCAT/DSHCLI.pm
View File

@ -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);