1
package HP::Proliant::Component::CpuSubsystem::CLI;
2
our @ISA = qw(HP::Proliant::Component::CpuSubsystem);
5
use constant { OK => 0, WARNING => 1, CRITICAL => 2, UNKNOWN => 3 };
11
runtime => $params{runtime},
12
rawdata => $params{rawdata},
16
extendedinfo => undef,
27
runtime => $params{runtime},
30
foreach (grep(/^server/, split(/\n/, $self->{rawdata}))) {
31
if (/Processor:\s+(\d+)/) {
32
$tmpcpu{cpqSeCpuUnitIndex} = $1;
34
} elsif (/Name\s*:\s+(.+?)\s*$/) {
35
$tmpcpu{cpqSeCpuName} = $1;
36
} elsif (/Status\s*:\s+(.+?)\s*$/) {
37
$tmpcpu{cpqSeCpuStatus} = lc $1;
38
} elsif (/Socket\s*:\s+(.+?)\s*$/) {
39
$tmpcpu{cpqSeCpuSlot} = $1;
40
} elsif (/^server\s*$/) {
43
push(@{$self->{cpus}},
44
HP::Proliant::Component::CpuSubsystem::Cpu->new(%tmpcpu));
46
runtime => $params{runtime},
52
push(@{$self->{cpus}},
53
HP::Proliant::Component::CpuSubsystem::Cpu->new(%tmpcpu));