Fixed bug 2987151: makedhcp have one issue with a clean DHCP configuration file on AIX
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5774 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
8b64d9795c
commit
53031e65db
@ -705,6 +705,21 @@ sub process_request
|
||||
}
|
||||
}
|
||||
|
||||
foreach (@nrn)
|
||||
{
|
||||
my @line = split /:/;
|
||||
my $firstoctet = $line[0];
|
||||
$firstoctet =~ s/^(\d+)\..*/$1/;
|
||||
if ($line[0] eq "169.254.0.0" or ($firstoctet >= 224 and $firstoctet <= 239))
|
||||
{
|
||||
next;
|
||||
}
|
||||
if ($activenics{$line[1]} and $line[3] !~ /G/)
|
||||
{
|
||||
addnet($line[0], $line[2]);
|
||||
}
|
||||
}
|
||||
|
||||
if ($req->{node})
|
||||
{
|
||||
my $ip_hash;
|
||||
@ -783,20 +798,6 @@ sub process_request
|
||||
}
|
||||
close($omshell) if ($^O ne 'aix');
|
||||
}
|
||||
foreach (@nrn)
|
||||
{
|
||||
my @line = split /:/;
|
||||
my $firstoctet = $line[0];
|
||||
$firstoctet =~ s/^(\d+)\..*/$1/;
|
||||
if ($line[0] eq "169.254.0.0" or ($firstoctet >= 224 and $firstoctet <= 239))
|
||||
{
|
||||
next;
|
||||
}
|
||||
if ($activenics{$line[1]} and $line[3] !~ /G/)
|
||||
{
|
||||
addnet($line[0], $line[2]);
|
||||
}
|
||||
}
|
||||
writeout();
|
||||
if ($restartdhcp) {
|
||||
if ( $^O eq 'aix')
|
||||
|
@ -1906,7 +1906,7 @@ sub do_makedhcp {
|
||||
$string = "Add following nodes to dhcp server: \n$node\n";
|
||||
send_msg( $request, 0, $string );
|
||||
|
||||
`makedhcp -n $node`;
|
||||
`makedhcp $node`;
|
||||
|
||||
send_msg( $request, 0, "\nMakedhcp finished.\n" );
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user