defect 3819
This commit is contained in:
parent
cd1c5414d6
commit
8b84e9e0eb
@ -31,7 +31,7 @@ use strict;
|
||||
my @cpiopid;
|
||||
my $httpmethod="http";
|
||||
my $httpport="80";
|
||||
|
||||
my $useflowcontrol="0";
|
||||
|
||||
|
||||
sub handled_commands
|
||||
@ -117,6 +117,7 @@ sub process_request
|
||||
my $path = undef;
|
||||
if ($::XCATSITEVALS{"httpmethod"}) { $httpmethod = $::XCATSITEVALS{"httpmethod"}; }
|
||||
if ($::XCATSITEVALS{"httpport"}) { $httpport = $::XCATSITEVALS{"httpport"}; }
|
||||
if ($::XCATSITEVALS{"useflowcontrol"}) { $useflowcontrol = $::XCATSITEVALS{"useflowcontrol"}; }
|
||||
|
||||
if ($request->{command}->[0] eq 'copycd')
|
||||
{
|
||||
@ -722,6 +723,8 @@ sub mknetboot
|
||||
"imgurl=$httpmethod://$imgsrv:$httpport/$rootimgdir/rootimg.$suffix ";
|
||||
$kcmdline .= "XCAT=$xcatmaster:$xcatdport ";
|
||||
$kcmdline .= "NODE=$node ";
|
||||
# add flow control setting
|
||||
$kcmdline .= "FC=$useflowcontrol ";
|
||||
}
|
||||
#inform statelite/stateless node not to update the nodestatus during provision
|
||||
if(($nodestatus eq "n") or ($nodestatus eq "N") or ($nodestatus eq "0")){
|
||||
|
@ -22,6 +22,7 @@ use File::Copy;
|
||||
use Socket;
|
||||
|
||||
#use strict;
|
||||
my $useflowcontrol="0";
|
||||
my @cpiopid;
|
||||
|
||||
##############################################################################
|
||||
@ -129,6 +130,7 @@ sub process_request
|
||||
my $distname = undef;
|
||||
my $arch = undef;
|
||||
my $path = undef;
|
||||
if ($::XCATSITEVALS{"useflowcontrol"}) { $useflowcontrol = $::XCATSITEVALS{"useflowcontrol"}; }
|
||||
if ($request->{command}->[0] eq 'copycd')
|
||||
{
|
||||
return copycd($request, $callback, $doreq);
|
||||
@ -1362,6 +1364,8 @@ sub mknetboot
|
||||
"XCAT=$xcatmaster:$xcatdport ";
|
||||
$kcmdline .=
|
||||
"NODE=$node ";
|
||||
# add flow control setting
|
||||
$kcmdline .= "FC=$useflowcontrol ";
|
||||
# BEGIN service node
|
||||
my $isSV = xCAT::Utils->isServiceNode();
|
||||
my $res = xCAT::Utils->runcmd("hostname", 0);
|
||||
|
@ -23,6 +23,7 @@ use File::Copy;
|
||||
use File::Temp qw/mkdtemp/;
|
||||
my $httpmethod = "http";
|
||||
my $httpport = "80";
|
||||
my $useflowcontrol="0";
|
||||
use File::Find;
|
||||
use File::Basename;
|
||||
use Digest::MD5 qw(md5_hex);
|
||||
@ -575,6 +576,8 @@ sub mknetboot
|
||||
}
|
||||
|
||||
$kcmdline .= "NODE=$node ";
|
||||
# add flow control setting
|
||||
$kcmdline .= "FC=$useflowcontrol ";
|
||||
|
||||
# add the kernel-booting parameter: netdev=<eth0>, or BOOTIF=<mac>
|
||||
my $netdev = "";
|
||||
@ -679,6 +682,7 @@ sub process_request
|
||||
my $path = undef;
|
||||
if ($::XCATSITEVALS{"httpmethod"}) { $httpmethod = $::XCATSITEVALS{"httpmethod"}; }
|
||||
if ($::XCATSITEVALS{"httpport"}) { $httpport = $::XCATSITEVALS{"httpport"}; }
|
||||
if ($::XCATSITEVALS{"useflowcontrol"}) { $useflowcontrol = $::XCATSITEVALS{"useflowcontrol"}; }
|
||||
if ($request->{command}->[0] eq 'copycd')
|
||||
{
|
||||
return copycd($request, $callback, $doreq);
|
||||
|
Loading…
Reference in New Issue
Block a user