mirror of
https://github.com/xcat2/xcat-core.git
synced 2025-10-31 03:12:30 +00:00
34 lines
1.2 KiB
Perl
34 lines
1.2 KiB
Perl
# IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html
|
|
# The last module to deal with hardware discovery request, write information that which module can deal with this request or no module can deal with it at all
|
|
package xCAT_plugin::zzzdiscovery;
|
|
|
|
BEGIN
|
|
{
|
|
$::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : '/opt/xcat';
|
|
}
|
|
use lib "$::XCATROOT/lib/perl";
|
|
|
|
sub handled_commands {
|
|
return {
|
|
findme => 'zzzdiscovery',
|
|
};
|
|
}
|
|
|
|
sub process_request {
|
|
my $req = shift;
|
|
my $cb = shift;
|
|
my $doreq = shift;
|
|
if ($req->{command}->[0] eq 'findme') {
|
|
if (!defined($req->{discoverymethod}) or !defined($req->{discoverymethod}->[0]) or ($req->{discoverymethod}->[0] eq 'undef')) {
|
|
my $rsp = {};
|
|
$rsp->{error}->[0] = "The discovery request can not be processed";
|
|
$cb->($rsp);
|
|
xCAT::MsgUtils->message("S", "xcat.discovery.zzzdiscovery: ($req->{_xcat_clientmac}->[0]) Failed to discover the node.");
|
|
return;
|
|
}
|
|
xCAT::MsgUtils->message("S", "xcat.discovery.zzzdiscovery: ($req->{_xcat_clientmac}->[0]) Successfully discovered the node using $req->{discoverymethod}->[0] discovery method.");
|
|
return;
|
|
}
|
|
}
|
|
1;
|