1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
|
#
# OcsInventory agent - IPMI lan channel report
#
# Copyright (c) 2008 Jean Parpaillon <jean.parpaillon@kerlabs.com>
#
# The Intelligent Platform Management Interface (IPMI) specification
# defines a set of common interfaces to a computer system which system
# administrators can use to monitor system health and manage the
# system. The IPMI consists of a main controller called the Baseboard
# Management Controller (BMC) and other satellite controllers.
#
# The BMC can be fetched through client like OpenIPMI drivers or
# through the network. Though, the BMC hold a proper MAC address.
#
# This module reports the MAC address and, if any, the IP
# configuration of the BMC. This is reported as a standard NIC.
#
package FusionInventory::Agent::Task::Inventory::Generic::Ipmi;
use strict;
use warnings;
use FusionInventory::Agent::Tools;
use FusionInventory::Agent::Tools::Network;
sub isEnabled {
return unless canRun('ipmitool');
}
sub doInventory {
my (%params) = @_;
my $inventory = $params{inventory};
my $logger = $params{logger};
my $handle = getFileHandle(
logger => $logger,
command => "ipmitool lan print",
);
return unless $handle;
my $ipaddress;
my $ipgateway;
my $ipmask;
my $macaddr;
while (my $line = <$handle>) {
if ($line =~ /^IP Address\s+:\s+($ip_address_pattern)/) {
$ipaddress = $1;
}
if ($line =~ /^Default Gateway IP\s+:\s+($ip_address_pattern)/) {
$ipgateway = $1;
}
if ($line =~ /^Subnet Mask\s+:\s+($ip_address_pattern)/) {
$ipmask = $1;
}
if ($line =~ /^MAC Address\s+:\s+($mac_address_pattern)/) {
$macaddr = $1;
}
}
close $handle;
return unless $ipaddress && $ipmask;
my $ipsubnet = getSubnetAddress($ipaddress, $ipmask);
my $status = "Down";
if ($ipaddress && ($ipaddress ne '0.0.0.0')) {
$status = "Up";
}
$inventory->addEntry(
section => 'NETWORKS',
entry => {
DESCRIPTION => 'bmc',
IPADDRESS => $ipaddress,
IPGATEWAY => $ipgateway,
IPMASK => $ipmask,
IPSUBNET => $ipsubnet,
MACADDR => $macaddr,
STATUS => $status,
TYPE => 'Ethernet'
}
);
}
1;
|
