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

add attribute 'dfmdispatch' for site table to enable or disable the DFM hdwr_ctrl dispatch

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.7@14283 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
zhaoertao
2012-11-09 03:18:02 +00:00
parent 72cbbc912d
commit f8c5b0c53b
2 changed files with 15 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
perl-xCAT/xCAT/Schema.pm
View File

@@ -848,6 +848,8 @@ site => {
" match the path in the installdir attribute.\n\n".
" ipmidispatch: Whether or not to send ipmi hw control operations to the service\n".
" node of the target compute nodes. Default is 'y'.\n\n".
" dfmdispatch: Whether or not to send DFM hw control operations to the service\n".
" node of the target compute nodes. Default is 'y'.\n\n".
" ipmimaxp: The max # of processes for ipmi hw ctrl. The default is 64. Currently,\n".
" this is only used for HP hw control.\n\n".
" ipmiretries: The # of retries to use when communicating with BMCs. Default is 3.\n\n".

15
xCAT-server/lib/perl/xCAT/PPC.pm
View File

@@ -2000,8 +2000,19 @@ sub preprocess_request {
# build an individual request for each service node
my $service = "xcat";
my @hcps=keys(%hcp_hash);
my $sn = xCAT::Utils->get_ServiceNode(\@hcps, $service, "MN");
my $sn;
my @dfmdispatch = xCAT::Utils->get_site_attribute("dfmdispatch");
if (defined($dfmdispatch[0]) and ($dfmdispatch[0] =~ /0|n/i)) {
if ($masters[0]) {
push @{$sn->{$masters[0]}}, @hcps;
} else {
$callback->({data=>["The value of the attribute master in the site table is NOT set"]});
$req = {};
return;
}
} else {
$sn = xCAT::Utils->get_ServiceNode(\@hcps, $service, "MN");
}
# build each request for each service node
foreach my $snkey (keys %$sn)
{