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

pre-create mypostscript enhancement. Use the networks info which is got form networks table ahead of time

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@14138 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jjhua 2012-10-26 08:38:04 +00:00
parent 6c4a409e29
commit 62636a0216
1 changed files with 11 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
xCAT-server/lib/perl/xCAT/Postage.pm
View File

@ -147,7 +147,7 @@ sub makescript
#create the mypostscript for each node once according to the template
if(ref($node) eq "ARRAY") {
require xCAT::Template;
require xCAT::Template;
xCAT::Template->subvars_for_mypostscript($node, $nodesetstate, $callback);
return;
}
@ -184,7 +184,7 @@ sub makescript
# for them in the post install file
my $attribute;
my $value;
my $masterset = 0;
my $masterset = 0;
foreach (keys(%::XCATSITEVALS)) # export the attribute
{
$attribute = $_;
@ -958,16 +958,21 @@ sub getnodesetstate
sub net_parms
{
my $ip = shift;
my $nets = shift;
$ip = xCAT::NetworkUtils->getipaddr($ip);
if (!$ip)
{
xCAT::MsgUtils->message("S", "Unable to resolve $ip");
return undef;
}
my $nettab = xCAT::Table->new('networks');
unless ($nettab) { return undef }
my @nets = $nettab->getAllAttribs('net', 'mask', 'gateway');
foreach (@nets)
if(!defined($nets) ) {
my $nettab = xCAT::Table->new('networks');
unless ($nettab) { return undef }
my @tmp_nets = $nettab->getAllAttribs('net', 'mask', 'gateway');
$nets = \@tmp_nets;
}
foreach (@$nets)
{
my $net = $_->{'net'};
my $mask = $_->{'mask'};