xcat-core/xCAT-rmc/resources/sn/IBM.EventResponse/UpdatexCATNodeStatus_B.pm

21 lines
528 B
Perl
Raw Normal View History

#!/usr/bin/perl
BEGIN
{
$::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : '/opt/xcat';
}
use lib "$::XCATROOT/lib/perl";
use xCAT::Utils;
if (exists($ENV{RSCT_VER})) {
my $rsct_ver=$ENV{RSCT_VER};
if (xCAT::Utils->CheckVersion($rsct_ver, "2.3.5.0") < 0) { exit 0;}
}
$RES::EventResponse{'UpdatexCATNodeStatus_B'} = {
Name => q(UpdatexCATNodeStatus_B),
Locked => q(0),
EventBatching => q(1),
Actions => q({[updatexCAT,{127},{0},{86400},/opt/xcat/sbin/rmcmon/updatexcatnodestatus,3,0,0,0,{},0]}),
};
1;