Beta Shell v2.0

File Manager

~ /usr/share/fusioninventory/lib/FusionInventory/Agent/Task/Inventory/Generic/Ipmi/Fru

Name	Size	Perms	Modified	Actions
[ .. / .. ]
Controllers.pm	1.08 KB	-rw-r--r--	2020-11-13 05:54:08	Edit Del
Memory.pm	2.81 KB	-rw-r--r--	2020-11-13 05:54:08	Edit Del
Psu.pm	1.66 KB	-rw-r--r--	2020-11-13 05:54:08	Edit Del

Editing: Controllers.pm (1.08 KB)

package FusionInventory::Agent::Task::Inventory::Generic::Ipmi::Fru::Controllers;

use strict;
use warnings;

use parent 'FusionInventory::Agent::Task::Inventory::Module';

use FusionInventory::Agent::Tools;
use FusionInventory::Agent::Tools::IpmiFru;

my $CONTROLLERS = qr/^(?:
    BP             |
    PERC           |
    NDC            |
    Ethernet Adptr |
    SAS Ctlr
)\d*\s+/x;

sub isEnabled {
    my (%params) = @_;
    return 0 if $params{no_category}->{controller};
    return 1;
}

sub doInventory {
    my (%params) = @_;

    my $inventory = $params{inventory};
    my $logger    = $params{logger};

    my $fru = getIpmiFru(%params)
        or return;

    my @fru_keys = grep { $_ =~ $CONTROLLERS } keys %$fru
        or return;

    my $fields = $inventory->getFields()->{CONTROLLERS};
    for my $descr (@fru_keys) {
        my $ctrl = parseFru($fru->{$descr}, $fields);
        next unless keys %$ctrl;

        $ctrl->{TYPE} = $1 if $descr =~ /^([\w\s]+[[:alpha:]])/;

        $inventory->addEntry(
            section => 'CONTROLLERS',
            entry   => $ctrl
        );
    }
}

1;