source: ocsinventory-agent/trunk/fuentes/lib/Ocsinventory/Agent/Backend/OS/AIX/Controller.pm @ 468

Last change on this file since 468 was 468, checked in by mabarracus, 4 years ago

Copyt trusty code

File size: 676 bytes
Line 
1package Ocsinventory::Agent::Backend::OS::AIX::Controller;
2use strict;
3
4sub check {
5        return unless can_run('lsdev');
6        my @lsdev = `lsdev -Cc adapter -F 'name:type:description'`;     
7        return 1 if @lsdev;
8        0
9}
10
11sub run {
12        my $params = shift;
13        my $common = $params->{common};
14       
15        my $name;
16        my $type;
17        my $manufacturer;
18       
19        for(`lsdev -Cc adapter -F 'name:type:description'`){
20                chomp($_);
21                /^(.+):(.+):(.+)/;
22                my $name = $1;
23                my $type = $2;
24                my $manufacturer = $3;
25                $common->addController({
26                        'NAME'          => $name,
27                        'MANUFACTURER'  => $manufacturer,
28                        'TYPE'          => $type,
29                });
30        }
31}
32
331;
Note: See TracBrowser for help on using the repository browser.