Have bmcconfig.pm implement remoteimmsetup command

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@14488 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2012-11-29 22:01:42 +00:00
parent bb9fb8c54b
commit 5c5ebf2c42

View File

@ -5,6 +5,7 @@ use xCAT::Table;
use xCAT::MsgUtils;
use xCAT::Utils;
use xCAT::PasswordUtils;
use xCAT::IMMUtils;
use xCAT::TableUtils;
use IO::Select;
use Socket;
@ -130,6 +131,10 @@ sub process_request {
$callback->({error=>["Invalid table configuration for bmcconfig"],errorcode=>[1]});
return 1;
}
if ($request->{command}->[0] eq 'remoteimmsetup') {
xCAT::IMMUtils::setupIMM($node,cliusername=>$username,clipassword=>$password,callback=>$callback);
return;
}
my $response={bmcip=>$ip,netmask=>$mask,gateway=>$gw,username=>$username,password=>$password};
if (defined $bmcport) {
$response->{bmcport}=$bmcport;